Move cursor to first name starting with a specific letter

[Canoer]

I have column A with 50 first names, alphabetized from A to Z. I want to be able to move my cursor to the first name in the list that begins with a specific letter.
For example: Adam, Adrian, Brian, Butch, Bob, Charlie, Chip, Chester, Dale, David. I want to move the cursor down the list until I come to the first name beginning with the letter "C", Charlie. When using "Find" in the quick access toolbar, the cursor stops at "Butch" because of the "c" in the name. I would like to have a macro so that I can select or input a letter and have the cursor move to the first name in the list beginning with that letter.

Any help or suggestions appreciated.

 

[Peter_SSs]

Welcome to the MrExcel board!

What about just using this in the 'Find' dialog?

 

[Bosquedeguate]

Code for the button

Sub MoveCursor_Click()
'
' MoveCursor_Click Macro
'
  Dim rng As Range
'
    Set rng = Range("A:A").Find(Range("B2"), , , xlPart)
    
'    Set rng = Cells(WorksheetFunction.VLookup(Range("B2"), Range("A:A"), 0, False), 1)
    rng.Select
    rng.Activate
    
End Sub

 

[Peter_SSs]

Code for the button

Not sure if or how well you tested that code. It selects Alice for me.
Also not sure why rng.Activateis included? Selecting the cell already does that.

@Canoer
It you did want a search cell/button like that, I think all you should need is this

Sub MoveCursor_Click()
  On Error Resume Next
  Columns("A").Find(What:=Range("B2").Value & "*", LookAt:=xlWhole).Select
End Sub