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 :

Executer un javascript sur une page web


Sujet :

Macros et VBA Excel

  1. #1
    Futur Membre du Club
    Profil pro
    Inscrit en
    Mars 2013
    Messages
    7
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2013
    Messages : 7
    Points : 5
    Points
    5
    Par défaut Executer un javascript sur une page web
    Bonjour,

    C'est mon premier post sur le forum donc bonjour à tous!

    Je souhaite exécuter un Javascript sur une page web en utilisant VBA.

    Le site est le suivant : http://jsfiddle.net/gh/get/jquery/1....s/chart-print/

    J'aimerais imprimer le graphique automatiquement, le graphique seul comme lorsque l'on clique sur le bouton "Print Chart". Cependant je n'arrive pas à cliquer sur le boutton en le sélectionnant ou à lancer directement le script.

    L'objet chart est un highchart, on peut trouver sa documentation ici: http://api.highcharts.com/highcharts#Chart.print()

    Voici mon code:

    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
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
     
    Sub test()
     
     
    Dim IE As New InternetExplorer
    Dim IEDoc As HTMLDocument
     
     
    IE.navigate "http://jsfiddle.net/gh/get/jquery/1.7.2/highslide-software/highcharts.com/tree/master/samples/highcharts/members/chart-print/"
     
     
    IE.Visible = True
     
     
    Application.Wait Now + TimeValue("0:00:03")
     
     
    Do Until IE.readyState = READYSTATE_COMPLETE
        DoEvents
    Loop
     
     
    Set IEDoc = IE.document
     
     
    Call IEDoc.parentWindow.execScript("Print()", "JavaScript")
     
     
    IE.Quit
     
    end sub
    Là j'arrive à imprimer la page, mais pas à reproduire ce que ça donne lorsque l'on clique sur le bouton d'impression du graph.

    Merci pour votre aide,

    Seka

  2. #2
    Inactif  

    Homme Profil pro
    cuisiniste
    Inscrit en
    Avril 2009
    Messages
    15 374
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Var (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : cuisiniste
    Secteur : Bâtiment

    Informations forums :
    Inscription : Avril 2009
    Messages : 15 374
    Points : 12 068
    Points
    12 068
    Billets dans le blog
    8
    Par défaut heu
    bonjour

    regarde PAR ICI!!!!qwazerty te montre un exemple de comment actionner un bouton sur une page web

    au plaisir

  3. #3
    Futur Membre du Club
    Profil pro
    Inscrit en
    Mars 2013
    Messages
    7
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2013
    Messages : 7
    Points : 5
    Points
    5
    Par défaut
    J'ai déjà regardé le tuto de qwazerty qui est extrêmement bien fait.

    Cependant ici le bouton est incorporé dans l'objet Highchart ce qui fait que je ne peux pas y accéder par un getelementbyxx.

    Je dois pouvoir accéder à la fonction print du .js mais je ne sais pas comment faire depuis VBA...

    Quelqu'un d'autre à une idée ?

  4. #4
    Inactif  

    Homme Profil pro
    cuisiniste
    Inscrit en
    Avril 2009
    Messages
    15 374
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Var (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : cuisiniste
    Secteur : Bâtiment

    Informations forums :
    Inscription : Avril 2009
    Messages : 15 374
    Points : 12 068
    Points
    12 068
    Billets dans le blog
    8
    Par défaut re
    bonjour

    un exemple

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Call IE.document.parentWindow.execScript("nom_de_la_fonction()", "JavaScript")
    attention "IE" représente un instance de l'objet internet explorer

    ce qui implique que la page internet soit ouverte par vba (tuto de qwazerty)

    Au plaisir

Discussions similaires

  1. [AC-2010] Simuler un clic sur une page web sur une image javascript
    Par alex en droit dans le forum VBA Access
    Réponses: 2
    Dernier message: 02/04/2012, 13h22
  2. Insérer un executable sur une page Web
    Par laila morad dans le forum MATLAB
    Réponses: 4
    Dernier message: 12/06/2007, 14h26
  3. Obtenir des infos sur une page web en ligne
    Par Logan_Cale dans le forum Web & réseau
    Réponses: 1
    Dernier message: 20/08/2005, 15h36
  4. javascript sur une page creation flash mx
    Par hadjplasma dans le forum Général JavaScript
    Réponses: 3
    Dernier message: 17/08/2005, 12h06
  5. application qui connecte sur une page web
    Par spoolz dans le forum Entrée/Sortie
    Réponses: 6
    Dernier message: 14/04/2004, 09h47

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