Démarrer en musique

[breitzou]

Bonsoir le forum,

je souhaiterais pouvoir ouvrir un fichier excel avec une musique d'intro dès que je double clique sur le fichier. Je ne sais pas si cela est possible. Je ne sais pas du tout comment faire. J'ai trouvé quelques pistes mais rien de très précis par rapport à ma requête.

A l'aide!!!😀

Merci d'avance

Breitzou

 

[breitzou]

Re : Démarrer en musique

Ah oui j'oubliais!

S'il est possible d'ouvrir une musique au format MP3 ou WAV, cela m'arrangerait. Dans tous les cas, je suppose qu'il faut placer le code dans "ThisWorkbook".

Merci encore pour votre aide.

Breitzou

 

[JNP]

Re : Démarrer en musique

Bonsoir Breitzou 🙂,
Un fil qui doit contenir tout ce dont tu as besoin ICI.
Bonne soirée 😎

 

[kjin]

Re : Démarrer en musique

Bonsoir,
Dans ThisWorkbook

Private Sub Workbook_Open()
SicMu
End Sub

dans un module standard

Declare Function sndPlaySound32 Lib "winmm.dll" Alias "sndPlaySoundA" _
    (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long

Sub SicMu()
sndPlaySound32 "c:\...\...\xxx.wav", 0
End Sub

A+
kjin

 

[breitzou]

Re : Démarrer en musique

Bonsoir JNP et Kjin,

merci à vous deux pour vos conseils avisés.

Breitzou

 

[breitzou]

Re : Démarrer en musique

Bonsoir Kjin,

je viens de tester ton code et au démarrage du fichier, j'ai un beep qui retentit.
Je te mets le fichier en PJ.
Si tu peux dis-moi si quelque chose te choque à l'intérieur.

Merci d'avance

Breitzou

 

[kjin]

Re : Démarrer en musique

Re,
Chou-vert du chemin ? (à défaut d'artichaut)
Sur le bureau ?
A+
kjin

 

[breitzou]

Re : Démarrer en musique

Kjin,
Je te confirme que le chemin d'accès est bien le bureau.

As-tu une idée de la raison pour laquelle j'ai toujours ce beep?

Merci

Breitzou

 

[breitzou]

Re : Démarrer en musique

Ca y est ! En bidouillant, ça a marché !
Merci Kjin

A+

Breitzou

 

[kjin]

Re : Démarrer en musique

Re,

...En bidouillant, ça a marché !

😕, on ne veut pas mourrir idiot...
A+
kjin