Anzeige
Archiv - Navigation
896to900
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
896to900
896to900
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Textfeld mit Währungsformat formatieren

Textfeld mit Währungsformat formatieren
16.08.2007 16:01:17
Birgit

Hallo Experten,
ich muss schon wieder eine dusselige Frage stellen... Ich versuche ein Textfeld in einer Userform auf das Währungsformat zu formatieren. Leider kann aber bei meiner Version immer nur eine Zahl eingegeben werden!? Woran liegts?


Private Sub txtPreis_Change()
Me.txtPreis.Value = Format(Me.txtPreis.Value, "#,##0.00")
End Sub


Gruß Birgit

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Textfeld mit Währungsformat formatieren
16.08.2007 16:13:02
Walter
Hallo Mädchen,
Ich kann Dir Deine Frage zwar nicht beantworten,
doch "dusselige Fragen" gibte es nicht,
es gibt nur dusselige Antworten.
Gruß
Rentner Walter

AW: Textfeld mit Währungsformat formatieren
16.08.2007 16:13:04
Quicky
Hi Birgit
das sollte funzen:


Private Sub txtpreis_AfterUpdate()
txtpreis.Value = Format(txtpreis, "#,##0.00 €")
End Sub


Gruss Quicky

AW: Textfeld mit Währungsformat formatieren
16.08.2007 16:18:33
Renee
Hello Birgit,
das Format(Me.txtPreis.Value, "#,##0.00") ist ein reines Nummernformat.
Zudem solltest Du das Feld nicht dann verändern, wenn noch Eingaben getätigt werden.
Ein Ansatz könnte z.B. so aussehen:


Private Sub TextBox1_Enter()
TextBox1.Value = ""
End Sub
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1.Value = Format(TextBox1.Value, """EUR"" #,##0.00")
End Sub


Greetz Renee

Anzeige
Hurra! Danke vielmals an Renee
16.08.2007 16:23:44
Birgit
Hallo Renee,
das ist genau, was ich gesucht habe!
Herzlichen Dank!
Gruß Birgit

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige