Hey Bob,

One question, what is the correct syntax to select
Range(A<LastRow:W<LastRow).Select
I've tried a few ways and I keep getting

Run-time error '1004':
Method 'Range' of object '_Global' failed

What do I need to change to make this work - I'm at a loss!

Other then that, it looks like it should work :^

-Minitman


On Wed, 20 Jul 2005 09:56:47 +0100, "Bob Phillips"
wrote:

Function LastRow(rng As Range)
On Error Resume Next
LastRow = 1
With rng
LastRow = .Find("*", .Cells(1), xlFormulas, _
xlWhole, xlByRows, xlPrevious).Row
End With
End Function


Call it like

myLastRow = LastRow(Range("A:W"))