使用R-1C公式循环识别并填充空白

Question

我正在尝试在两行和19列上运行循环以下拉空白单元格的第一个值。有什么建议？我一直收到编译错误：

  

无效的下一个contrl变量引用。

Sub Loop1()

    Dim R As Integer
    Dim C As Integer

    R = 18
    C = 1

    For R = 18 To 20
    For C = 1 To 19
        If Cells(R, C) = "" Then Cells(R, C).Value = "=R[-1]C"

    Next R
    Next C


End Sub