Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1508to1512
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
1508to1512
1508to1512
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Textbox auf Uhrzeit prüfen

Textbox auf Uhrzeit prüfen
12.08.2016 13:43:52
Nicolai
Hallo zusammen,
ich habe eine TextBox in einer Userform in die eine Uhrzeit eingetragen wird "hh:mm".
Die TextBox habe ich einer Variablen zugewiesen:
Public wert1 As Date
wert1 = UserForm2.TextBox2
Nun möchte ich prüfen ob "wert1" eine Uhrzeit ist. Kann mir jemand auf die Sprünge helfen, wie ich zur Lösung komme?
Vielen Dank & Grüße,
Nicolai

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Textbox auf Uhrzeit prüfen
12.08.2016 14:24:24
Matthias
Hallo
Probiers mal so, ab das klappt
Option Explicit
Public wert1 As Date
Private Sub CommandButton1_Click()
On Error GoTo Fehler
wert1 = UserForm2.TextBox2
If IsDate(wert1) And InStr([wert1], ":") > 0 Then MsgBox "Ja es ist eine Zeit"
Fehler:
End Sub
Gruß Matthias
AW: Textbox auf Uhrzeit prüfen
12.08.2016 15:29:14
Nicolai
Super, vielen dank. Funktioniert.
AW: Textbox auf Uhrzeit prüfen
15.08.2016 12:20:22
Nicolai
Ich hätte noch eine Frage zu diesem Marko.
Ich will das oben aufgeführte Makro nun auch für eine zweite TextBox(wert2) ausführen, ist es irgendwie möglich das zusammen zu fassen?
Vielen Dank & Grüße,
Nicolai
AW: Textbox auf Uhrzeit prüfen
15.08.2016 12:56:45
Werner
Hallo Nicolai,
wie meinst du das?
Zwei TextBoxen auf der gleichen UserForm auf Uhrzeit prüfen?
Nur wenn in beiden gültige Uhrzeit dann soll was passieren?
Gruß Werner
Anzeige
AW: Textbox auf Uhrzeit prüfen
15.08.2016 13:26:51
Nicolai
Hallo Werner,
Ja genau, ich habe zwei TextBoxen in einer UserForm, welche beide auf Uhrzeit geprüft werden sollen. Wenn beide gültig sind soll er mir ein anderes Makro ausführen und wenn nicht, eine MsgBox ausgeben.
Vielen Dank & Grüße,
Nicolai
AW: Textbox auf Uhrzeit prüfen
15.08.2016 13:41:16
Werner
Hallo Nicolai,
ungetestet
Option Explicit
Public wert1 As Date
Public wert2 As Date
Private Sub CommandButton1_Click()
On Error GoTo Fehler
wert1 = UserForm2.TextBox2
wert2 = UserForm2.TextBox3 'anpassen
If IsDate(wert1) And InStr([wert1], ":") > 0 And IsDate(wert2) And InStr([wert2], ":") > 0 Then
MsgBox "Ja es ist eine Zeit in beiden Textboxen"
Else
MsgBox "Keine gültige Zeit in TextBox 2 oder TextBox 3"
End If
Fehler:
End Sub
Gruß Werner
Anzeige
AW: Textbox auf Uhrzeit prüfen
15.08.2016 14:30:06
Nicolai
Hallo Werner,
ohne am Makro etwas zu verändern, funktioniert es.
Allerdings will ich beim ersten MsgBox ein Makro einbauen, dies funktioniert leider nicht oder ich habe es falsch eingebaut. Ich habe meine Beispielsdatei mal angehängt:
https://www.herber.de/bbs/user/107630.xlsm
Mein Makro führt er zwar nun aus aber wenn ich eine falsche Uhrzeit einfüge, dann kommt die Fehlermeldung leider nicht.
Vielen Dank & Grüße,
Nicolai
AW: Textbox auf Uhrzeit prüfen
15.08.2016 17:43:14
Werner
Hallo Nicolai,
das Option Explicit hat schon seinen Sinn. Da wirst du angemeckert, wenn du nicht alle Variablen definiert hast. Das war bei dir der Fall, du hast dann mal ganz großzügig das Option Explicit auskommentiert anstatt deine Variablen zu definieren.
Schau dir mal die hochgeladene Datei an. Das On Error habe ich auch rausgeschmissen.
https://www.herber.de/bbs/user/107636.xlsm
Gruß Werner
Anzeige
AW: Textbox auf Uhrzeit prüfen
16.08.2016 10:48:11
Nicolai
Hallo Werner,
das Makro funktioniert nun wunderbar, vielen dank.
Viele Grüße,
Nicolai
AW: Gerne u. Danke für die Rückmeldung. o.w.T
16.08.2016 13:05:17
Werner

