affichage d'une pop-up html à partir d'excel

**fantii** · 17/01/2008, 18h31

Bonsoir à tous

Voici ma question existentielle du moment : afin d’illustrer un formulaire de maintenance sous .xls et macros, j’aimerai accéder à des pop-up html. Ceci afin d’avoir un accès à des visus simplifiées mais aussi et surtout pour ne pas alourdir le fichier de base qui doit souvent faire des sauvegardes sur un réseau. Normalement les codes html activant une pop-up font parti d'une page qui dans ce cas présent n'existerait pas. Est-il possible de contourner ce problème ?

Merci d’avance pour votre aide !

Laurent

**SilkyRoad** · 17/01/2008, 18h39

bonsoir

Tu peux adapter cet exemple:
Comment afficher l'image d'un graphique dans une fenêtre html ?

bonne soirée
michel

**fantii** · 23/01/2008, 18h07

je vais essayer ça, merci

**fantii** · 13/03/2008, 16h51

Bonjour

J'ai testé le code de cet exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
 
Private Sub Visu1_Click()
 
Dim NomImage As String
Dim IE As Object
Dim Hauteur As Single, Largeur As Single
Hauteur = 420
Largeur = 735
 
NomImage = "C:\Check-List Numérique\illustrations notice\montage_OES.bmp"
Set IE = CreateObject("InternetExplorer.application")
IE.navigate "about:blank"
IE.document.Title = "Schéma de montage OES"
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 = "<html><IMG SRC='" & NomImage & "'</html>"
IE.Visible = True
 
End Sub

... mais celui-ci n'est pas tout à fait une pop-up (fenêtre fixe en taille et sans barre de défilement). Est-il possible malgré tout de parvenir à en créer une sous excel ?!? Si cela est impossible, existe-t-il malgré tout un code ou une méthode permettant de désactiver la barre de défilement de droite et de faire disparaître le titre implicite disgracieux que l'on retrouve en haut ?!? ("Micosoft Internet Explorer provided by blablabla" : voir l'image en pièce jointe)

Merci d'avance pour votre aide ou suggestion !

Laurent

**fantii** · 14/03/2008, 18h23

Je viens de m'apercevoir d'un "bug" étrange avec ce code

Si vous ouvrez, puis fermez plusieurs fois de suite la fenêtre HTML, le fichier plante à partir de la deuxième ouverture et affiche les erreurs suivantes :

Run Time error '2147467259 (80004005)' :
Method 'titke' of object 'DispHTML Document failed'

ou parfois

msbgox : Out of memory

Ces cas n'existent pas si une fenêtre IE indépendante est déjà ouverte ou si vous retirez du précédent code VBA la ligne concernant le titre de la fenêtre HTML (IE.document.Title = ...) Cette ligne ne peut fonctionner et être prise en compte que si celle-ci est placé plus bas : Par exemple juste avant la ligne "IE.document.body.innerHTML = ..."

Quelqu'un possède une explication à cette bizarrerie !?!

**ucfoutu** · 14/03/2008, 18h59

Bonsoir,

A première vue, tu crées plusieurs fois (sans jamais relibérer ta mémoire) l'objet IE !!!

affichage d'une pop-up html à partir d'excel

Macros et VBA Excel

Vue hybride

Discussions similaires

Partager

Partager