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

Version imprimable

17/01/2008, 18h31
fantii

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

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
17/01/2008, 18h39
SilkyRoad

bonsoir

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

bonne soirée
michel
23/01/2008, 18h07
fantii

je vais essayer ça, merci :D

1 pièce(s) jointe(s)

Bonjour :)

J'ai testé le code de cet exemple :
Code:

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

14/03/2008, 18h23
fantii

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 !?!
14/03/2008, 18h59
ucfoutu

Bonsoir,

A première vue, tu crées plusieurs fois (sans jamais relibérer ta mémoire) l'objet IE !!!
14/03/2008, 19h26
fantii

même lorsque tu clotures le premier affichage et que tu réouvres à partir de la 2ème fois ça plante...aucune autre fenêtre n'étant à l'écran :(
14/03/2008, 19h31
ucfoutu

Relis-moi et relis ton code...

A quel moment detruis-tu ce que tu crées ???
14/03/2008, 19h36
fantii

OK. Si ce que tu demandes est nécessaire à quel moment peut-on le faire réellement ?!? Et pourquoi en déplaçant ou supprimant la ligne "title" cela devient inutile ou alors j'ai rien compris... ce qui est possible lol
15/03/2008, 09h25
fantii

Existerait-il dans ce forum au moins une âme charitable qui pourrait répondre à une question lorsque les problèmes deviennent ambigus ou délicats 8O ? Merci d'avance et dans tous les cas bonne journée à vous (...)
15/03/2008, 09h32
ucfoutu

Bonjour,

charitable ?

Est-il vraiment si dur de comprendre ce à quoi pourrait servir un simple :

Code:

Set IE = Nothing

?

Ou encore :

- soit tu crées IE une seule fois (et pas par ton évènement Click) et tu t'y réfères ensuite
- soit tu le laisses dans le click mais ne le crées que si non déjà existant

C'est là évident ...

J'ajoute que, quel que soit la méthode utilisée, il est bon de ne pas quitter ton appli sans le zigouiller de toutes manières...
15/03/2008, 12h19
fantii

Bonjour,

Désolé mais peut-être et à la différence avec toi, je n'ai que quelques semaines de VBA dans les pattes... Tu veux bien m'expliquer à quel moment et endroit tu placerais cette ligne de code ? A priori juste avant de créer et afficher la fenêtre demandé mais dans ce cas qu'efface-t-on ? Tout ce qui est IE ? Ce qui est juste en mémoire ?

Merci d'avance pour ton retour

Laurent

Dans le cas inverse ou la destruction est impossible à coller quelque part, comment vérifierai-tu l'existant ?
15/03/2008, 12h23
ucfoutu

Hé bé ...

Voilà qui justifie une expression que j'emploie souvent en matière de prise de volant d'une Formmule1 sans avoir appris à conduire une 2 CV !!!

Lis alors mon édit (il est clair). Si là aussi celà t'échappe, reviens à des choses correspondant aux connaisances que tu as déjà acquises ...
J'ai un copain qui a perdu un moniteur (écran) pour avoir copié-collé et exécuté ce qu'il ne maîtrisait pas .... et il peut quelquefois arriver bien pire ...;)
15/03/2008, 12h33
fantii

pffff... ton post transpire le soutien (je plaisante) et les non réponses :? bin écoute... merci à toi, je vais faire comme d'hab, y arriver par mes propres moyens et sans cramer un écran lol
15/03/2008, 13h18
ucfoutu

Les réponses, ami, tu les as eues...

Et à un niveau en parfaitre adéquation avec celui du code montré ...;)

J'espérais me trouver dans ce cas d'adéquation (qui, de surcroit, serait valable pour toute autre application créant des objets... et de la même manière et pour les mêmes raisons....). Ce n'est pas le cas ? ===>> je me suis alors trompé en participant...

Amitiés.