預期：在Excel中聲明錯誤的結尾

Question

我試圖刪除符合指定條件的代碼中的行。我也收到語法錯誤。我直接在Excel開發人員窗口中輸入。

Sub create() 
    Dim ed(1 To 944) 
    Dim female(1 To 944) 
    Dim edfemale(1 To 944) 

    For i = 1 To 944 
     ed(i) = Cells(i, 1).Value 
     female(i) = Cells(i, 13).Value 
     edfemale(i) = Cells(i, 1) * Cells(i, 13) 

     If edfemale(i) = 0 Then 
      Cells(i,1 to 14) = "" 
     End If 
    Next i 
End Sub 

Answer 1

我無法重現'Expected：end of statement'錯誤。我在行有一個語法錯誤：

Cells(i, 1 to 14) = "" 

但是：

如果你想刪除整個行，你應該使用：

Cells(i).EntireRow.Delete xlUp 

相反，如果要清除行內容（像我在你的代碼中看到的），你應該使用：

Range(Cells(i, 1), Cells(i, 14)).Clear