Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
328to332
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
328to332
328to332
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Format hh:mm + Text im Combofeld

Format hh:mm + Text im Combofeld
26.10.2003 17:09:00
Stefan
Hallo Leute
Nochmal

Folgendes möchte in ein bestehendes Kombinationsfeld das bisher die Auswahl von verschiedenen Uhrzeiten hatte

11:00 - 12:00 - 13:00 usw.

mit Texteinträgen erweitern.

z.b. 11:00 - 12:00 - 13:00 - Ausgelaufen - Erledigt u.s.w

Bisher habe ich um eine korekte Formatierung zu erhalten jenen VBA eintrag


Private Sub ComboBox2_Change()
ComboBox2.Value = Format(CDate(Cells(18, 4)), "hh:mm")
End Sub


Jedoch bekomme ich bei auswahl einesTexteintrages nun immer einen Laufzeitfehler 13 -Typen Unverträglich

wie lässt sich dieses beheben

Please Help !

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

Betreff
Datum
Anwender
Anzeige
AW: Format hh:mm + Text im Combofeld
26.10.2003 17:26:24
Josef Ehrensberger
Hi Stefan,

probier mal so:


Private Sub ComboBox2_Change()
if IsDate(Cells(18,4) Then
ComboBox2.Value = Format(CDate(Cells(18, 4)), "hh:mm")
Else
ComboBox2.Value = Cells(18, 4)
End If
End Sub


Gruß Sepp
AW: Format hh:mm + Text im Combofeld
26.10.2003 18:13:35
Stefan
Funktioniert leider nicht

Private Sub ComboBox2_Change()
if IsDate(Cells(18,4) Then  ---- DIESER ABSATZ WIRD ROT GEKENNZEICNET----
ComboBox2.Value = Format(CDate(Cells(18, 4)), "hh:mm")
Else
ComboBox2.Value = Cells(18, 4)
End If
End Sub


Trotzdem Danke
Sepp
Anzeige
IsNumeric statt IsDate (o.T.)
26.10.2003 18:54:08
Josef Ehrensberger
/

304 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige