You can do something like below (this will find all cells with this value )

Sub findRowNumber()
Dim FND As Boolean
FND = False
With ActiveSheet.Cells
'
Set Rw = .Find(What:="104", After:=ActiveCell, LookIn:=xlValues, LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False)


    If Not Rw Is Nothing Then
    firstAddress = Rw.Address
        Do
        FND = True
                Rw.Select
            MsgBox (" The Row number of the selected cell is " & Rw.Row)
            Set Rw = .FindNext(Rw)
        Loop While Not Rw Is Nothing And Rw.Address <> firstAddress
    End If


    If FND = False Then
    MsgBox (" No Cell Found with 104 value")
    End If
End With
End Sub