47 Forumthreads zu ähnlichen Themen

Vor Eingabe per Userforn prüfen ob schon vorhanden
Jaffi

Hallo Forum,
kleines Zwischenproblem was ich irgendwie nicht lösen kann :(
Per Knopfdruck in einer Userform möchte ich ein Tabellenblatt befüllen:
Private Sub eingabebutton_Click() Dim lFreie As Long Set wksean = Worksheets("EANCodes") If artikelnummereingabe.Value = "" And bezei...
22.05.2009 16:58:18
Thread-ID: 1076759
5 Beiträge
Anzeige
TextBox Inhalt auf Richtigkeit prüfen
Frank

Hallo am Sonntagabend!!!
Wenn man wie ich mit VBA arbeiten möchte, aber es nicht kann, kommen dann vielleicht solche Fragen auf.
Ich möchte gern prüfen, wenn ich eine TextBox verlasse ob die Eingabe ein bestimmtes Format hat, so zum Beispiel: "00.0000.0000", aus den Nullen werden natürl...
28.06.2009 21:11:34
Thread-ID: 1084949
4 Beiträge
Textbox auf 'tausender erhöhen incl. Komma
k

Hallo,
habe folgenden Code, um den Inhalt einer Textbox so anzupassen beim verlassen, dass aus einer eingegebener Zahl die kleiner 1.000 ist, diese * 1.000 genommen wird, bzw. wenn >1.000 soll nichts gemacht werden.
Zudem soll der Inhalt der Textbox im Format "Tausend - Euro" ausgew...
28.07.2009 14:46:34
Thread-ID: 1091941
5 Beiträge
Anzeige
Text aufteilen bis Komma
walli

Guten Abend,
ich habe in der Spalte X (24) einen langen Text.
Nun möchte ich in der Spalte Y (25) den Text kopiert haben bis zum Komma.
Immer ab Zeile 4 bis zum Ende, das Ende sool in der Spalte "B" ermittelt werden.
Wenn möglich mit einem Makro ?
mfg walli
26.08.2010 20:52:22
Thread-ID: 1174384
25 Beiträge
Prüfen ob erste Zahl im Textbox eine 0
urmila

Hallo zusammen,
ich bitte um eure Hilfe.
Es soll in einer TextBox geprüft werden, ob die erste Zahl eine Null (0) ist, wenn nein, soll eine 0 und dann die restlichen Zahle eingefügt werden.
z.B gebe ich eine "7" ein, so soll automatisch die 0 hinzugefügt werden....also dann "07"
...
11.11.2010 13:39:15
Thread-ID: 1186288
4 Beiträge
Textbox auf Eingabe Prüfen
Volker

Hallo zusammen,
ich versuche mittels nachstehendem Code die Daten an eine Tabelle zu übergeben.
Die Textboxen werden über eine Listbox dblClick in die Textboxen übernommen. Hier werden sie bearbeitet
und zurückgeschrieben.
Was mir probleme macht ist Cdate. In der Tabelle kommt n...
30.04.2011 18:14:50
Thread-ID: 1212472
7 Beiträge
Prüfen, ob Textinhalt nur ein Wort
Fritz_W

Hallo Forumsbesucher,
mit welcher Formel kann ich ermitteln, ob der Inhalt in Zelle B1 nur aus einem Wort besteht.
Nur in diesem Fall sollte dann in C1 der Inhalt von B1 angezeigt werden.
Beispiele:
in B1 steht Meier, Max dann in C1 ""
in B1 steht Meier dann in C1 Meier
...
20.10.2011 09:10:53
Thread-ID: 1234617
5 Beiträge
Prüfen, ob Text enthält
stefan

Hallo,
wie prüfe ich, ob ein bestimmter Text in einer E-mail-Adresse vorkommt?
zählenwenn? Oder gibt es noch bessere Funktionen?
Danke für Eure Antwort.
VG
13.06.2012 15:43:18
Thread-ID: 1267285
4 Beiträge
Anzeige

Links zu Excel-Dialogen

CommandButton TextBox

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
4
10
3
4
3
24
3
6
4
3
6
3
2
2
1
12
5
7
2
3
3
2
6
6
5