- 帖子
- 35
- 主題
- 8
- 精華
- 0
- 積分
- 43
- 點名
- 0
- 作業系統
- WIN7
- 軟體版本
- WIN
- 閱讀權限
- 10
- 註冊時間
- 2015-9-13
- 最後登錄
- 2019-12-16
|
[發問] 用Cells.Find找尋資料如找不到會出現錯誤
Cells.Find(What:=InputBox("請輸入要找尋的資料!", "Search"), _
After:=ActiveCell, LookIn:=xlFormulas, LookAt:=xlPart, _
SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False).Activate
ActiveCell.Offset(-1, 0).Activate
Range(Selection, Selection.End(xlUp)).Select
Selection.EntireRow.Delete
Selection.End(xlUp).Select
例如以上一段,如輸入正確的話,會順利找到儲存格去到下一段,
但如果找不到匹配的資料,會出現
執行階段錯誤 '91':
沒有設定物件變數或 WITH 區塊變數
如何寫才可以略過錯誤,直接到下一行呢?謝謝!! |
|
發表於 2015-10-11 20:31
| 
