Combobox no funciona en .find cuando hay letras

lHoa, tengo el siguiente código

Worksheets("Control de Inventario").Select
Range("A:A").Find(What:=ComboBox1).Select
ActiveCell.Offset(0, 2).Select
bodegaanterior = ActiveCell.Value
bodeganueva = Val(ActiveCell.Value) + Val(TextBox4.Value)
ActiveCell.Value = bodeganueva
Selection.End(xlToLeft).Select

Lo que sucede es que cuando los datos del combobox1 son solamente números este me efectúa el código sin ningún problema, pero hay datos en el combobox que tienen números y letras y cuando hay letras no me efectúa el código, o sea no hace nada.

Queria saber cual es el problema del porque cuando hay letras no funciona y saber cual seria la solucion

Muchas Gracias