Sujet Précédent Sujet Suivant

Beep et msgBox Excel

Résolu/Fermé
Edaine Messages postés 62 Date d'inscription mercredi 8 juin 2011 Statut Membre Dernière intervention 23 avril 2012 - Modifié par Edaine le 21/06/2011 à 10:27
Edaine Messages postés 62 Date d'inscription mercredi 8 juin 2011 Statut Membre Dernière intervention 23 avril 2012 - 21 juin 2011 à 11:13
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 !

A voir également:

2 réponses

Réponse 1 / 2
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
21 juin 2011 à 10:56
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)
0
Réponse 2 / 2
Edaine Messages postés 62 Date d'inscription mercredi 8 juin 2011 Statut Membre Dernière intervention 23 avril 2012
21 juin 2011 à 11:13
Super !

Merci !



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