Bonsoir,

Sur un site internet professionnel, je dois uploader des fichiers en masse. Donc j'ai décidé d’interagir avec le site internet en VBA (grâce au super tuto de @Qwazerty). Tout se passait bien pour ouvrir les différentes pages et menus mais lorsque la fenêtre pour charger le fichier s'ouvre, je n'ai plus du tout la main (la macro VBA est en attente) et je ne récupère le contrôle qu'à la fermeture de cette fenêtre. Donc je ne peux pas sélectionner en auto le fichier désiré.

Ne pouvant pas mettre mon code d'origine ici, j'ai créé l'exemple ci-dessous avec un page internet public qui reprend parfaitement à mon problème:

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
Sub essai()
 
    Dim IE As New InternetExplorer
    Dim IEDoc As HTMLDocument
 
 
    ' Ouverture de la page internet
    IE.navigate "https://fr.imgbb.com/"
    IE.Visible = True
    Do While IE.readyState <> 4 Or IE.Busy: Loop    
 
    'On pointe la page
     Set IEDoc = IE.document
 
     'On clique sur Commencer l'envoi
     Set HtmlElementStandard = IEDoc.getElementsByClassName("btn btn-big blue").Item
     HtmlElementStandard.Click
 
     'Message pour avertir que la macro continue
     a = MsgBox("Youpi, j'ai la main")     
 
End Sub
J'ai trouvé des pistes mais çà ne marche pas. Mais ca me parait logique car mon code VBA étant bloqué après le clic sur le bouton et l'ouverture de la nouvelle fenêtre. Donc il ne continue pas dans les ligne de commande en dessous HtmlElementStandard.Click

https://www.developpez.net/forums/d1.../#post10886809


D'avance merci pour vos propositions
Cordialement