Felix_Dragonhammer
Board Regular
- Joined
- Apr 7, 2015
- Messages
- 117
So basically the title says it all. I'm getting an error message on a bit of code as follows:
The line in question is:
If necessary, I can provide the entire code that it's in. Thanks in advance for any help I get!
Code:
'
'SKU Tracking Sheet Update
'
Sheets("SKU Tracking Sheet").Select
Range("Y2") = Range("Y2") + 1
ColToRef2 = Range("Y2").Value
ColToRef3 = Range("Z2").Value
For n = 7 To 183 Step 22
Cells(n, ColToRef).Select
Selection.AutoFill Destination:=Range(Cells(n, ColToRef2), Cells(n, ColToRef3)), Type:=xlFillDefault
Next n
Cells(249, ColToRef).Select
Selection.AutoFill Destination:=Range(Cells(249, ColToRef2), Cells(249, ColToRef3)), Type:=xlFillDefault
The line in question is:
Code:
Selection.AutoFill Destination:=Range(Cells(n, ColToRef2), Cells(n, ColToRef3)), Type:=xlFillDefault
If necessary, I can provide the entire code that it's in. Thanks in advance for any help I get!