Excel - formato textbox

Amigos tengo un problema
Con este codigo, resulta que el numero que se inserta en la hoja, lo hace en formato texto, y no como numero, con lo cual, no puedo hacer operaciones con ellos
Agradezco la ayuda

Private Sub textbox3_AfterUpdate()
Me.TextBox3.Value = Format(Me.TextBox3.Value, "#,##0.00")
Range("H16").FormulaR1C1 = TextBox3.Value
End Sub

saludos
Estrella

Prueba con esto:

Range("H16").Select
Selection.FormulaR1C1 = Val(TextBox3)

o también con

Range("H16") = Val(TextBox3)

espero te funcione.

Funciona .... a medias. No pinta los decimales
gracias