chaelie2015
XLDnaute Accro
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
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