Board logo

標題: [發問] 請問 find 無法搜尋跨欄置中之欄位 [打印本頁]

作者: mian1090    時間: 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    時間: 2016-6-27 08:50

回復 1# mian1090
Find 的上一行加入
  1.     On Error Resume Next
複製代碼
則可避開尋找不到的錯誤訊息。
作者: mian1090    時間: 2016-6-27 10:40

回復 2# c_c_lai

感謝回覆

嘗試您的方式後 可跳過錯誤訊息
但結果sc=無 是還是找不位置
想請問是不是有其他方法找到 sc=22
作者: c_c_lai    時間: 2016-6-27 10:59

回復 3# mian1090
你上傳檔案,我試試看問題出在哪裡。
作者: Kubi    時間: 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




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