Bonjour à tous,

le titre n'est peut-être pas très juste, mais voilà le soucis :

Depuis Access, j'ouvre Internet Explorer avec le module suivant :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
Sub OuvertureIe()
 
    Dim ie As Object
 
    Set ie = CreateObject("InternetExplorer.Application")
    ie.Visible = True
 
End Sub
Dans un autre module (obligatoirement un autre module !!), je voudrais pouvoir pilote le même Object, et j'utilise :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
    Dim ie As Object
    Dim Url(2) As Variant 'Page Web à parcourir
    Dim i As Integer
 
    Set ie = GetObject(, "InternetExplorer.Application")
    'ie.Visible = True
 
    Url(0) = "L'adresse à atteindre.html"
    ....
Mais j'obtiens une erreur sur
Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Set ie = GetObject(, "InternetExplorer.Application")
avec le message : Erreur d'excécution '429' - Un composant ActiveX ne peut pas crééer d'objet".

Qu'elle est la syntaxe correcte pour réaliser celà ???

Merci d'avance pour l'aide.
Curt