如果那么声明需要VBA帮助

Question

我有VBA问题。我想写一个If语句，我想说一个A＆gt; = B，然后在新列中的其他0 B-A。我想重复这一直到最后一行。任何人都可以帮助我

Answer 1

怎么样：

Sub qwerty()
    Dim N As Long, r As Range

    N = Cells(Rows.Count, "A").End(xlUp).Row
    Set r = Range("C1:C" & N)
    r.Formula = "=IF(A1>=B1,0,B1-A1)"
End Sub