Beep et msgBox Excel

Résolu
Edaine Messages postés 63 Statut Membre -  
Edaine Messages postés 63 Statut Membre -
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

  1.
    michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
     
    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
  2. Edaine Messages postés 63 Statut Membre
     
    Super !

    Merci !

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