Método Clear

Limpa todas as configurações de propriedade do objeto Err .

Sintaxe

objeto. Claro

O objeto é sempre o objeto Err .

Comentários

Use Clear para limpar explicitamente o objeto Err depois que um erro tiver sido tratado, por exemplo, quando você usar o tratamento de erro adiado com On Error Resume Next. O método Clear é chamado automaticamente sempre que uma das seguintes instruções é executada:

  • Qualquer tipo de instrução Resume
  • Exit Sub, Exit Function, Exit Property
  • Qualquer instrução De Erro

Observação

A construção On Error Resume Next pode ser preferível a On Error GoTo ao manipular erros gerados durante o acesso a outros objetos. VerificarErr após cada interação com um objeto remove a ambiguidade sobre qual objeto foi acessado pelo código. Você pode ter certeza de qual objeto colocou o código de erro em Err. Number, bem como o objeto que originalmente gerou o erro (objeto especificado no Err.Source).

Exemplo

Este exemplo usa o método Clear do objeto Err para redefinir as propriedades numéricas do objeto Err para zero e suas propriedades de cadeia de caracteres para cadeias de caracteres de comprimento zero. Se Clear tiver sido omitido do código a seguir, a caixa de diálogo mensagem de erro será exibida em cada iteração do loop (após ocorrer um erro) se um cálculo sucessivo gerou ou não um erro. Você pode passar por um único passo pelo código para ver o efeito.

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

Confira também

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.