Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 17:57:35
Zellen-Name aus A1 nach H1 übertragen mit Prä- + Suffix
17.10.2025 11:36:58
verschachteltes Dropdown-Menü
17.10.2025 10:28:49
Call Anweisung
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
892to896
892to896
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Combobox mit Datumsausgabe

Forumthread: Combobox mit Datumsausgabe

Combobox mit Datumsausgabe
06.08.2007 14:37:40
Markus
Hallo Zusammen,
ich versuche gerade mittels Combobox einen Datumswert in Zelle A1 zu schreiben. Mittels folgendem Code habe ich es ja schon mal hinbekommen, daß ich auch ein Datum sehe, nur leider wird der Wert in Zelle A1 nur in Textformat ausgegeben. Für Funktionen mit Datumsbezug ist dies leider hinderlich.
Zudem soll als Standard, vor betätigen der Combobox immer der Wert aus Zelle G1 in der Combobox stehen
https://www.herber.de/bbs/user/44789.xls 

Private Sub ComboBox1_Change()
ComboBox1 = Format(ComboBox1.Value, "dd.mm.yyyy")
End Sub


Kann mir hier jemand helfen.
Danke
Markus

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Combobox mit Datumsausgabe
06.08.2007 15:04:00
Beverly
Hi Markus,
nimm die LinkedCell aus den Eigenschaften der ComboBox und schreibe diesen Code in das Change-Ereignis

Private Sub ComboBox1_Change()
Dim daDatum As Date
ComboBox1 = Format(ComboBox1.Value, "dd.mm.yyyy")
Range("A1") = Format(CDate(ComboBox1.Value), "dd.mm.yyyy")
End Sub


Damit immer der Inhalt von G1 in der Combobox steht, könntest du z.B. folgenden Code im Workbook_Open Ereignis verwenden


Private Sub Workbook_Open()
Worksheets("Tabelle1").ComboBox1 = Worksheets("Tabelle1").Range("G1")
End Sub


________________________________________

Anzeige
AW: Combobox mit Datumsausgabe
06.08.2007 15:44:00
Markus
Hallo Karin,
danke für deine Hilfe. Leider habe icjh damit immer noch das gleiche Problem, habe mir aber mitlerweile mit folgender formel weitergeholfen:
=WECHSELN(WECHSELN(A1;",";"");".";",")*1
Danke und noch einen schönen Tag noch.
Gruß
Markus
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige