Re: [fr-users] Récuperation de donnée dans une page HTML

2018-06-06 Par sujet jmpni...@laposte.net

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

2018-06-05 Par sujet yves dutrieux
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

2018-06-05 Par sujet Bob

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

2018-06-05 Par sujet Thierry Jeanneret
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

2018-06-05 Par sujet demande_aide_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