Beep et msgBox Excel [Résolu/Fermé]

Signaler
Messages postés
62
Date d'inscription
mercredi 8 juin 2011
Statut
Membre
Dernière intervention
23 avril 2012
-
Messages postés
62
Date d'inscription
mercredi 8 juin 2011
Statut
Membre
Dernière intervention
23 avril 2012
-
Bonjour,

Je voudrai faire en sorte que lors de l'affichage d'une msgbox, celle-ci soit accompagnée d'un "beep" d'excel. J'ai vu plusieurs codes pour ce beep, mais je n'arrive pas à l'intégrer dans ma macro,


voici le passage du code de la msgbox concernée :

Else: NombreErreur = NombreErreur + 1  
MsgBox (" Produit Non attendu : " & vbCrLf & vbTab & ean1 & vbCrLf & "!!!")


Lorsqu'Excel affiche cette msgBox, j'aimerai qu'un signal sonore l'accompagne pour avertir les utilisateurs.

Merci d'avance pour vos réponses !

2 réponses

Messages postés
16491
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
21 juillet 2021
3 195
Bonjour,

En toute 1° ligne de ton module(avant toutes les sub)

Private Declare Function Beep Lib "Kernel32" (ByVal Fq As Long, ByVal Tm As Long) As Long


et dans code 1°nombre:note; 2° nombre :durée
Beep 600, 800
MsgBox (" Produit Non attendu : " & vbCrLf & vbTab & ean1 & vbCrLf & "!!!")

tu peux enchainer les Beep pour jouer du Mozart (si,si)
Messages postés
62
Date d'inscription
mercredi 8 juin 2011
Statut
Membre
Dernière intervention
23 avril 2012

Super !

Merci !



Je vais éviter de faire une mélodie entière :P