Excel 自动填充数据时出现运行时错误1004

我的代码应该自动填充列“L”中K2=J2等的“IF”公式，但遇到运行时错误1004

我希望宏完成整个列，直到它到达包含K列中数据的最后一行

代码：

---

我相信有一个更好的答案，但迄今为止还没有其他答案：

子站点访问（）
将myBook设置为工作簿
将工作表设置为工作表
暗淡如长
设置myBook=Excel.active工作簿
设置myOtherSheet=myBook.Sheets（“Sheet1”）
ff=myOtherSheet.Range（“K1:K”和myOtherSheet.Cells（myOtherSheet.Rows.Count，“K”）_
.End（xlUp）.Row.计数
附页（“第1页”）
.范围（“L2”）。选择
.Range（“L2”）.Formula=“=IF（RC[-2]=RC[-1]，“否”、“是”）
Selection.AutoFill目标：=范围（“L2:L”和ff），类型：=xlFillDefault
以
端接头

Sub SiteAccess()

Dim mySheet As Worksheet, myOtherSheet As Worksheet, myBook As Workbook
Set myBook = Excel.ActiveWorkbook
Set mySheet = myBook.Sheets("SiteAccessReports")
Set myOtherSheet = myBook.Sheets("Sheet1")

Dim ff As Long

ff = myOtherSheet.Range("L2:L" & myOtherSheet.Cells(myOtherSheet.Rows.Count, "L").End(xlUp).Row).Count
With Sheets("Sheet1")
.Range("L2").Formula = "=IF(RC[-2]=RC[-1],""No"",""Yes"")"
Selection.AutoFill Destination:=Range("L2:L" & ff), Type:=xlFillDefault 'Error Line
End With

End Sub