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

Formattierung von Textboxen

Forumthread: Formattierung von Textboxen

Formattierung von Textboxen
24.09.2004 14:59:01
Textboxen
Grüß Euch!
Ich habe ein Userform mit sehr vielen Textboxen für Zahlen. Was muss ich tun, damit diese Felder nach dem Bestätigen mit einem Tausender-Punkt, wie wir es bei der Zahlenformattierung in EXCEL-Tabellen kennen, ergänzt wird.
Ich hatte mein Problem bereits einmal ins Forum gestellt, aber ohne Erfolg, vielleicht klappt es diesmal.
Danke im Voraus für Eure Mühe, herzliche Grüße, Christian
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Formattierung von Textboxen
24.09.2004 15:14:35
Textboxen
ein moeglicher weg waere vielleicht den string aus der box auszulesen ihn nach der 4 stelle zu trennen und einen punkt anzuhaengen und dann alles verbinden und wieder in die box schmeissen
also pseudocode in etwa so
s=textbox.text
s2= s[1]&s[2]&s[3]&s[4] 'die ersten 4zeichen rausholen
sneu=s2&"."
for i = 5 bis len (s)
sneu = sneu & s[i]
next i
aber eigentlich isses bloedsinn da n punkt reinzumachen, wenn der wert wieder ausgelesen werden soll musste naemlich wieder den punkt beruecksichtigen ....
ausserdem musst du bei diesem bespiel noch bedingungen beachten falls n minus davor is und/oder die laenge nich groesser = 4 ist
gruss
grumble
Anzeige
viel zu kompliziert!!!!
Uduuh
Hallo,
so ist's einfacher:

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If IsNumeric(TextBox1.Text) Then TextBox1.Text = Format(TextBox1.Text, "#,##0")
End Sub

Der Punkt wird nur hinzugefügt, wenn es wirklich eine Zahl ist.
Und rechnen kannst du auch damit.
Gruß aus'm Pott
Udo
Anzeige

Forumthreads zu verwandten Themen

Wert aus Combobox zurückgeben in Textboxen
Peter

Hallo wertes Form
bin kurz vor der Vollende meinesWerkes
benötige aber noch die Hife aus dem Forum
Ich habe eine Combox19, die beim öffnen die 5000-26000 in 100 Steps an zeigt
Wenn ich den wert 0 bis 6999 eingebe soll in einer Textbox27 der wert 130 ausgegeben werden.
ab dem...
10.08.2008 22:06:00
Thread-ID: 1000671
6 Beiträge
Anzeige
Addieren von Textboxen - Fehlermeldung
Textboxen

Hallo nochmals
ich mochte mit folgender Zeile Textboxen addieren:
Private Sub TXT_ZEIT3_Change() TXT_ERG = CDbl(TXT_ZEIT1.Value) + CDbl(TXT_ZEIT2.Value) + CDbl(TXT_ZEIT3.Value) End Sub
Funzt...
Allerdings wenn ich jetzt in txt_Zeit1 oder txt_Zeit2 die Zahl lösche um sie zu ve...
14.08.2008 01:47:20
Thread-ID: 1001684
7 Beiträge
Wie kann ich 3 Textboxen wert addieren
Kurt

Guten Abend,
wie kann ich 3 Werte der Textboxen addieren ?
Habe es so versucht:
Label69.Caption = TextBox13.Value + TextBox14.Value + TextBox15.Value
mfg Kurt
(nicht Orginal)
14.08.2008 22:54:00
Thread-ID: 1001982
3 Beiträge
Färben von Textboxen in Userform
Textboxen

Guten Morgen!
Ich habe in einer UserForm 22 TextBoxen in denen Zahlen stehen.
Wenn eine positive Zahl in den Textboxen steht, dann soll der Hintergrund (Backcolor) grün gefärbt werden.
Wenn eine negative Zahl in den Textboxen steht dann soll der Hintergrund hellrot gefärbt werden.<...
21.08.2008 09:38:00
Thread-ID: 1003354
3 Beiträge
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 18:24:26
Thread-ID: 1010158
1 Beitrag
TextBoxen formatieren
Frank

Hallo liebes Forum!
Wieder einmal brauche ich Rat! In einem Tabellenblatt befinden sich mehrere Textboxen, welche über die Eigenschaft LinkedCell sich ihren Inhalt holen. Nun möchte ich das wenn der darin befindliche Wert negativ ist, der Inhalt rot geschrieben wird. Wie bekomme ich zwische...
28.10.2008 21:37:00
Thread-ID: 1020080
9 Beiträge
Anzeige
TextBoxen werden nicht geleert
Josef

Hallo!
Ich habe folgenden Code in einer Userform
Private Sub ListBox1_Click() On Error Resume Next If ListBox1.List(ListBox1.ListIndex, 7) = "EV-N / FV-XPV" Then Call Text_EF Call Text_EF2 Call Text_EF3 TextBox40.Text = "" Else If ListBox1.List(ListBox1.ListIndex, 7) = "J" Then TextBo...
29.10.2008 15:19:00
Thread-ID: 1020283
2 Beiträge
Textboxen aus Tabelle füllen
Sebastian

Guten Abend zusammen,
ich sitze wieder mal vor einem Problem und hoffe auf eure Hilfe. Ich habe eine Tabelle mit Kundennamen, die sich von Monat zu Monat verändert. Ich möchte nun (wenn möglich) eine Userform mit einer variablen Anzahl von Textfeldern auf "Knopfdruck" generieren, wobei die...
03.11.2008 19:25:00
Thread-ID: 1021413
5 Beiträge
Anzeige
Nur Zahlen in sehr vielen Textboxen
uli

Hallo,
habe ein im Internet gefunden, der allerdings noch ein bisschen angepasst werden muss. Vielleicht könnt ihr mir helfen, da ich an dieser Stelle nicht mehr weiterkomme.
Ich möchte die Eingabe von Buchstaben in mehreren Textboxen verbieten. Dies mache ich mit folgendem Code in eine...
13.11.2008 11:24:00
Thread-ID: 1024091
2 Beiträge
Rechnen mit TextBoxen
Frank

Hallo Zusammen!!!
Einen schönen guten Abend und schon vorab Danke für bestimmt zahlreiche Hilfe!
Ich benutze folgenden Code:
TextBox4.Value = TextBox2.value - TextBox3.Value
Diese Codezeile wird mittels Klick auf eine Schaltfläche ausgelöst. Funzt mit normalen Zahlen auch Super,...
14.11.2008 20:27:33
Thread-ID: 1024690
6 Beiträge
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
13.05.2026 14:24:56
VBA Projekt Passwort automatisch eingeben
13.05.2026 08:49:41
Reale Berechnung ohne Nachkommawerte
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum