Alternative to Find Select Box

[JGOpsMgr]

I am currently using a sheet that includes a table for scheduling. I have multiple users sharing that sheet (most in read only) and those users use the ctrl + F to get find select box to find a specific sales order. Some of them have asked if it was possible to just type what they are looking for in a cell and have the row it is found in get highlighted and scrolled to be seen on screen even if it is at the bottom of the page similiar to the find select box but without the annoying box you have to move around because it covers a part of the screen. Also they complain that the Ctrl + F option does not clearly highlight the found cell and it is difficult to see. Any options for this?

 

[offthelip]

You can put this code into the code for the worksheet code, I have assume you are typing into cell A1, change the "A1" to whatever cell you want

Private Sub Worksheet_Change(ByVal Target As Range)
If Not (Intersect(Target, Range("A1")) Is Nothing) Then
     Cells.Find(What:=Target.Value, After:=ActiveCell, LookIn:=xlValues, LookAt:= _
        xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _
        , SearchFormat:=False).Activate
End If

End Sub

 

[JGOpsMgr]

It works great except that when you hit the enter button the cell below is selected, i know, of course it does. Is there a way around that? I'm concerned that someone not in read only could inadvertently overwrite a formula that is in the cell below the search cell. Other than that, it's just what I need. Thank you very much for your help!

 

[JGOpsMgr]

It works great except that when you hit the enter button the cell below is selected, i know, of course it does. Is there a way around that? I'm concerned that someone not in read only could inadvertently overwrite a formula that is in the cell below the search cell. Other than that, it's just what I need. Thank you very much for your help!

Disregard, I figured out an option. Thank you again for your help