UF / Textfeld (in Frame) ..... Formatprobleme
14.10.2006 20:36:32
proxima05
ich muss leider einen Thread, der ins Forum-Archiv gewandert ist, nochmals teilweise hocbringen, da eine Frage ebenfalls unbeantwortet ins Archiv verschoben wurde.
Mit der folgene Routine wird ein Textfeld in einem UserForm mit einem bestimmten Zahlenformat nach Verlassen formatiert (funktioniert alles einwandfrei) ..... herzlichen Dank nochmals dafür an Franz (fcs)
Private Sub FX_Exit(ByVal Cancel As MSForms.ReturnBoolean)
On Error GoTo Fehler
Zahl = CDbl(FX.Value)
FX.Value = Format(Zahl, "#,##0.0000")
Exit Sub
Fehler:
MsgBox "Eingabe für FX ist keine Zahl"
End Sub
Allerdings kommt die Dezimalergänzung im Textfeld noch nicht zum Tragen (Ergänzen auf vier Dezimalstellen). Ich weiss jetzt warum, aber (noch) nicht, wass ich dagegen tun kann.
Das Textfeld sitzt zusammen mit einer ComboBox (wobei ich denke, dass das egal ist) in einem Frame. Wenn ich mich innerhalb dieses Frame von der besagten Textbox in ein anderes Feld (im Frame) begebe, erfolgt die Aktualisierung (bzw. die Fehlermeldung, wenn falsches Format ...... sobald ich allerdings aus dem Frame herausspringe, funktioniert die Aktualisierung (Ergänzen auf vier Dezimalstellen) nicht.
Wie kann ich dem Textfeld jetzt sagen, dass es egal ist wo es nach einer Eingabe hingeht (es soll immer aktualisiert werden).
Hoffe da weiss jemand Rat ..... allerbesten Dank.
Ralph