Application Error 1004 on Search Update Function

I think you'd better use a combobox here, so that the user can't make 'mistakes':

Private sub userform_initialize()
  with activesheet
    combobox1.list=.Range(.range("C10"), .Cells(Rows.Count, 3).End(xlUp))
  end with
End Sub

Private sub combobox1_change()
  if combobox1.listindex>-1 then
    with activesheet.cells(10+combobox.listindex,3)
      lblcoach.Caption = .Offset(0, -2).Value
      lblshift.Caption = .Offset(0, -1).Value
      lblemployee.Caption = .Offset(0, 1).Value
      ListBox1.RowSource = .Offset(0, 2).Resize(1, 10).Address
    end with
  end if
End sub