Hello,
I wanted to adjust the row scroll when the following code runs.
Sub search_a()
Dim Fnd As Range
Set Fnd = Range("H:H").Find("b*", , xlValues, xlWhole, , , False, False)
If Not Fnd Is Nothing Then Cells(Fnd.Row, ActiveCell.Column).Activate
End Sub
the above code will take me...