返回列表 上一主題 發帖

[發問] 請問 find 無法搜尋跨欄置中之欄位

mian1090

帖子
3 
主題
1 
精華
0 
積分
10 
點名
0  
作業系統
window 
軟體版本
office 2010 
閱讀權限
10 
註冊時間
2016-6-22 
最後登錄
2020-6-26 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2016-6-27 08:16 | 只看該作者

[發問] 請問 find 無法搜尋跨欄置中之欄位

如題 使用find搜尋時
sc = Cells.Find(What:="各線材斷線率", after:=ActiveCell, LookIn:=xlFormulas, LookAt:=xlWhole, SearchOrder:=xlByColumns, SearchDirection:=xlNext, MatchCase:=False, MatchByte:=False, SearchFormat:=False).Row

出現"沒有設定物件變數或with區塊變數" 之訊息
由於 "各線材斷線率"  所在欄位為 A22到B22 (跨欄置中)
經過測試後發現 取消 跨欄置中 再執行程式就可以搜詢到


請問有什麼方式可以在"各線材斷線率"跨欄置中的情況下，搜詢到該位置嗎?
或是程式碼可以取消所有欄位的跨欄置中
收藏 分享

c_c_lai

帖子
2035 
主題
24 
精華
0 
積分
2031 
點名
0  
作業系統
Win7 
軟體版本
Office2010 
閱讀權限
100 
性別
男 
註冊時間
2012-3-22 
最後登錄
2024-2-1 
2#
發表於 2016-6-27 08:50 | 只看該作者
回復 1# mian1090
Find 的上一行加入
  1.     On Error Resume Next
複製代碼
則可避開尋找不到的錯誤訊息。

TOP

mian1090

帖子
3 
主題
1 
精華
0 
積分
10 
點名
0  
作業系統
window 
軟體版本
office 2010 
閱讀權限
10 
註冊時間
2016-6-22 
最後登錄
2020-6-26 
3#
發表於 2016-6-27 10:40 | 只看該作者
回復 2# c_c_lai

感謝回覆

嘗試您的方式後 可跳過錯誤訊息
但結果sc=無 是還是找不位置
想請問是不是有其他方法找到 sc=22

TOP

c_c_lai

帖子
2035 
主題
24 
精華
0 
積分
2031 
點名
0  
作業系統
Win7 
軟體版本
Office2010 
閱讀權限
100 
性別
男 
註冊時間
2012-3-22 
最後登錄
2024-2-1 
4#
發表於 2016-6-27 10:59 | 只看該作者
回復 3# mian1090
你上傳檔案，我試試看問題出在哪裡。

TOP

Kubi

帖子
163 
主題
1 
精華
0 
積分
170 
點名
0  
作業系統
Window 7 
軟體版本
Office 2007 
閱讀權限
20 
性別
男 
註冊時間
2010-9-5 
最後登錄
2022-7-20 
5#
發表於 2016-6-27 20:21 | 只看該作者
回復 1# mian1090
試試∼
sc = ActiveSheet.UsedRange.Find(What:="各線材斷線率", after:=ActiveCell, LookIn:=xlFormulas, LookAt:=xlWhole, SearchOrder:=xlByColumns, SearchDirection:=xlNext, MatchCase:=False, MatchByte:=False, SearchFormat:=False).Row

TOP

        靜思自在 : 君子如水，隨方就圓，無處不自在。
返回列表 上一主題