déclencher un son et continuer la procédure

[ZZR09]

Bonsoir à tous,

Voici mon problème: j'ai un compte à rebours qui déclenche un son lorsqu'il arrive à 0 puis, une fois le son terminé, il fait clignoter la Userform.

En fait je voudrais déclencher le son ET faire clignoter la Userform simultanément.
j'ai bien fait quelques tentatives avec Do... DoEvents... Loop until off =true
mais sans succès: la Userform clignote après que le son soit terminé.

Pour vous éviter de chercher: le déclenchement se situe à la fin du bouton Go/Arrêt de la userform:
'lancer le clignotement et le son
Clignoter:
Call LancerSon
Call Clignote

le fichier compressé contient deux fichiers à décompresser dans le même dossier.
merci d'avoir lu
ZZR09

 

[tototiti2008]

Re : déclencher un son et continuer la procédure

Bonsoir ZZR09,

visiblement, comme ça :

Call sndPlaySound32(ActiveWorkbook.Path & "\son.wav", 1)

des infos sur le 2ème argument par là :

Playing A Sound In VBA

 

[ZZR09]

Re : déclencher un son et continuer la procédure

Bonjour tototiti2008,
impeccable, ça fonctionne comme souhaité et le indications données en suivant ton lien permettront d'aller encore plus loin.
A+
ZZR09