私のコードは、列「L」に K2=J2 などの「IF」式を自動入力することになっていますが、実行時エラー 1004 が発生しています。
マクロが列 K のデータで最後の行に到達するまで、列全体を完了するようにします。
コード：
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