程序就是分割一串字符,然后用其中一個字符串“NEW-REJ-HK“”作為find函數的查找關鍵值Sub test_click()textline = "TC_NO=1,Action=NEW-REJ-HK ,Case=0497 ,Order_ID=YYY1,Result=Fail"textline = Replace(textline, "=", ",")textline = Split(textline, ",")myrow = Workbooks("DBMTS_RTVM_SCFR_April_Release.xls").Sheets("Regression Test").Cells.Find(what:=textline(3), LookIn:=xlValues, lookat:=xlWhole).RowEnd Sub運行報錯run-time erro '91' :Object variable or with block varible not set
1 回答

一只萌萌小番薯
TA貢獻1795條經驗 獲得超7個贊
Sub test_click() Dim x, y textline = "TC_NO=1,Action=NEW-REJ-HK ,Case=0497 ,Order_ID=YYY1,Result=Fail" textline = Replace(textline, "=" , "," ) textline = Split(textline, "," ) Cells(1, 1) = textline(3) myrow = Sheets( "Sheet4" ).Cells.Find(textline(3), LookIn:=xlValues, lookat:=xlWhole).Row MsgBox myrow End Sub |
終于找到問題了;
你表中單元格的值,肯定不完全等于textline(3),(NEW-REJ-HK
)因為我測試了用我這個辦法就可以;
- 1 回答
- 0 關注
- 235 瀏覽
添加回答
舉報
0/150
提交
取消