Fichier sonore timer

Bonjour a tous,

Je souhaite ajouter à une de mes macros, le déclenchement automatique d'un son un peu plus élaboré que "Beep".

J'ai effectuer des recherches sur le forum et tous indique d'utiliser "PlaySound" toutefois il y a une erreur de compilation "Sub non définie" dans ma tentative.

Quelle étape ai je bien pu manquer? Merci d'avance :D

Bonjour,

Si tu veux une réponse envoi nous ta macro

A+

Elle est très simple et tout fonctionne lorsque je met Beep. Elle lis la valeur de la case active et déclenche un timer de la durée adéquate:

Code:

---

1 2 3 4 5 6 7 8 9 10

Sub maMacro() Wait (ActiveCell.Value) ActiveCell.Interior.ColorIndex = 3 Beep 'c'est ici que j'aimerais ajouter PlaySound End sub   Sub Wait(K) Application.Wait Time + TimeSerial(0,0,K) End sub

---

Bonjour,

voir les exemples dans le bon forum ‼


_____________________________________________________________________________________________________
Je suis Charlie, Bardo, Sousse

Bonjour,

Je te propose d'aller jeter un œil à mon problème, tu trouvera la solution au tien :)
http://www.developpez.net/forums/d15...s/#post8352411
Tu trouvera peut être un nouveau problème par la même occasion puisque de mon coté tout se passait bien jusqu’à ce que j'ajoute le son à mon timer. En effet, le son ralentit pas mal l’exécution de ma macro et le chrono en devient saccadé... Dommage pour un chrono.

Cdt

Bonjour,

le chrono est saccadé car la procédure de son est paramétrée pour geler l'exécution du code !

Rien qu'avec la bibliothèque winmm.dll, il y a pourtant deux fonctions permettant de jouer le son
sans geler le code principal : mciExecute & PlaySound ! Suffit de consulter leur documentation sur MSDN …

Je n'en dirais pas plus car ici c'est le forum des formules Excel ! Sans compter les exemples dans le forum dédié au VBA …

_____________________________________________________________________________________________________
L'effort fait les forts …