Lire un fichier flash (.swf) en vba Fermé

Question

Bonjour, 

Je voudrais savoir comment lorsque l'on ouvre un userform un animation au préalable choisie se lise. A la limite en cliquant sur un bouton.

Je crois que c'est possible mais malgrès les recherches je n'y arrive pas ! Quels sont les codes vba ?

Merci de me donner un réponse claire :)

JéSky

Configuration: Windows 7 / Firefox 3.6.13

Mytå · Answer

Salut le forum

Tu n'as pas du chercher beaucoup : Piloter une animation Flash en VBA

Mytå

JéSky · Answer

Merci Mytå j'avais vu le lien mais je n'ai pas les mêmes versions ! 
Je n'ai dans ma verions vba pas de "ShockWave Flash Object" ...

Quelqu'un d'autre?

Mytå · Answer

Re le forum

Avec quoi lis tu tes fichiers .swf ?

Quelle est ta version Excel ?

A te relire
Mytå

JéSky · Answer

Je lis les fichiers avec GeoVid Flash Player
Ma version est excel 2007 ou 2010 selon les PC (donc dis moi ce qui t'arrange)
Au moins ou est "Shokwave Flash Object" ?
Sinon pas grave mais j'aimerais bien apprendre :)


JéSky

JéSky · Answer

J'ai trouvé sur excel 2007 l'objet et j'ai mis ce code 

Private Sub ShockwaveFlash1_OnReadyStateChange(ByVal newState As Long)
'Chargement du fichier .swf
ShockwaveFlash1.Movie = "C:\cdt.swf"
'Lecture
ShockwaveFlash1.Play
End Sub

Mais rien ne se lance lors de l'ouverture de l'UserForm. Pourquoi?

Help !

JéSky

JéSky · Answer

Personne ?

JéSky · Answer

up !

Paf · Answer

bonjour

je n'ai pas pu le reproduire sur excel, mais j'avais fait ça sous VB6.

peut-être que cette adaptation pourrait marcher:

dans la sub UserForm_Activate() de la Userform (qui supporte l'objet ShockwaveFlash1) :
ShockwaveFlash1.Movie = "C:\cdt.swf"