Last Cell with Data over Entire Worksheet

[Guzzlr]

Hello all
Instead of finding a particular last row with data in a worksheet. I am exprimenting with finding the Last Cell with data over the entire worksheet, reguardless what row it is.
I have:

'*********** Find Last Cell With Data **************
Dim LastCell As Range
Set LastCell = ActiveSheet.Cells.Find("*", SearchOrder:=xlByRows, SearchDirection:=xlPrevious)
MsgBox = "Last Cell with Data Is  " & LastCell

However, I am getting the below error, and I'm not sure why.
What am I doing wrong?
Thank you for the help

 

[Cubist]

Remove the equal sign after MsgBox.

 

[Guzzlr]

Remove the equal sign after MsgBox.

Oh...
Thanks

 

[Alex Blakenburg]

If you want the cell address you would need to use
MsgBox "Last Cell with Data Is " & LastCell.Address

For the last row number
MsgBox "Last Cell with Data Is " & LastCell.Row

Note: rows hidden by a filter being applied will be ignored. Rows using Rows Unhide do not affect it and are still searched.

 

[Guzzlr]

If you want the cell address you would need to use
MsgBox "Last Cell with Data Is " & LastCell.Address

For the last row number
MsgBox "Last Cell with Data Is " & LastCell.Row

Note: rows hidden by a filter being applied will be ignored. Rows using Rows Unhide do not affect it and are still searched.

this is working well, thank you so much...

 

[Alex Blakenburg]

Thanks for letting us know. Glad we could help.