DataBlake
Well-known Member
- Joined
- Jan 26, 2015
- Messages
- 781
- Office Version
- 2016
- Platform
- Windows
Code:
Sub Macro1()
'
' Macro1 Macro
'
'
Sheets("Unknown").Select
Dim lastRow As Long
lastRow = Range("A" & Rows.Count).End(xlUp).Row
Sheets("Sheet1").Select
Rows("2:2").Select
Range("2:2").AutoFill Destination:=Range("2:2" & lastRow)
End Sub
is what i have, but when i ran it "Sheet1" autofilled to 25 rows vs the 5 rows in "Unknown"
i thought i had a good handle on lastrow, but apparently not.
any help would be greatly appreciated.