Textfeld immer mit 2 Nachkommastellen versehen

vorhin habt ihr mir gezeigt, wie man problemlos textfelder einer userform mit zellen befüllen kann.

wie aber kann man diese immer mit zwei nachkommastellen versehen?

Beispiel:

ich lese den Wert "7,6" aus einer zelle aus - dieser soll dann in meinem Textfeld mit 7,60 erscheinen. Eine Änderung der Zahlenformatierung in der Zelle selbst bringt auch nichts.

ich habe es mit folgender zeile sinnvoll zu ergänzen, schlug allerdings fehl:

Private Sub UserForm_Initialize()
Range("B3") = WorksheetFunction.Round(Range("B3"), 2)
TextBox1.Value = Sheets("Tabelle1").Range("b3")
End Sub