vba - 错误 450 : Wrong number of arguments or invalid property assignment on vba

Question

我正在写一个工作表，当我按下一个按钮时，一个循环会遍历一些行，如果它们是空的，则会编辑一些数据，但我似乎无法让宏运行，因为它不断返回 450 错误。
这是一个不会运行的代码的简化版本。(从选项开始，在结束时显式结束，当我粘贴时，子格式正在起作用)

Option Explicit

Sub Copypaste()
'
' Copypaste Macro
'
' Keyboard Shortcut: Ctrl+p
'
    Dim i As Integer, j As Integer
    Dim ls As Boolean

    i = 2
    j = 24
    ls = True

    Do While ls = True

        If IsEmpty(i, j) = True Then
            Cells(i, j).Value = 10
            ls = False
        Else
            ls = True
        End If

        i = i + 1
        j = j + 1

        If i > 10 Then
            ls = False
        End If
    Loop
End Sub

我已经搜索了很多线程，但我似乎找不到任何与我有相同问题的人，因为我所做的任何修复似乎都不是问题。

今天发现的新宏，因此可能是多个错误的情况

Answer 1

你需要改变

If IsEmpty(i, j) = True Then

至

If IsEmpty(Cells(i, j).Value2) = True Then