Why can't I take the last column and the last row?

[marlonsaveri]

Hello,
I use a ".find()" to find a word and saved in a variable "foundcell". This word belongs to a merged cell. Before, I was using "while" and "if" to move among cells tring to discover the last one. So, you teach me to use .end(xlUp), however, none of these codes're working:

Set myrange = cells(foundcell.row,columns.count).end(xlLeft).select

lastrow = Range(Cells(Rows.count, 1)).End(xlUp).Row

although

Lastrow = Range("A" & Rows.count).End(xlUp).Row

, seems ok, the cell in the last row is a merged cell, so, LastRow isn't really the lastrow.

Thanks again.