Hello,
I'm trying to Insert a Table using LastRow, instead of just using Row 5,000.
For LastRow (which is working) I have:
For Inserting my Table (which is not working) I have:
I'm trying to Insert a Table using LastRow, instead of just using Row 5,000.
For LastRow (which is working) I have:
VBA Code:
LastRow = Range("I:I").Cells.Find("*", _
SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row
MsgBox "The Last Non-Blank Row Is " & LastRow
For Inserting my Table (which is not working) I have:
Code:
ActiveSheet.ListObjects.Add(xlSrcRange, Range("$A$1" & LastRow), , xlYes).Name = _
"Table1"
Range("Table1[#All]").Select
/CODE]
How am I using LastRow wrong?
Thanks for the help