Find Row Number

[rizmomin]

Hello:

Please refer to attached file.
I need a VB code to find the row # for 1st occurrence of "GRAND TOTAL:" in column D

As i can see manually it is Row 29

Let me know if you have any questions.
Thanks.

Riz

[JieJenn]

Sub RowGrandTotal()

On Error Resume Next
MsgBox Columns("D:D").Find("Grand Total:").Row

End Sub

[AlKey]

It could also be done with a very simple formula

=MATCH("Grand Total:",D:D)

[rizmomin]

Hello JieJenn:

I need a variable as example LastRow=

Please let me know if you have any questions.
Thanks.

Riz

[JieJenn]

For last row use

Sub Test()
MsgBox "Last Row: " & Cells(Rows.Count, 4).End(xlUp).Row
End Sub

[rizmomin]

Hello Jie:

Thanks a lot, this will work for me.
Riz