Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 09:08:00
Export alle Tabellenblätter als csv - in bestimmten Ordner
26.04.2024 08:56:40
Über alle Spalten nur €-Werte zählen
26.04.2024 08:08:24
Pivot Vormonatsveränderung
26.04.2024 07:54:11
nur den ersten Eintrag in spalte zählen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
188to192
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
188to192
188to192
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Userform Textfeld als Zahl formatieren

Userform Textfeld als Zahl formatieren
04.12.2002 11:34:45
Chris
Hallo,

ich habe ein Excel Programm das die Daten von einer Userform in Excel schreibt. Auf der Userform sollen die Eingabewerte als formatierte Zahl angezeigt werden (die Eingabe erfolgt über die Userform). Die Ausgabe soll einen Punkt als Tausender-Trennzeichen enthalten (Bsp.: 125.00,74 €). Leider habe ich keine Ahnung wie man das realisiert. Folgendes habe ich versucht:

Private Sub TextBox333_Change()
TextBox333.Text = Format(TextBox333.Text, "#,##0.00")

End Sub
Leider ohne Erfolg. Was mache ich falsch???

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Userform Textfeld als Zahl formatieren
04.12.2002 11:52:04
Michael Scheffler
Hallo,

wo ist denn hier die Tausend?

>125.00,74 €).

Ansonsten: im Change-Ereignis der Textbox schauen, wann ein Komma kommt und dann von dem aus immer "3" zurückzählen und dort einen bzw. mehrere Punkte eintragen. Aber wozu der Aufwand, bevor Du die Zahl nicht wenigstens bis zum Komma eingegeben hast, rührt sich nichts. Und das ist bei Eingabe in eine Zelle genauso.

Gruß

Micha

Re: Userform Textfeld als Zahl formatieren
04.12.2002 12:09:01
Chris
Zunächst vielen Dank für die schnelle Antwort.
Sorry, ich meinte 125.000,74 ich war wohl zu schnell. :-)
Ich muss zugeben das ist alles Neuland für mich. Die Zahl soll auch erst mit Verlassen des Feldes formatiert werden. Wenn ich die Zahl in die Userform eingebe auch beim Change-Ereignis, wird die Zahl auf der Userform als 12500074 ausgegeben.
Anzeige
Re: Userform Textfeld als Zahl formatieren
04.12.2002 12:38:54
Ralf Sögel
Das Change- Ereignis ist nicht so gut, weil es bei jeder Änderung erneut ausgelöst wird, machs so:
Private Sub TextBox4_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Not IsNumeric(TextBox4) Then
TextBox4 = ""
End If
TextBox4 = Format(TextBox4, "#,##0.00")
End Sub
Re: Userform Textfeld als Zahl formatieren
04.12.2002 12:55:23
Michael Scheffler
Hallo,

was sol am Change nicht gut sein? Wenn Du auf falsch einegebene Zeichen absuchst, machst Du das auch im Change. Deine Lösung braucht man ja dann auch nicht mehr, weil er die Zahl in eine entsprechend formatierte Zelle schreibt.

Gruß

Micha

Re: Userform Textfeld als Zahl formatieren
04.12.2002 13:14:51
Chris
Hallo,

ich kann leider nicht beurteilen, welches Ereignis besser ist, aber mit der Beschreibung von Ralf funktioniert es, es gibt dabei allerdings noch ein kleines Problem. Das Textfeld wird komischerweise erst dann formatiert, wenn ich es mit Tab verlasse, wieder zurückkehre und es erneut verlasse. Woran kann das liegen?

Auf jeden Fall schon einmal vielen Dank Euch beiden!

Anzeige
Re: Userform Textfeld als Zahl formatieren
04.12.2002 13:36:12
Ralf Sögel
das liegt daran, dass das Exit- Ereignis verwendet wird(verlassen)!
Re: Userform Textfeld als Zahl formatieren
04.12.2002 13:39:23
Ralf Sögel
Klar, es gibt mehrere Möglichkeiten. Die Eingabe soll doch wohl formatiert in der Textbox stehen.
Re: Userform Textfeld als Zahl formatieren
04.12.2002 13:46:57
Chris
Die Zahl wird aber doch erst beim zweiten verlassen formatiert, aber komischerweise nur wenn vor dem Textfeld ein Bezeichnungsfeld steht. Bei einem Kombinationsfeld vorab wird die Zahl dann bereits nach dem ersten Verlassen richtig formatiert.
Re: Userform Textfeld als Zahl formatieren
04.12.2002 15:52:14
Ralf Sögel
Sorry, kann ich nicht nachvollziehen.

50 Forumthreads zu ähnlichen Themen

Formateierung von Textboxen in einer Userform
Textboxen

Hallo, nochmal 'ne warscheinlich blöde Frage:
Wie man Schriftart, Farbe etc. für Textboxen einstellt, bekomme ich hin. Aber
wie lege ich fest, dass es sich um das Format "Zahl" mit x Kommastellen oder
ähnliches handeln soll? - Hintergrund:
Auf einer Userform muß der Benutzer in...
16.09.2008 16:24:26
Thread-ID: 1010158
2 Beiträge
Anzeige
VBA TextBox Formatierung
Andy

Guten Morgen zusammen
Bin mal wieder auf der Suche nach Hilfe.
Habe ein UF mit Textboxen, in einer Textbox sollte ich zahlen eingeben.
und möchte das dies gleich auch in der UF so dargestellt wird und auch in der
Tabelle.
123.4.456.789 = Darstellung
123445679 = Eingabe...
17.11.2012 08:16:50
Thread-ID: 1287043
16 Beiträge
VBA: textbox afterupdate format Datum
Bernd

Hallo zusammen,
irgendwie bekomme ich das nicht richtig hin, vielleicht kann mir jemand behilflich sein und den Code berichtigen.
Hier mein Code, der nicht funktioniert:
Private Sub TextBox5_AfterUpdate() 'TextBox5 = format(CDbl(TextBox5), "TT.MM.JJJJ") End Sub Vielen Dank im...
03.06.2013 19:44:47
Thread-ID: 1316131
3 Beiträge
Anzeige
VBA: UserForm mit TextBoxen
Ernst Dunkel

In UserForm1 habe ich sechs TextBoxen mit gleich Code.
Wie muss ich die untenstehende Prozedur vereinfachen, so dass der Code für alle TextBoxen in UserForm 1 gilt, ohne die Prozedur 5 mal zu kopieren?
Private Sub TextBox1_KeyPress(ByVal KeyAscii As msforms.ReturnInteger)
Dim TMP$
19.07.2002 15:34:13
Thread-ID: 138550
11 Beiträge
Userform-Textbox Text formatieren
Klaus

Wie sag ich´s Excel, dass der Inhalt einer Textbox auf Leerzeilen geprüft wird und wenn vorhanden, diese Leerzeilen vor dem Übertragen des Inhalts der Textbox in eine Tabelle gelöscht werden, so das nur der reine Text übertragen wird.
24.07.2002 13:26:51
Thread-ID: 139922
6 Beiträge
Ergebnisabhängiges Zahlenformat (VBA)
Thomas

Hallo,
ich habe da ein Problem und bekomme es ob meines VBA-noobismus nicht hin :-(
Ich habe in der Matrix (B16:B22) recht große Formeln. Ich brauche aber abhängig vom Ergebnis unterschiedliche Formate. Nach jeder neuberechnung, müsste also auch das Format neu festgelegt werden. Mit zwi...
20.11.2014 10:18:37
Thread-ID: 1393402
2 Beiträge
Zahlenformat VBA
andthen

Hallo Zusammen,
ich sitze nun seit längerer Zeit an einer kleinen Sache und finde die Lösung einfach nicht.
Ich kopiere mithilfe eines Makros 2 Spalten aus einer Quelldatei in eine Zieldatei.
Die Zahlen 1000 als Zahlen und mit einem Tausenderpunkt getrennt.
Kopiere ich nun mit...
06.01.2015 15:49:57
Thread-ID: 1401052
6 Beiträge
Zahlenformat mit oder ohne vba
Gerhard

Hallo alle,
über einen button erhöhe ich in einer Zelle eine fünfstellige Zahl um 1.
wsB.Range("E17").Value = wsB.Range("E17") + 1
Nun möchte ich aber noch, dass nach der Zahl ein Bindestrich und das aktuelle Jahr steht, also z.B.: 00956 - 2015.
Es würde mir auch reichen, wenn d...
06.02.2015 09:09:56
Thread-ID: 1407676
8 Beiträge

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
1
5
15
2
21
10
5
1
5
7
4
3
2
2
2
5
1
1
7
3
2
8
2
3
4