Error 函數

回傳對應特定 錯誤號碼的錯誤訊息。

語法

錯誤 [ (錯誤編號) ]

可選的 錯誤編號參數 可以是任何有效的錯誤編號。 如果 錯誤編號 是有效的錯誤編號，但未定義， Error 會回傳字串「Application-defined 或 object-defined error」。

若錯誤 編號 無效，則發生錯誤。 若省略 錯誤編號 ，則會回傳對應最近 一次執行時錯誤 的訊息。 若未發生執行時錯誤，或錯誤號碼為 0，Error 會回傳一個長度為零的字串 (“”) 。

註解

檢查 Err 物件的屬性設定，以找出最近的執行時錯誤。 錯誤函數的回傳值對應於 Err 物件的 Description 屬性。

範例

此範例使用 Error 函數來列印對應指定錯誤號碼的錯誤訊息。

Private Sub PrintError()
    Dim ErrorNumber As Long, count As Long
    count = 1: ErrorNumber = 1
    On Error GoTo EOSb
    Do While count < 100
        Do While Error(ErrorNumber) = "Application-defined or object-defined error": ErrorNumber = ErrorNumber + 1: Loop
        Debug.Print count & "-Error(" & ErrorNumber & "): " & Error(ErrorNumber)
        ErrorNumber = ErrorNumber + 1
        count = count + 1
    Loop
EOSb: Debug.Print ErrorNumber
End Sub

另請參閱

• 函式 (Visual Basic for Applications)

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。