VBA Code to Fill a Dynamic Range

[mniesse]

I am trying to fill down to a dynamic row number that is calculated in another sheet. When I use the recorder I get this but I need it to fill down from A2:x within the current sheet (this is the dynamic field that needs to point to the row number to end on such as X1160). What is the code to accomplish this?

Range(Selection, Selection.End(xlToRight)).Select
'The cell in bold needs to be updated to X & the number in a different sheet called "Instruction" calculated in B2 of that sheet
Selection.AutoFill Destination:=Range("A2:X1060"), Type:=xlFillDefault
Range("A2:X1060").Select

Does this make sense? Any help is appreciated.

 

[mumps]

Try:

Sub test()
    Dim LastRow As Long
    LastRow = Sheets("Instruction").Range("B2").Value
    Range("A2:X2").AutoFill Destination:=Range("A2:X" & LastRow), Type:=xlFillDefault
End Sub

 

[mniesse]

Thank you. That worked when I ran the macro in the "Instructions" worksheet but need it to copy the range down in the worksheet called "Import". Any help updating the code so fill range copies down in the correct sheet?

 

[mumps]

Try:

Sub test()
    Dim LastRow As Long
    LastRow = Sheets("Instruction").Range("B2").Value
    Sheets("Import").Range("A2:X2").AutoFill Destination:=Sheets("Import").Range("A2:X" & LastRow), Type:=xlFillDefault
End Sub

 

[mniesse]

Disregard. I figured it out by putting Sheet1 and Sheet3 in front of the specific code to complete the goal. Thank you again for your help!

 

[mumps]

You are very welcome.