Problème sur l'interaction de Excel avec IE 7 (Sharepoint 2007)

[licwimi]

Bonjour,

J'aimerais récupérer des données directement sur certaines pages sharepoint 2007(droits d'accès, structures d'espace) et manipuler certains espaces pour remplir automatiquement des formulaires.

Voici mon code :

'Activer références suivantes :
'   - Microsoft HTML Objects Library
'   - Microsoft Internet Controls
'   - Microsoft shell control et automation

Sub PremierIE()
'Déclaration des variables
Dim IE As New SHDocVw.InternetExplorer
    
    'Chargement d'une page web google
    IE.Navigate "www.google.fr"
    
    'Affichage de la fenêtre IE
    IE.Visible = True
       
    'On attend le chargement complet de la page
    WaitIE IE
    
    'On libère la variable IE
    Set IE = Nothing
    
End Sub

Sub WaitIE(IE As InternetExplorer)
'On boucle tant que la page n'est pas chargée entièrement
Do Until IE.ReadyState = READYSTATE_COMPLETE
    DoEvents
Loop
End Sub

Le code fonctionne, la page google sur internet explorer (j'ai IE 7 - mon entreprise n'est pas passé à mieux...) et Office 2007. Malheureusement le contenu de mon espion reste désespérement vide (espion sur IE, point d'arrêt placé sur IE.Visible ou Set IE = Nothing). quand je clique sur le "+" à côté de la variable IE, il me met <aucune variable> dans la colonne valeur.

Et un autre problème avec WaitIE, Il pose problème avec la ligne Do Until IE.ReadyState = READYSTATE_COMPLETE. Une fenêtre me dit :
" Erreur Automation
L'objet invoqué s'est déconnecté de ses clients"

Si quelqu'un peut m'aider ça serait vraiment cool ...

merci d'avance