VB Code to find row Number and its corresponding value

Try this.

Sub tst()
    Dim fRow As Long
    With Sheets("Sheet1")
        fRow = Application.Match("Total:", .Columns(8), 0)
        If Not IsError(fRow) Then
            .Cells(1, 19) = .Cells(fRow, 9)
            .Cells(1, 20) = fRow
        End If
    End With
End Sub

Or maybe this...

Sub FindTotal()
Dim rngTotal As Range
Set rngTotal = Range("H:H").Find("Total:", lookat:=xlWhole)
If Not rngTotal Is Nothing Then
    Range("S1").Value = rngTotal.Offset(0, 1).Value
    Range("T1").Value = rngTotal.Row
End If
End Sub

and yet another solution. Take your pick.

Option Explicit

Sub Riz()
    Dim lr As Long, r As Long, start As String, endX As String
    lr = Range("H" & Rows.Count).End(xlUp).Row
    start = "H1"
    endX = "H" & CStr(lr)
    r = lr + 1
    Range("H" & lr + 1).Formula = "=Sum(" & start & ":" & endX & ")"
    Range("S1").Value = Range("H" & lr + 1)
    Range("T1") = r
End Sub

You're welcome and thanks for rep+.

You're welcome Riz! Glad we could help.
Thanks for the rep.

You are welcome. Thanks for the rep