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, [email protected] 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:: [email protected] > 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 à [email protected] 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 à [email protected] pour vous désinscrire Les archives de la liste sont disponibles à https://listarchives.libreoffice.org/fr/users/ Privacy Policy: https://www.documentfoundation.org/privacy
