Re: [fr-users] Récuperation de donnée dans une page HTML
Bonjour, Comme il a été précisé, une Macro n'est pas forcément nécessaire. La FAQ décrit une méthode pour l'import de données depuis un site : https://wiki.documentfoundation.org/Faq/Calc/113/fr Bonjour Voici une nouvelle question envoyée à l'aide du formulaire de demande d'aide (http://fr.libreoffice.org/get-help/poser-une-question/). Si vous répondez, merci de penser à utiliser la fonction "répondre à tous" de votre logiciel de courrier électronique de façon que le demandeur reçoive une copie de votre réponse. Email:: jeanmichel.n...@yahoo.fr Sujet:: Récuperation de donnée dans une page HTML OS:: Windows 10 Version:: 5.4.x Question:: Bonjour, je souhaite remplir des cellules dans CALC avec les données d'un tableau sur un site Internet. Voici un extrait de mon code: Sub ouverture_Html() Dim oObj, oPageHtml, oNavigateur, oElem As Object oObj = createUnoService( "com.sun.star.bridge.OleObjectFactory" ) oNavigateur = oObj.createInstance( "InternetExplorer.Application.1" ) oNavigateur.visible = false oNavigateur.navigate( "{adresse}.html" ) Wait_Chargement( oNavigateur ) oPageHtml = oNavigateur.document oElem = oPageHtml.all …{traitement des données} End Sub Sub Wait_Chargement(oIE As Object) Do Until oIE.readyState = 4 wait(1000) Loop End Sub Je me heurte à une erreur sur "readyState". Merci de votre soutien. Cordialement. -- Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour vous désinscrire Les archives de la liste sont disponibles à https://listarchives.libreoffice.org/fr/users/ Privacy Policy: https://www.documentfoundation.org/privacy
Re: [fr-users] Récuperation de donnée dans une page HTML
Bonjour, et pourquoi pas via : Feuilles - liens vers données externes - et reprendre qui est "lisible" pour calc. Ensuite si la page change, un "actualiser" du lien rafraîchira les données. A moins que la page soit vraiment compliquée :-/ Yves Le 5 juin 2018 à 19:34, Bob a écrit : > Bonsoir, > Pourquoi faut-il une macro ? N'est-il pas suffisant de sélectionner le > tableau dans la page web (avec firefox ça se fait très bien) puis de faire > un "collage spécial" ? > > Sujet:: Récuperation de donnée dans une page HTML >> OS:: Windows 10 >> Version:: 5.4.x >> Question:: Bonjour, >> je souhaite remplir des cellules dans CALC avec les données d'un tableau >> sur un site Internet. >> Voici un extrait de mon code: >> Sub ouverture_Html() >> Dim oObj, oPageHtml, oNavigateur, oElem As Object >> oObj = createUnoService( "com.sun.star.bridge.OleObjectFactory" ) >> oNavigateur = oObj.createInstance( "InternetExplorer.Application.1" ) >> oNavigateur.visible = false >> oNavigateur.navigate( "{adresse}.html" ) >> Wait_Chargement( oNavigateur ) >> oPageHtml = oNavigateur.document >> oElem = oPageHtml.all >> …{traitement des données} >> End Sub >> >> Sub Wait_Chargement(oIE As Object) >> Do Until oIE.readyState = 4 >> wait(1000) >> Loop >> End Sub >> >> Je me heurte à une erreur sur "readyState". >> Merci de votre soutien. >> Cordialement. >> >> >> > > -- > Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour vous > désinscrire > Les archives de la liste sont disponibles à https://listarchives.libreoffi > ce.org/fr/users/ > Privacy Policy: https://www.documentfoundation.org/privacy > -- web site : http://www.molenbaix.com -- Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour vous désinscrire Les archives de la liste sont disponibles à https://listarchives.libreoffice.org/fr/users/ Privacy Policy: https://www.documentfoundation.org/privacy
Re: [fr-users] Récuperation de donnée dans une page HTML
Bonsoir, Pourquoi faut-il une macro ? N'est-il pas suffisant de sélectionner le tableau dans la page web (avec firefox ça se fait très bien) puis de faire un "collage spécial" ? Sujet:: Récuperation de donnée dans une page HTML OS:: Windows 10 Version:: 5.4.x Question:: Bonjour, je souhaite remplir des cellules dans CALC avec les données d'un tableau sur un site Internet. Voici un extrait de mon code: Sub ouverture_Html() Dim oObj, oPageHtml, oNavigateur, oElem As Object oObj = createUnoService( "com.sun.star.bridge.OleObjectFactory" ) oNavigateur = oObj.createInstance( "InternetExplorer.Application.1" ) oNavigateur.visible = false oNavigateur.navigate( "{adresse}.html" ) Wait_Chargement( oNavigateur ) oPageHtml = oNavigateur.document oElem = oPageHtml.all …{traitement des données} End Sub Sub Wait_Chargement(oIE As Object) Do Until oIE.readyState = 4 wait(1000) Loop End Sub Je me heurte à une erreur sur "readyState". Merci de votre soutien. Cordialement. -- Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour vous désinscrire Les archives de la liste sont disponibles à https://listarchives.libreoffice.org/fr/users/ Privacy Policy: https://www.documentfoundation.org/privacy
Re: [fr-users] Récuperation de donnée dans une page HTML
Bonsoir, Vous ne devez pas faire un casting pour que la méthode readyState soit vue ? Là, vous parlez à un Objet générique… Thierry > Le 5 juin 2018 à 18:00, demande_aide...@libreoffice.org a écrit : > > Bonjour > > Voici une nouvelle question envoyée à l'aide du formulaire de demande d'aide > (http://fr.libreoffice.org/get-help/poser-une-question/). > Si vous répondez, merci de penser à utiliser la fonction "répondre à tous" de > votre logiciel de courrier électronique de façon que le demandeur reçoive une > copie de votre réponse. > > > Email:: jeanmichel.n...@yahoo.fr > Sujet:: Récuperation de donnée dans une page HTML > OS:: Windows 10 > Version:: 5.4.x > Question:: Bonjour, > je souhaite remplir des cellules dans CALC avec les données d'un tableau sur > un site Internet. > Voici un extrait de mon code: > Sub ouverture_Html() > Dim oObj, oPageHtml, oNavigateur, oElem As Object > oObj = createUnoService( "com.sun.star.bridge.OleObjectFactory" ) > oNavigateur = oObj.createInstance( "InternetExplorer.Application.1" ) > oNavigateur.visible = false > oNavigateur.navigate( "{adresse}.html" ) > Wait_Chargement( oNavigateur ) > oPageHtml = oNavigateur.document > oElem = oPageHtml.all > …{traitement des données} > End Sub > > Sub Wait_Chargement(oIE As Object) > Do Until oIE.readyState = 4 > wait(1000) > Loop > End Sub > > Je me heurte à une erreur sur "readyState". > Merci de votre soutien. > Cordialement. > > > -- > Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour vous désinscrire > Les archives de la liste sont disponibles à > https://listarchives.libreoffice.org/fr/users/ > Privacy Policy: https://www.documentfoundation.org/privacy -- Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour vous désinscrire Les archives de la liste sont disponibles à https://listarchives.libreoffice.org/fr/users/ Privacy Policy: https://www.documentfoundation.org/privacy
[fr-users] Récuperation de donnée dans une page HTML
Bonjour Voici une nouvelle question envoyée à l'aide du formulaire de demande d'aide (http://fr.libreoffice.org/get-help/poser-une-question/). Si vous répondez, merci de penser à utiliser la fonction "répondre à tous" de votre logiciel de courrier électronique de façon que le demandeur reçoive une copie de votre réponse. Email:: jeanmichel.n...@yahoo.fr Sujet:: Récuperation de donnée dans une page HTML OS:: Windows 10 Version:: 5.4.x Question:: Bonjour, je souhaite remplir des cellules dans CALC avec les données d'un tableau sur un site Internet. Voici un extrait de mon code: Sub ouverture_Html() Dim oObj, oPageHtml, oNavigateur, oElem As Object oObj = createUnoService( "com.sun.star.bridge.OleObjectFactory" ) oNavigateur = oObj.createInstance( "InternetExplorer.Application.1" ) oNavigateur.visible = false oNavigateur.navigate( "{adresse}.html" ) Wait_Chargement( oNavigateur ) oPageHtml = oNavigateur.document oElem = oPageHtml.all …{traitement des données} End Sub Sub Wait_Chargement(oIE As Object) Do Until oIE.readyState = 4 wait(1000) Loop End Sub Je me heurte à une erreur sur "readyState". Merci de votre soutien. Cordialement. -- Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour vous désinscrire Les archives de la liste sont disponibles à https://listarchives.libreoffice.org/fr/users/ Privacy Policy: https://www.documentfoundation.org/privacy