Récupérer données page HTTPS

[lematou]

Bonjour à tous,

Voilà ma question :

Je récupérer les informations contenues dans une feuille HTTPS que j’ouvre avec un login et mot de passe, en sélectionnant la zone qui m’intéresse et je fais copier/coller dans une feuille Excel.
Ensuite dans Excel je traite les informations et j’envoie en automatique, un mail pour que les personnels du serveur puisse corriger.
Mais je fais ça 200 fois par jour et le copier coller prend du temps.
(5 à 7 secondes de téléchargement)
Y a-t’il un moyen d’automatiser le processus en passant par le bloc note ? La source de la page ?? Ou autre ruse style automate. Je précise que je connais Excel mais pas bien VBA ni les scripts d’un d’explorateur.

Merci à tous. Toutes les pistes seront bienvenues.

 

[vbacrumble]

Re : Récupérer données page HTTPS

Bonjour


Va faire un tour dans la FAQ du forum

Notamment les pages réalisées par MichelXLD

(Piloter Internet Explorer avec Excel )

 

[lematou]

Re : Récupérer données page HTTPS

Rebonjour
Ben j'ai pas trouvé dans la FAC: et c'est pas faute d'avoir pertsisté.
Mais " piloter internet explorer avec excel" je trouve pas.
Peux-tu me dire la démarche à faire ( la bonne bien sûr).
Merci. Mais attention il s'agit d'un HTTPS

 

[vbacrumble]

Re : Récupérer données page HTTPS

Re


Tu as été voir ici précisément ?

https://www.excel-downloads.com/threads/ref-wiki-page-7-de-michelxld.92375/

 

[lematou]

Re : Récupérer données page HTTPS

Rebonjour,
J'étais déjà allé sur ces pages en passant par google direct (MichelXLD) on tombe dessus mais je n'aipas trouvé de réponse.
NI là: Lien vers la wiki page 3 😛iloter d'autres applications depuis Excel , Piloter ( Word , Outlook , Power Point ) , Les fichiers texte.

Cela ne concerne pas mon problème.

Je veux importer une feuille web httpS(enfin ,une partie) dans excel. Sans utiliser le copier/coller mais avec une macro excel.
Y a-t'il quelqu'un qui sait???
Merci

 

[vbacrumble]

Re : Récupérer données page HTTPS

Re


Mon lien indique la page 7

On va finir par y arriver

Autrement utilises le moteur de recherche du forum.

mot-clé: HTTPS

PS: tu avais déjà posté une question à ce sujet.

 

[lematou]

Re : Récupérer données page HTTPS

Oui j'avai dejà posé la question,
Mais la personne me demandait le lien dans le code source et il n'y en avait pas , sinon celui du site lui-même commençant par HTTPS://.........

En tout cas j'ai reussi à trouver la page 7 (commentaires mais elle ne me sert pas, ou bien je ne sais pas l'utiliser.
Mais dis-moi c'est pas fastoch du tout d'arriver à ta faq.
Merci beaucoup quand même.
Au fond extraire un tableau d'une page web et le mettre dans une feuille excel c'est finalement pas possible si je comprends bien?

 

[vbacrumble]

Re : Récupérer données page HTTPS

Re

La FAQ est accessible ici:
Questions les plus fréquentes (FAQ) et didacticiels - Excel Downloads Forums

Extrait de la page 7 des pages de MichelXLD
-Accéder à un objet input spécifique

 Sub piloterPageHTML()
    'nécessite d'activer les références
    'Microsoft HTML Objects Library et Microsoft Internet Controls
    Dim IE As internetExplorer
    Dim maPageHtml As HTMLDocument
    Dim Helem As IHTMLElementCollection
    Dim Hx As IHTMLInputElement
    Set IE = createObject("internetExplorer.Application")
    IE.Visible = True
    IE.navigate "http://www.leSite.fr"
    Do Until IE.readyState = READYSTATE_COMPLETE
    doEvents
    Loop 'attend la fin du chargement
    Set maPageHtml = IE.document
    Set Helem = maPageHtml.getElementsByTagName("input")
    Set Hx = Helem.Item("number") 'Définit le champ Input contenu dans la page
    Hx.Value = "07;11;25;27;34" 'Insere les données 
    End Sub

Et en utilisant le moteur de recherche du forum comme je te l'ai dis avant

tu trouveras des fils de discussion concernant HTTPS.

 

[vbacrumble]

Re : Récupérer données page HTTPS

Bonsoir


