I have a userform that uses a textbox (tbExistingProjectNumber) to find an
existing project number and replace it with a new project number from another
textbox on the same userform (tbChangeProjectNumberTo). My problem is that
if the value in tbExistingProjectNumber starts with a "B" I need it to find
the cell with that value on Sheet9 and delete the entire row that had that
cell in it. Here is my code, thank you in advance for any help you can give.

Private Sub cbChangeButton_Click()
' Activate Sheet9
Sheet9.Activate
' Delete from Sheet9(Budget Proposals)
If CStr(Left(tbExistingProjectNumber.Value, 1) = "B") Then
Sheet9.Columns(1).Find(tbExistingProjectNumber.Val ue).SelectRow.Delete
Selection.Delete Shift:=x1Up
End If