在引用范围时获取应用程序定义的错误

Question

我正在尝试使用VBA填充公式。这是代码

    Sub AssignRel()

    Dim strFormula As Variant
    Dim lastRow As Integer

    Sheets(1).Cells(1, 13).Value = "Assigned Release"
    strFormula = "someformula"

    lastRow = Range("M" & Rows.Count).End(xlUp).Row
    Sheets(1).Range("M2").Select
    Sheets(1).Range("M2").Formula = strFormula
    Range("M2").AutoFill Destination:=Range("M2:M" & lastRow)

    End Sub

当我运行它时，我在这一行得到了一个应用程序定义或对象定义的错误：

   Sheets(1).Range("M2").Formula = strFormula