Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionSub main() On Error GoTo prob_general Menu.Show Exit Sub prob_general: Call MsgBox("Problème : '" & adr_fic & vbLf & "' N° erreur:" & Err.Number & vbLf & Err.Description) End Sub