Hi, I am trying to set a range in Workbook 1 equal to another range in Workbook 2 (arbitrary names)
What am I missing?
Sub Kopierikkelåst2() Dim aaa As Range Workbooks("Workbook1.xlsm").Activate Sheets("AK1").Rows("4:1000").Select Selection.ClearContents Workbooks("Workbook2.csv").Activate Sheets("1").Select Range("B4:B14") = aaa Workbooks("Workbook1.xlsm").Activate Sheets("AK1").Select Range("A1:A10") = aaa End Sub