2016-10-04 81 views
0

我有一些從PDF格式轉換爲Excel的在線程序獲得的Excel表格,並且試圖處理這些數據。但是,當我嘗試運行此代碼時:excel vba - 代碼不會在舊紙上運行,但會在新紙上運行

Sheets(1).Range("A1").Select 
    For j = 1 To 16 
     If Selection.Offset(j, 0) = 1 Then 
      Selection.Offset(j, 0).Select 
     End If 
    Next j 

Excel顯示runtime-error '1004': application-defined or object-defined error

但是,如果我創建一個新的工作表,代碼運行沒有問題。爲什麼我無法在其他工作表上運行我的代碼?

其他指令如Selection.Offset(2, 0) = Sheet(1).Range("A1")工作正常。

回答

0

儘可能避免使用選擇。

With Sheets(1) 
    For j = 2 To 17 
     If .Cells(j, 1) = 1 Then 
      .Cells(j, 1).Select 
     End If 
    Next j 
End With 
+0

它現在的作品!謝謝! –

相關問題