Zellformat nach Eintrag aus UF

ich übertrage aus Textboxen in einer UF Zahlen in Tabellenblätter, mit denen dann über Formeln berechnet wird.

Bisher habe ich die Einträge aus den Textboxen so formatiert:
Beim Ereignis _Change der Textbox

txt1.value = format(txt1.value, "0.00")
Sheets("xy").range("xy").value = txt1.value

Jetzt habe ich aber bei einigen Berechnungen gemerkt, dass die in der Tabelle eingetragene Wert nicht als Zahl erkannt wird.

Wenn ich schreibe:
sheets("xy").range("xy").value = cdbl(txt1.value)
Geht es. Bis jetzt wenigstens.

Meine Frage:

Welchen Code muß ich verwenden, damit der Eintrag zuverlässig als
Zahl erkannt wird? Ich muß nämlich eine größere Menge an Textboxen ändern, deshalb frage ich vorher.

Vielen Dank schon mal im voraus

Michael