Voici un exemple d'automation d'IE avec Excel.
(ici pour se connecter sur un site https
bien sur il faut adapter l'adresse du site et adaopter selon le code source HTML de la page ou tu te connectes

Mais en faisant des recherche avec des éléments de ce code

Tu devrais trouver comment récupérer par macro le contenu d'une page Web.

Option Explicit
Const strURL_c As String = "https://www.domaine.com"
Const strUsr_c As String = "User"
Const strPwd_c As String = "Password"
Sub SwebLogin()
    Dim objIE As SHDocVw.InternetExplorer
    Dim ieDoc As MSHTML.HTMLDocument
    Dim tbxPwdFld As MSHTML.HTMLInputElement
    Dim tbxUsrFld As MSHTML.HTMLInputElement
    Dim btnSubmit As MSHTML.HTMLInputElement
    Set objIE = New SHDocVw.InternetExplorer
    objIE.Navigate strURL_c
    Do Until objIE.ReadyState = READYSTATE_COMPLETE
    Loop
        Set ieDoc = objIE.document
        objIE.Visible = True
        Set frm = ieDoc.frames(0).document.forms
        Set tbxUsrFld = frm(0).all.Item("txtUserId")
        Set tbxPwdFld = frm(0).all.Item("txtPassword")
        Set btnSubmit = frm(0).all.Item("submit")
        tbxUsrFld.Value = strUsr_c
        tbxPwdFld.Value = strPwd_c
        frm(0).submit
    Do Until objIE.ReadyState = READYSTATE_COMPLETE
    Loop
End Sub

Tout en te rappelant qu'il me semble bien que les pages de MichelXLD
parle de cela aussi.

 

[lematou]

Re : Récupérer données page HTTPS

Je te remercie beaucoup, Bonjour au forum,

En effet j'ai trouvé où se trouve la faq et comment utiliser le moteur de recherche qui s'appelle d'ailleurs RECHERCHER.
D'autre part en fouillant dans cette faq à la page 7 je n'arrive pas à trouver les codes que tu me proposes?? je suis un peu bigleux faut dire.
Une question: ça veut dire quoi activer les références ...librairie? C'est dans visual basic éditor? Je vais voir sur google
Il y a un mois que je cherche ( mal, j'en suis conscient) et demain je m'y remets.
Je vais essayer avec tes conseils et le moteur de recherche ,mais j'avoue que je m'embrouille ( je suis un peu une quiche en VBA que j'utilise mais qui m'échappe) J'ai deux bouquins dessus mais faut du temps.
A bientôt. Je te tiens au courant si j'y arrive.🙂🙂

 

[lematou]

Re : Récupérer données page HTTPS

Merci vbacrumble
J'ai trouvé les références dans VBE outils référence.

 

[ledzepfred]

Re : Récupérer données page HTTPS

Bonsoir lematou (miaou)

re vbacrumble🙂

en complément de la réponse va voir el lien ci-joint peut-être t'interessera-t'il.

https://www.excel-downloads.com/thr...nce-entre-deux-villes-via-google-maps.106712/

a+

 

[lematou]

Re : Récupérer données page HTTPS

Bonsoir VbaCrumble et le forum

je n'ai pas la réponse à ma question.
Le code
Option Explicit
Const strURL_c As String = "https://www.domaine.com"'remplcé par monsite
Const strUsr_c As String = "User"
Const strPwd_c As String = "Password"
Sub SwebLogin()
Dim objIE As SHDocVw.InternetExplorer
Dim ieDoc As MSHTML.HTMLDocument
Dim tbxPwdFld As MSHTML.HTMLInputElement
Dim tbxUsrFld As MSHTML.HTMLInputElement
Dim btnSubmit As MSHTML.HTMLInputElement
Set objIE = New SHDocVw.InternetExplorer
objIE.Navigate strURL_c
Do Until objIE.ReadyState = READYSTATE_COMPLETE
Loop
Set ieDoc = objIE.document
objIE.Visible = True
Set frm = ieDoc.frames(0).document.forms
Set tbxUsrFld = frm(0).all.Item("txtUserId")
Set tbxPwdFld = frm(0).all.Item("txtPassword")
Set btnSubmit = frm(0).all.Item("submit")
tbxUsrFld.Value = strUsr_c
tbxPwdFld.Value = strPwd_c
frm(0).submit
Do Until objIE.ReadyState = READYSTATE_COMPLETE
Loop
End Sub

Plante sur SwebLogin().
Et le lien que me propose Ledzepfred ne concerne pas du tout les sites https.
Alors je repose ma question:
J'ouvre un site HTTPS, je vais sur la troisieme page de ce site et là " et seulement là "je veux récupérer les deux tableaux de cette page et les coller dans excel ( mais san faire copier/coller).
Y-a-t'il une solution??? En VBA VB ou autre?
Merci à tous.
Je cherche depuis 2 mois.

 

[vbacrumble]

Re : Récupérer données page HTTPS

Re

EDITION: après quelques recherches , voici un exemple fonctionnel pour http.
En cherchant , tu devrais facilement adapter pour Https:

Pour tester : clique sur le mot LANCER de la feuille TEST
Regarde la pièce jointe exemplehttp.zip



Je suis sur que dans les pages de MichelXLD, il y a un code VBA qui permet de récupérer le contenu d'une page Web.

Déjà beaucoup d'informations dans ce fichier.
webbrower

Toujours dans la page 7 des pages de MichelXLD
Ce chapitre:
Enregistrer une page Html dans un document Word

 

[lematou]

Re : Récupérer données page HTTPS

Je te remercie Beaucoup

Cela ne marche pas pour le site https que je veux utiliser!!!!
Je vais suivre ton conseil et me replonger dans les notes fde MichelXLD notament la 7 que j'ai déjà lueen entier et je vais bien voir.

Pourtant sur un site bancaire par exemple cela marche????
Je pigepas.
A bientôt