création de popup sous VB

Question

Bonjour,

J'essaie de créer un popup en VB sous excel qui m'ouvre une fenetre IA pour afficher une aide.
Le problème c'est que parfois ça marche et parfois j'ai un message d'erreur qui me dit que la méthode title a échoué.
mon code est :

Sub Popup_primes()

Dim IE As Object
Dim Hauteur As Single, Largeur As Single
 
Hauteur = 200
Largeur = 250
 

'creation d'une fenetre internet explorer pour visualiser l'image du graphique
Set IE = CreateObject("InternetExplorer.application")

'définition de IE en tant que nouvel Objet
'rend IE visible
IE.navigate "about:blank"
IE.Document.Title = "Aide"
IE.addressbar = False
IE.MenuBar = False
IE.StatusBar = False
IE.Toolbar = False
IE.Width = Largeur
IE.Height = Hauteur
IE.Left = 120
IE.Document.body.innerhtml = "  Les colonnes du tableau doivent rester figées"
IE.Visible = True
 
End Sub


Quelqu'un peut-il me dépanner ?
Merci

Renfield · Answer

attend que le .Navigate ai terminé son job



Renfield - Admin CodeS-SourceS - MVP Visual Basic

Renfield · Answer

(voir la propriété readystate)


Renfield - Admin CodeS-SourceS - MVP Visual Basic

apetraud · Answer

Ok merci beaucoup, je vais essayer

Création de popup sous VB

3 réponses

Votre réponse

Discussions similaires