【Excel VBA】批次刪除所有錯誤值

VBA批次刪除所有錯誤值

Excel計算數值向下拖曳顯示出#DIV/0!」,這種情況多發生於A/B,且當除數B為零時,那要怎麼使用VBA批次刪除所有錯誤值呢?以下帶你VBA簡單快速刪除所有錯誤值

輸入巨集

※輸入以下指令※

Sub 刪除錯誤值()
Dim A As Range, B As Range
Set A = Range(“A1”).CurrentRegion
For Each B In A
If IsError(B.Value) = True Then
B.Value = “”
End If
Next B
End Sub

語法說明

Dim A As Range, B As Range
‘宣告A與B為「Range」型態
Set A = Range(“A1”).CurrentRegion
‘目前區域儲存格指定為「A」
For Each B In A
‘將A裡面所有的元素B進行處理,也就是目前區域儲存格(A)的所有儲存格(B)進行下列處理
If IsError(B.Value) = True Then
B.Value = “”
‘如果B的值顯示錯誤,則將B代入空值(“”)

執行巨集

點選「開發人員」-「巨集」或按下「Ctrl」+「F8」快捷鍵,並「執行」巨集。

執行後則批次刪除所有錯誤值

Excel四個方法修正#DIV0!錯誤值

其他文章分享

【Excel VBA】
另存新檔活頁簿

【Excel VBA】
查詢ColorIndex
調色盤索引值

發佈留言

發佈留言必須填寫的電子郵件地址不會公開。 必填欄位標示為 *