Textfeld in UF Format zuweisen
11.09.2008 16:19:28
Henner
ich möchte einem (oder auch mehreren) Textfeld in einer UF ein Format zuweisen, damit zB ein Betrag von '71,00' nicht nur als '71' angezeigt wird. Als Ansatz habe ich den nachfolgenden Code als Basis bei meiner Recherche gefunden. Wodurch muss ich die in der Klammer festgelegte Formatierung ersetzen um meine gewünschte Anzeige bzw mein gewünschtes Format zu erhalten? Oder gibt es noch andere effektivere Möglichkeiten, mehrere Textfelder gleichzeitig zu formatieren, als diesen (wie in meinem Code) beim Aufrufen der UF einzeln das Format zuzuweisen?
Private Sub UserForm_Activate()
TextBox1.Text = Format(Date - 15, "mm-yyyy")
End Sub
Danke Euch!
Greets Henner