Pb avec WebBrowser1 à l'ouverture du fichier excel

Résolu/Fermé
PYGOS69 Messages postés 331 Date d'inscription jeudi 23 août 2012 Statut Membre Dernière intervention 1 février 2023 - Modifié par PYGOS69 le 13/07/2015 à 19:07
Le Pingou Messages postés 11442 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 6 février 2023 - 14 juil. 2015 à 23:48
Bonjour,

J'ai une image animée dans une fenêtre sur l'onglet "BD".

Lorsque je veux ouvrir de nouveau mon fichier j'ai 2 messages :

un message qui m'alerte sur l'initialisation des contrôles ActiveX....

Et un deuxième message qui m'indique que :

Impossible de sortir du mode création, le contrôle 'WebBrowser1' ne peut pas être créé.

Comment éviter ces 2 messages et laisser l'image animée active !

vba : onglet BD
Private Sub Worksheet_Activate()
Range("A1").Select
Dim S As String
Dim Hauteur As Long, Largeur As Long
S = "D:\Documents\muppet3.gif"
PlaySound "D:\Documents\mus.wav", ByVal 0&, SND_FILENAME Or SND_ASYNC
WebBrowser1.Navigate [h21].Value
End Sub

Le mode création reste actif !!

Merci d'avance,
Pygos69

http://www.cjoint.com/c/EGnrgCHxLoK

excel2003

A voir également:

5 réponses

Le Pingou Messages postés 11442 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 6 février 2023 1 333
13 juil. 2015 à 23:10
Bonjour,
Pouvez-vous me fournir les objets [muppet3.gif] et [mus.wav].. ?
Merci

0
PYGOS69 Messages postés 331 Date d'inscription jeudi 23 août 2012 Statut Membre Dernière intervention 1 février 2023 13
14 juil. 2015 à 01:01
Oui !

Merci d'avance !

http://www.cjoint.com/c/EGnw5fNg6JK
(pour le gif)

https://www.cjoint.com/c/EGnxakpOjMK
(pour le WAV), version mp3 jointe car le fichier wav = 30 MO

Cordialement,
0
Le Pingou Messages postés 11442 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 6 février 2023 1 333
14 juil. 2015 à 15:41
Bonjour,
Merci pour les fichiers.
Pouvez-vous préciser à la suite de quelle intervention le problème est apparu ?

0
PYGOS69 Messages postés 331 Date d'inscription jeudi 23 août 2012 Statut Membre Dernière intervention 1 février 2023 13
Modifié par PYGOS69 le 14/07/2015 à 16:00
Bonjour,

Lors de la création , pas de problème :

Affichage puis barre d'outils, puis boite à outils contrôle puis Activation du mode création, puis Autres contrôle, puis sélection Microsoft Web Browser

(=INCORPORER("Shell.Explorer.2";"")......désactivation du mode création.....

ensuite chemin dans cellule H21 (Feuil1)

D:/Documents/muppet3.gif

Ensuite macro VBA :

Private Sub Worksheet_Activate()
Range("A1").Select
Dim S As String
Dim Hauteur As Long, Largeur As Long
S = "D:\Documents\muppet3.gif"
PlaySound "D:\Documents\mus.wav", ByVal 0&, SND_FILENAME Or SND_ASYNC
WebBrowser1.Navigate [h21].Value
End Sub

Puis retour à Feuil2 et orsque je passe à Feuil1 L'image animée s'active dans WebBrowser1...

Tous les fichiers sont enregistrés au même endroit (classeur, gif, wav)

Le problème vient lorsque je ferme le classeur et que je l'ouvre à nouveau ....

un message qui m'alerte sur l'initialisation des contrôles ActiveX....

Et un deuxième message qui m'indique que :

Impossible de sortir du mode création, le contrôle 'WebBrowser1' ne peut pas être créé.

Merci !
0
Le Pingou Messages postés 11442 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 6 février 2023 1 333
Modifié par Le Pingou le 14/07/2015 à 18:17
Bonjour,
Merci pour les informations.
Je n'ai pas trouvé ce contrôle sur la feuille ..... De plus pour l'instant il m'est impossible d'installer un nouveau contrôle [Microsoft Web Browser].pour voir ou se situe le problème... !

En plus qu'elle est la version de votre MS Office...?

Salutations.
Le Pingou
0
PYGOS69 Messages postés 331 Date d'inscription jeudi 23 août 2012 Statut Membre Dernière intervention 1 février 2023 13
14 juil. 2015 à 18:46
EXCEL 2003 SP3

En effet, il est présent sur la feuille mais invisible pourquoi ?

Je pense que il ya une confusion entres plusieurs lignes sur vba

le même contrôle sans rien d'autre fonctionne...
(voir exemple ci-après)

http://www.cjoint.com/c/EGoqSV8IRMK
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Le Pingou Messages postés 11442 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 6 février 2023 1 333
14 juil. 2015 à 23:48
Bonsoir,
Eh non c'est le même problème.
Qu'elle est la version MS Office..... ?

0