麻辣家族討論版版 » Excel程式區 » vba中iserror用法？

返回列表下一主題上一主題發帖

[發問] vba中iserror用法？

　暱稱: joey0415

中學生 Rank: 2

帖子: 361
主題: 57
精華: 0
積分: 426
點名: 0
作業系統: win7
軟體版本: 2003,2010
閱讀權限: 20
性別: 男
註冊時間: 2010-5-13
最後登錄: 2022-12-8

1^# 跳轉到 » 倒序看帖

字體大小: tT

發表於 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!

樓主熱帖

收藏

中學生 Rank: 2

帖子: 181
主題: 5
精華: 0
積分: 197
點名: 0
作業系統: XP
軟體版本: 2000
閱讀權限: 20
性別: 女
註冊時間: 2014-3-9
最後登錄: 2024-4-29

2^#

發表於 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

中學生 Rank: 2

帖子: 361
主題: 57
精華: 0
積分: 426
點名: 0
作業系統: win7
軟體版本: 2003,2010
閱讀權限: 20
性別: 男
註冊時間: 2010-5-13
最後登錄: 2022-12-8

3^#

發表於 2014-12-19 22:43 | 只看該作者

回復 2# bobomi

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

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

謝謝

中學生 Rank: 2

帖子: 15
主題: 5
精華: 0
積分: 60
點名: 0
作業系統: win7
軟體版本: office2003
閱讀權限: 20
性別: 男
來自: Taiwan
註冊時間: 2014-11-29
最後登錄: 2017-10-9

4^#

發表於 2014-12-20 22:46 | 只看該作者

回復 1# joey0415

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

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

　暱稱: joey0415

中學生 Rank: 2

帖子: 361
主題: 57
精華: 0
積分: 426
點名: 0
作業系統: win7
軟體版本: 2003,2010
閱讀權限: 20
性別: 男
註冊時間: 2010-5-13
最後登錄: 2022-12-8

5^#

發表於 2014-12-21 14:44 | 只看該作者

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

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

感謝分享

靜思自在 : 【生命在呼吸間】佛陀說：「生命在呼吸間。」人無法管住自己的生命，更無法擋住死期，讓自己永住人間。既然生命去來這麼無常，我們更應該好好地愛惜它、利用它、充實它，讓這無常、寶貴的生命，散發它真善美的光輝，映照出生命真正的價值。

返回列表下一主題上一主題