Erreur d'execution "91"

Bonsoir a tous ,

j'espere que vous pourrez m'eclairer sur ce message dans mon code qui fonctionne est soudain je le message cité en titre , malgre plusieurs recherche en vain je suis bloque

le code est le suivant :

Dim IEDoc As Object

Dim sws As SHDocVw.ShellWindows

Dim strURL As String

Dim n As Integer

strURL = "

"

Set sws = New SHDocVw.ShellWindows

'Cycle through all open IE windows and assign the window whose URL matches strURL

For n = 0 To sws.Count - 1

If Left(sws.Item(n).LocationURL, Len(strURL)) = strURL Then

Set IEDoc = sws.Item(n).Document

sws.Item(n).Visible = True

Exit For

End If

Next n

le message s'affiche sur la ligne mis en gras

je vous remercie d'avance de votre aide

Bonjour,

Tout d'abord, peux-tu accéder à ton URL ... en direct ..???

Ensuite, quelle est l'utilité d'avoir plusieurs fenêtres de browsers ...???

Rechercher des sujets similaires à "erreur execution"