軟體:Excel
版本:2007
On Error Resume Next的用法大家都知道的
我現在的需求是，如果出現報錯，除了當句跳過以外
還要多跳過二句
例如
orkbooks.Open Filename:=MM & "\ntrade.xls"
Range(Cells(6, "A"), Cells(100, "I")).Copy
ThisWorkbook.Activate
Sheets("ntrade").Select →這句出現報錯
[A2].Select
Selection.PasteSpecial Paste:=xlValues
Workbooks.Open Filename:=MM & "\comm.xls" →希望接下來執行這句
Range(Cells(6, "A"), Cells(100, "I")).Copy
ThisWorkbook.Activate
Sheets("comm").Select
[A2].Select
Selection.PasteSpecial Paste:=xlValues
請賜教
謝謝

用on error goto

有想過，但這樣的結構約有10個，可能出現不止一次報錯

若如果沒有這個工作表時就執行另一段來看，是否先將全部工作表名用for each..next讀入字串內，再配合if+instr來判斷

瞭解您的思路，多謝