[發問] 關於：Find & IsError 使用上的問題

本帖最後由 play9091 於 2012-4-8 22:06 編輯

假設：在 "sheets" 中並沒有，11152D，這個數值。那麼

range("A:A").find(what:=11152D)

就會出現錯誤。

那我要使用這樣子的錯誤來搭配 "IsError" 來形成判斷語句

If IsError(range("A:A").find(what:=11152D))=true then

這個時候卻跳出「執行階段錯誤 '91' :」。

請教各位先進。這是什麼問題引起的呢？有沒有什麼解決的方法？？

樓主熱帖

初學VBA乍到twbts

play9091

中學生 Rank: 2

帖子: 87
主題: 24
精華: 0
積分: 122
點名: 0
作業系統: win 7
軟體版本: 2016
閱讀權限: 20
性別: 男
註冊時間: 2011-7-9
最後登錄: 2018-1-16

8^#

發表於 2012-4-9 07:34 | 只看該作者

回復 7# register313

昨天晚上真的是寫到昏掉了，沒有看清楚是用 "……Is Nothing" 還是 "Not……Is Nothing" ，感謝二位的幫忙！

初學VBA乍到twbts

TOP

register313

　頭銜: 麻辣路人甲

大學生 Rank: 4

帖子: 967
主題: 0
精華: 0
積分: 1001
點名: 0
作業系統: WIN XP
軟體版本: OFFICE 2003
閱讀權限: 50
性別: 男
來自: 台北
註冊時間: 2010-11-29
最後登錄: 2022-5-17

2012龍年全勤獎章熱烈參與勳章

7^#

發表於 2012-4-9 00:02 | 只看該作者

回復 6# play9091

If Sheets("Swap Cell DB").Range("B:B").Find(what:=TF2) Is Nothing Then
RowX = Sheets("Swap Cell DB").Range("B:B").Find(what:=TF2).Row

1.既然是Is Nothing(找不到該值之儲存格),又如何傳回該儲存格之列號
2.變數不能用Row

TOP

play9091

中學生 Rank: 2

帖子: 87
主題: 24
精華: 0
積分: 122
點名: 0
作業系統: win 7
軟體版本: 2016
閱讀權限: 20
性別: 男
註冊時間: 2011-7-9
最後登錄: 2018-1-16

6^#

發表於 2012-4-8 23:42 | 只看該作者

回復 4# register313

附檔……

回復 5# Hsieh

Hsieh超版的方法也不行也……

test.rar (432 KB)

初學VBA乍到twbts

TOP

Hsieh

超級版主 Rank: 8 Rank: 8

帖子: 4901
主題: 44
精華: 24
積分: 4916
點名: 244
作業系統: Windows 7
軟體版本: Office 20xx
閱讀權限: 150
性別: 男
來自: 台北
註冊時間: 2010-4-30
最後登錄: 2024-11-10

2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱心公益勳章 2011兔年全勤獎章