Método Clear

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

Sintaxe

objeto de teste. Limpar

O objeto é sempre o objeto Err .

Comentários

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

• Qualquer tipo de instrução de currículo
• Exit Sub, Função de saída, Propriedade de saída
• Instrução Any On Error

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 comprimento zero. Se Clear fosse omitido do código a seguir, a caixa de diálogo da mensagem de erro seria exibida em cada iteração do loop (após a ocorrência de um erro), independentemente de um cálculo sucessivo ter gerado ou não um erro. Você pode percorrer o código com uma única etapa 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

• Instruções (Visual Basic for Applications)
• Objetos (Visual Basic for Applications)

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.