Devolve uma mensagem de erro que corresponde a um determinado número de erro (número de erro: número completo no intervalo 0 - 65.535 que corresponde à definição de propriedade Number do objecto Err. Quando combinado com a definição de propriedade Description do objecto Err, este número representa uma mensagem de erro específica.).
Sintaxe
Erro [ (númeroerro) ]
O argumento (argumento: valor que fornece informações a uma acção, evento, método, propriedade, função ou procedimento.) númeroerro opcional pode ser qualquer número de erro válido. Se númeroerro for um número de erro válido, mas não estiver definido, a função Erro devolve uma cadeia "Erro definido pela aplicação ou pelo objecto." Se númeroerro não for válido, ocorre um erro. Se númeroerro for omitido, é devolvida a mensagem correspondente ao erro de tempo de execução (erro durante a execução: erro que pode ser detectado apenas quando uma aplicação estiver a ser executada.) mais recente. Se não tiver ocorrido um erro de tempo de execução ou o númeroerro for 0, a função Erro devolve uma cadeia de comprimento zero ("").
Observações
Examine as definições de propriedade (propriedade: um determinado atributo de um controlo, campo ou objecto definido para especificar uma das características do objecto (como o tamanho, cor ou localização no ecrã) ou um aspecto do respectivo comportamento (como se o objecto estivesse oculto).) do objecto Err para identificar o erro de tempo de execução mais recente. O valor devolvido da função Erro corresponde à propriedade Descrição do objecto Err.
Exemplo
Nota Os exemplos que se seguem demonstram a utilização desta função num módulo do Visual Basic for Applications (VBA). Para mais informações sobre como trabalhar com VBA, seleccione Referência para Programadores na lista pendente junto a Procurar e introduza um ou mais termos na caixa de procura.
Este exemplo utiliza a função Erro para imprimir mensagens de erro que correspondam a números de erro especificados.
Dim ErrorNumber
' Loop through values 61 - 64.
For ErrorNumber = 61 To 64
' Print error to Immediate window.
Debug.Print Error(ErrorNumber)
Next ErrorNumber