Clear, méthode

Article
04/07/2023

Efface tous les paramètres de propriété de l’objet Err .

Syntaxe

objet . Clair

object est toujours l'objet Err.

Remarques

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
Loop

Voir aussi

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.

Partager via