Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 17:49:39
Bedingte Formatierung
25.04.2024 16:50:59
2 Zellen in 2 Blättern mit unterschiedlichen Bereichen vergl
25.04.2024 15:03:35
Unterschiedliche Dateien miteinander abgleichen lassen
25.04.2024 14:05:48
Makro in aktueller Zelle ausführen mit Doppelklick
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
544to548
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
544to548
544to548
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Userform Textbox formatieren als Zeit

Userform Textbox formatieren als Zeit
11.01.2005 17:04:48
Mark
Hallo,
wenn ich in meiner Textbox eine Zahl z.B. 8 eingegebe und die Textbox verlasse soll daraus 8:00 bzw. aus z.B. 10 soll 10:00 werden. Und die Textbox soll auf fünf Zeichen begrenzt werden. Trotzdem soll man auch z.B. 10:12 eingeben können.
1 0 : 0 0
1 2 3 4 5 Zeichen
Ich hoffe Ihr könnt mir weiter helfen.
Tausend Dank im voraus
Mark

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Userform Textbox formatieren als Zeit
Dennis
Hallo,
den Code für die Textbox eingeben:

Private Sub TextBox1_Exit(ByVal cancel As MSForms.ReturnBoolean)
TextBox1 = Format(Application.WorksheetFunction.Substitute(TextBox1, ":", ""), "00:00")
End Sub

Gruß Dennis
AW: Userform Textbox formatieren als Zeit
11.01.2005 18:43:47
Mark
Hallo,
danke für die schnelle Antwort, der o.g. Code funktioniert soweit.
Nur das wenn ich eine Zahl eingebe steht sie am Ende.
Was müßte man ändern damit sie am Anfang steht?
Mark
AW: Userform Textbox formatieren als Zeit
Beni
Hallo Mark,
Gruss Beni

Private Sub TextBox1_Exit(ByVal cancel As MSForms.ReturnBoolean)
Dim w, t As String
w = TextBox1.Value
If Left(w, 1) > 2 Then w = "0" & w
l = Len(w)
For I = l To 3
w = w & 0
Next I
t = Left(w, 2) & ":" & Right(w, 2)
TextBox1 = Format(Application.WorksheetFunction.Substitute(t, ":", ""), "00:00")
'TextBox1 = CDate(TextBox1)
End Sub

Anzeige

211 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
in Userform Textbox nur Datumswerte zulassen
tursiops

Hallo!
Tante Google konnte mir nicht wirklich weiterhelfen. Wie kann ich einer Texttext im Userform beibringen, dass sie nur Datumswerte ( TT.MM.JJJJ) annehmen darf?
Gruß tursiops
26.02.2009 17:16:09
Thread-ID: 1054478
9 Beiträge
VBA DateFormat zu String convertieren
MBorn

Guten Morgen,
weiß jemand, wie man ein Datum, das im DateFormat (als Zahl) vorliegt
in das Textformat (yyyy-mm-dd) konvertiert. Sodaß das Ergebnis ein Text ist?
sodaß beispielsweise aus der Zahl 39868 das Text-Datum "2009-02-24" wird?
Herzlichen Dank,
Born
18.03.2009 12:59:43
Thread-ID: 1061376
12 Beiträge
Anzeige
Userform Dateneingabe Textfeld Format
Lucia

Hallo zusammen zusammen und erstmal schöne Weihnachten:-)
Ich habe folgende kleine Geschichte:
mit diesen Code: Private Sub Datenuebernahme_Click() Range("A8").Select If ActiveCell.Offset(1, 0).Value "" Then Selection.End(xlDown).Select End If ActiveCell.Offset(1, 0).Select If NameZah...
25.12.2010 12:48:39
Thread-ID: 1192782
6 Beiträge
Datediff mithilfe von Textboxen auf UserForm
Textboxen

Hallo liebe Spezialisten!
Auf einer UserForm habe ich 3 Textboxen. TextBox1 (Eingabe Datum tt.mm.yyyy) Beginn, TextBox2 = Datum Ende (Eingabe tt.mm.yyyy). In Textbox3 soll dann die Differenz in Tagen berechnet werden.
Darüber hinaus befinden sich 2 Optionschaltflächen auf der Userform....
06.06.2012 17:44:15
Thread-ID: 1266437
6 Beiträge
In Userform über mehrere Textboxen Daten aufrufen
Fredy

Hallo alle
Ich suche ein Code mit dem ich Daten Aus einer Tabelle über Textboxen aufrufen und in weiteren boxen Anzeigen lassen Kann
Also in Box3 gib ich die Artikel.nr. ein und in Box 4-6-7 sollen die Daten Angezeigt werten
In Box 5 gebe ich die menge selber an
Ich sollte am...
09.06.2012 12:38:17
Thread-ID: 1266564
2 Beiträge
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, Bedingte Formatierung, Datenbalken
Hajo_Zi

Hallo,
ich habe in einer Zelle den Text zu stehen "=$J$7".
Diesen Text möchte ich mittels VBA bei bedingter Formatierung, Datenbalken, Min zuweisen.
Nach dem aufgezeichneten Code wird mit der gleichen Anweisung zugwiesen das es eine Formel ist.
.MinPoint.Modify newtype:=xlCondit...
22.04.2013 17:41:05
Thread-ID: 1309874
11 Beiträge
Anzeige

Links zu Excel-Dialogen

TextBox UserForm

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
1
8
11
4
5
5
1
15
10
2
13
10
1
9
4
10
5
4
9
3
4
1
2
2