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

我无法重现'预期：结束语句'错误。我在第一行遇到语法错误：

Cells(i, 1 to 14) = ""

但是：

如果要删除整个行，则应使用：

Cells(i).EntireRow.Delete xlUp

如果您要清除行内容（就像我在代码中看到的那样），您应该使用：

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

预期：Excel中的语句结束错误

1 个答案: