• 統環境：Windows 10
• Excel：2010版本

今天講講Excel中常見的警告及報錯處理方法

Part 1：警告

• 代碼運行完后，希望自動保存工作簿

ThisWorkbook.Save

• 但運行該代碼會彈出隱私問題警告，和在Excel界面直接保存.xlsm格式文件彈出的警告一致，如圖1所示，需要人為點擊確定才可以關閉彈窗。如何去掉這個人為點擊的步驟，在ThisWorkbook.Save前加上下面代碼即可，關閉警告及提示信息

Application.DisplayAlerts=False

以上代碼默認情況下，取值為True，即顯示警告信息

Part 2：報錯處理方法

1. 程序編寫后運行，可能會發生錯誤
2. 如果不希望因為錯誤而暫停程序的執行，那么可以在過程的開始加上以下代碼
3. 有的時候，希望在不暫停程序的情況下，捕捉到程序運行中的錯誤，并給出提示，可以使用Err.Number是否等于0來捕捉錯誤

On Error Resume Next

Part 3：代碼

Sub Test()
    Dim i As Integer
    On Error Resume Next
    Application.DisplayAlerts=False
    ThisWorkbook.Save
    i="字符串"
    If Err.Number <> 0 Then
        Debug.Print ("Err.Number1=" & Err.Number)
        Debug.Print ("Err.Description=" & Err.Description)
    End If
    Err.Clear
    Debug.Print ("Err.Number2=" & Err.Number)
    On Error GoTo 0
    i="字符串"
End Sub

Part 4：部分代碼解讀

1. On Error Resume Next 關閉錯誤提示，繼續運行
2. On Error GoTo 0打開錯誤提示
3. Err.Number=0表示無錯誤
4. Err.Description提供對錯誤的描述
5. 本文中存在的錯誤是變量i定義為整型Integer，但卻以字符串對其賦值，導致類型不匹配錯誤
6. 第一次由于使用On Error Resume Next不彈窗報錯，但On Error GoTo 0打開錯誤提示后再次犯錯立即報錯

以上，為本次的介紹內容，下回見。

本文首發于微信公眾號：Excel高效辦公之VBA。排版和細節略作修改，發于頭條

打開Excel提示“運行時錯誤1004”怎么辦？

　　Excel可以說是我們最經常使用的一款辦公組件了，而目前許多用戶在使用的時候突然出現問題，在打開的時候發現自己的電腦提示運行時錯誤1004，這是怎么回事呢？下面小編就為大家解決這個問題吧！

　　操作方法：

　　1、首先打開EXCEL工具，點擊上方的文件選擇選項即可。

　　2、之后點擊信任中心，打開信任中心設置。

　　3、在打開的信任中心界面中，點擊左側的宏設置。

　　4、選擇勾選右側的信任對VBA工程對象模型的訪問，最后保存確定就可以啦。

　　以上就是win10系統excel提示“運行時錯誤1004”的解決方法啦，希望能幫助大到大家。