標題: [發問] vba中iserror用法？ [打印本頁]

---

作者: joey0415    時間: 2014-12-19 13:12     標題: vba中iserror用法？

請問
cells(1,1)=2
cells(1,2)=0
cells(1,3)=cells(1,1)/cells(1,2)

請問如果想判斷這三格都符合不為以下的狀況時，才去做某件事，那要怎麼寫，好像不能用iserror(range("a1:c1"))
#DIV/0!
#N/A
#NAME?
#NULL!
#NUM!
#REF!
#VALUE!

---

作者: bobomi    時間: 2014-12-19 20:13

Sub Test

If Not IsAnyErr(Range("a1:c1")) Then
  ' your code
End If

End Sub

Public Function IsAnyErr(Range As Range) As Boolean

For Each r In Range
    If IsError(r) Then
       IsAnyErr = True
       Exit Function
    End If
Next

End Function

---

作者: joey0415    時間: 2014-12-19 22:43

回復 2# bobomi

萬分感謝回覆！原來是多一個開關，如果是就離開

我的想法也是這樣，不過我的開關一直沒有寫好

謝謝

---

作者: Jerrywu101    時間: 2014-12-20 22:46

回復 1# joey0415

這裡有個網頁也可參考看看：

Excel欄位公式常見錯誤原因與處理(#REF!、#VALUE!、...)
http://it.notes.tw/2009/11/excel-field-error.html

---

作者: joey0415    時間: 2014-12-21 14:44

回復 4# Jerrywu101
這些是函數的用法！

我要問題是vba程式中出現錯誤時的處理，很像，但處理的方式不一樣哦

感謝分享

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)