I have a TextBox which places a name on a worksheet, which is then sorted.
What need to do is have code which will perform a search for the value of
TextBox1. In the search example below TextBox1 value is represented by betty
johnson but of course could be any name


Cells.Find(What:="betty johnson", After:=ActiveCell,
LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate