Discussion :

[ImagineUneImage]

Bonjour,
Un grand merci à QWAZERTY pour ce tuto très très bien fait, qui m’a permis de développer une application très utile à mon bureau.
Je butte sur une difficulté à exploiter un script d’une page intranet.
Lorsque j’ouvre mon classeur Excel et que j’exécute la macro qui exploite un script de la page IE à l’aide de l’expression IEDoc.parentWindow.execScript, VBA m’indique une erreur d’exécution et me signale que je n’ai pas la permission d’exécuter le script.
Si je referme le deboger et que je relance la macro, cette fois la commande IEDoc.parentWindow.execScript exécute bien le script de la page IE.
Systématiquement la première fois que j’exécute cette macro ce bug se produit, puis il ne se produit plus tant que je n’ai pas fermé mon classeur.
L’un d’entre-vous aurait-il une explication.
Merci

[patricktoulon]

Bonjour regarde du coté gestions d'attentes parfois avec les sytem anti copie des pages web le do loop sur le ready ou le .busy ne suffit pas
un wait s'impose
sinon afin de gérer ce soucis transformar la commande en variable boolean avec

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
do 
set lacommande= iedoc.parentwindows.excec.....blablabla.
loop until lacommande=true

[ImagineUneImage]

Merci pour ta réponse Patrick, mais mais je ne m'en suis pas sorti avec do...Loop.
Par contre, comme le plantage de la macro ne se produit qu'une fois lors du démarrage d'excel, puis le plantage ne se reproduit plus, j'ai résolu mon problème en écrivant on error goto a (début de la macro) avant l’expression IEDoc.parentWindow.execScript,
La macro s’exécute une deuxième fois et sans plantage en cas d'erreur lors de la première exécution.
ça n'est pas très académique, mais ça marche.