Ce navigateur n’est plus pris en charge.
Effectuez une mise à niveau vers Microsoft Edge pour tirer parti des dernières fonctionnalités, des mises à jour de sécurité et du support technique.
Télécharger Microsoft Edge
Plus d’informations sur Internet Explorer et Microsoft Edge
object
est toujours l'objet
Err
.
Utilisez
Clear
pour effacer explicitement l'objet
Err
après la gestion d'une erreur, par exemple, lorsque vous utilisez la gestion différée des erreurs avec l'instruction
On Error Resume Next
. La méthode
Clear
est automatiquement appelée lorsque l'une des
instructions
suivantes est exécutée :
Tout type d'instruction
Resume
Exit Sub
,
Exit Function
,
Exit Property
Toute instruction
On Error
Remarque
Il est préférable d'utiliser
On Error Resume Next
plutôt que
On Error GoTo
lorsque vous gérez des erreurs générées pendant l'accès à d'autres objets. La vérification de l'objet
Err
après chaque interaction avec un objet supprime toute ambiguïté concernant l'objet auquel le code a accédé. Vous savez exactement quel objet a placé le code d'erreur dans
Err.Number
et quel objet est à l'origine de l'erreur (l'objet spécifié dans
Err.Source
).
Exemple
Dans cet exemple, la méthode
Clear
de l'objet
Err
permet de réinitialiser les propriétés numériques de l'objet
Err
, ainsi que ses propriétés de chaîne (la longueur des chaînes devient nulle). Si la méthode
Clear
était omise du code suivant, un message d'erreur s'afficherait à chaque itération de la boucle (suite à une erreur), qu'un calcul suivant ait généré une erreur ou pas. Vous pouvez parcourir le code étape par étape pour voir le résultat.
Dim Result(10) As Integer ' Declare array whose elements
' will overflow easily.
Dim indx
On Error Resume Next ' Defer error trapping.
Do Until indx = 10
' Generate an occasional error or store result if no error.
Result(indx) = Rnd * indx * 20000
If Err.Number <> 0 Then
MsgBox Err, , "Error Generated: ", Err.HelpFile, Err.HelpContext
Err.Clear ' Clear Err object properties.
End If
indx = indx + 1
Voir aussi
Instructions (Visual Basic pour Applications)
Objets (Visual Basic pour Applications)
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.