IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Ouverture et recupere information de pages web Via VBA Excel [Toutes versions]


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Profil pro
    Inscrit en
    Juillet 2009
    Messages
    40
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2009
    Messages : 40
    Par défaut Ouverture et recupere information de pages web Via VBA Excel
    Bonjour à toutes et à tous,

    Je vous expose mon problème : Pour mon travail je souhaiterai créer une macro qui permet de récuperer des informations sur un site web. J'utilise donc ce morceau de code récuperé sur le net :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    Public Etat As String
    Public IE As New InternetExplorer                  '****** Internet Explorer
    Public LibelleLien As String                        '****** Libelle du lien IE
     
    Sub ConnectionIE()
     
    IE.Visible = True
    IE.Navigate2 "********************************"
     
     
    If Timer = False Then GoTo Error_Timer
     
    'défini la variable de la page web.
    Dim htmlDoc As HTMLDocument
    Set htmlDoc = IE.Document
    While htmlDoc.Title <> "********************"
    Wend
    Ce code permet bien l'ouverture d'Internet Explorer. Le souci c'est :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    IE.Navigate2 "http://********.fr/"
    Une nouvelle s'ouvre alors (parametre de l'entreprise que je ne peut modifier) donc en gros comment passer sur la deuxieme page et y recuperer des infos ?

    Merci par avance je suis dessus depuis 2h00 et je ne trouve pas de solution.

    Kocipia

  2. #2
    Rédacteur/Modérateur

    Avatar de Jean-Philippe André
    Homme Profil pro
    Architecte Power Platform, ex-Développeur VBA/C#/VB.Net
    Inscrit en
    Juillet 2007
    Messages
    14 682
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 41
    Localisation : Canada

    Informations professionnelles :
    Activité : Architecte Power Platform, ex-Développeur VBA/C#/VB.Net
    Secteur : Finance

    Informations forums :
    Inscription : Juillet 2007
    Messages : 14 682
    Par défaut
    salut,

    question bete, as-tu l'adresse de cette 2e page qui s'ouvre ? Est-elle accessible directement sans passer par la premiere page ??
    Cycle de vie d'un bon programme :
    1/ ça fonctionne 2/ ça s'optimise 3/ ça se refactorise

    Pas de question technique par MP, je ne réponds pas

    Mes ouvrages :
    Migrer les applications VBA Access et VBA Excel vers la Power Platform
    Apprendre à programmer avec Access 2016, Access 2019 et 2021

    Apprendre à programmer avec VBA Excel
    Prise en main de Dynamics 365 Business Central

    Coffrets disponibles de mes ouvrages : https://www.editions-eni.fr/jean-philippe-andre
    Pensez à consulter la FAQ Excel et la FAQ Access

    Derniers tutos
    Excel et les paramètres régionaux
    Les fichiers Excel binaires : xlsb,

    Autres tutos

  3. #3
    Membre averti
    Profil pro
    Inscrit en
    Juillet 2009
    Messages
    40
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2009
    Messages : 40
    Par défaut
    Bonjour et merci de m'aider.

    Ce code ouvre internet explorer met aucune pas web.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    IE.Navigate2 "********************************"
    Ce code ouvre le site demandé mais sur une seconde page.


    Je voudrais controler cette seconde page et non la première mais le reste de mon code ne marche que sur la première qui reste vierge

    Donc si je peut ouvrir dicrectement la seconde page et la controler ce serait impeccable.

    Merci par avance.

    En gros, il me faudrait une ligne de ce genre :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    IE.Visible = "http://SITE.fr/" = True
    Donc qui m'ouvre Internet Explorer directement sur cette page.

  4. #4
    Membre habitué
    Inscrit en
    Mars 2009
    Messages
    13
    Détails du profil
    Informations forums :
    Inscription : Mars 2009
    Messages : 13
    Par défaut
    Quel type d'infos souhaites tu récupérer? Un fichier pdf, xls?

  5. #5
    Membre averti
    Profil pro
    Inscrit en
    Juillet 2009
    Messages
    40
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2009
    Messages : 40
    Par défaut
    Du tout, je dois naviguer dessus.

    Je le fais chez moi et ça fonctionne bien. Le problème c'est cette seconde page qui s'ouvre et ma macro qui ne la detecte pas et reste figé sur la première.

  6. #6
    Membre habitué
    Inscrit en
    Mars 2009
    Messages
    13
    Détails du profil
    Informations forums :
    Inscription : Mars 2009
    Messages : 13
    Par défaut
    Ok je demande ça parce que dans ton premier message tu indiques :
    je souhaiterai créer une macro qui permet de récuperer des informations sur un site web
    Du coup je peux pas trop t'aider si tu souhaites naviguer dessus

    Regarde peut etre du côté de AppActivate pour aller sur ta deuxième fenetre

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. modifier page web via un cms
    Par sevy1881 dans le forum Langage
    Réponses: 1
    Dernier message: 28/07/2010, 18h20
  2. Acces a une page web via HttpWebRequest
    Par olibara dans le forum C#
    Réponses: 11
    Dernier message: 21/07/2010, 17h49
  3. Problème ouverture une applet dans une page web
    Par choko83 dans le forum Applets
    Réponses: 0
    Dernier message: 16/12/2009, 17h03
  4. Page web via CGI générée par un exe (en C++)
    Par Fabien50 dans le forum Débuter
    Réponses: 0
    Dernier message: 08/12/2008, 19h59
  5. Ouverture et lecture d'une page web avec openStream()
    Par macinteuch dans le forum Entrée/Sortie
    Réponses: 2
    Dernier message: 01/05/2008, 13h11

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo