VBA Internet Explorer Control Insérer image
Bonjour à tous,
D'abord, merci à Qwazerty pour son tuto Internet Explorer c'est une vrai mine d'or.
Voila mon problème :
J'essaie d'insérer une image afin de la publier dans une page web sur explorer. Je clique sur le bouton "insérer image" que j'ai trouver dans le code html de la page et la fenêtre "ouvrir" de windows s'ouvre. À partir de là, je cherche comment dire quel image insérer (url) et cliquer sur ouvrir dans cette boite. (J'espère que c'est clair). Voici une partie du code.
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
Sub Test()
Dim IE As New InternetExplorer
Dim IEDocs As HTMLDocument
IE.navigate "http://www.exemple.com"
IE.Visible = True
WaitIE IE
Set IEDocs = IE.document
IEDocs.body.all("ImageUploadButton").Click
'La boite s'ouvre
'....
Set IE = Nothing
Set IEDocs = Nothing
End Sub |
