Bonjour forum
ci dessous un code, je souhaite afficher le message box en même temps que le fichier wav
Private Sub CommandButton1_Click()
If Sheets("Accueil").Range("E5") = "" Then
Application.ExecuteExcel4Macro "SOUND.Play(,""" & ThisWorkbook.Path & "\numero contrat.wav"")"
MsgBox "Merci de saisir le numéro du contrat.", vbCritical, "Rappel ..."
Sheets("Accueil").Range("E5").Activate
Exit Sub
End If
End Sub
salutations