Codes d'erreur de VBA
sub vérifier_erreur()
Dim Msg
' Si une erreur se produit, crée un message d’erreur.
On Error Resume Next ' Diffère la gestion d’erreur.
Err.Clear
Err.Raise 1007 ' erreur définie par l'application ou par l'objet
' Vérifie la présence d’erreurs, puis affiche
' le message.
If Err.Number <> 0 Then
Msg = "L’erreur # " & Str(Err.Number) & _
" a été générée par " _
& Err.Source & Chr(13) & Err.Description
MsgBox Msg, , "Erreur", Err.HelpFile, Err.HelpContext
End If
end subAuteur : isabelle
Mots clefs associés à cette page : code, erreur, débuter
- Vous devez vous identifier ou créer un compte pour écrire des commentaires
