Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Combobox mit Datum füllen

Combobox mit Datum füllen
20.01.2016 12:40:17
Klaus
Hallo Forum
kann mir irgend jemand bei meinem "kleinen" Problem helfen?
ich habe 2 Comboboxen
die 1.Combobox lasse ich mit Monatsnamen füllen (Januar-Dezember)
jetzt zu meinem Problem:
wie bekomme ich das hin, dass mir jetzt in der 2. Combobox, in Abhängigkeit der 1. Box, die Datumswerte ausgegeben werden.
Bsp.
1. Box - Januar auswählen
2. Box sollen jetzt der 01.01.2016 bis 31.01.2016 ausgegeben werden
bekommt man das irgendwie hin?
danke für eure Hilfe
Klaus

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Combobox mit Datum füllen
20.01.2016 12:51:55
Rudi
Hallo,
Private Sub ComboBox1_Change()
Dim i As Long, dStart As Date
ComboBox2.Clear
dStart = CDate("1." & ComboBox1)
For i = dStart To DateSerial(Year(dStart), Month(dStart) + 1, 0)
ComboBox2.AddItem Format(i, "DD.MM.YYYY")
Next
End Sub

Gruß
Rudi

Anzeige
AW: Combobox mit Datum füllen
20.01.2016 16:35:43
Klaus
Hallo Rudi
Vielen Dank
Passt super
Grüße klaus
;
Anzeige

Infobox / Tutorial

Combobox mit Datumswerten in Excel füllen


Schritt-für-Schritt-Anleitung

Um eine Combobox mit Datumswerten in Excel zu füllen, folge diesen Schritten:

  1. Öffne Excel und erstelle ein neues Arbeitsblatt.

  2. Füge zwei Comboboxen hinzu. Du kannst dies tun, indem du die Entwicklertools aktivierst und die Steuerelemente auswählst.

  3. Benenne die erste Combobox als ComboBox1 und die zweite als ComboBox2.

  4. Fülle die erste Combobox mit den Monatsnamen von Januar bis Dezember. Das kannst du manuell in die Eigenschaften der Combobox oder durch VBA-Code tun.

  5. Füge folgenden VBA-Code in das Code-Modul des Arbeitsblatts ein:

    Private Sub ComboBox1_Change()
       Dim i As Long, dStart As Date
       ComboBox2.Clear
       dStart = CDate("1." & ComboBox1)
       For i = dStart To DateSerial(Year(dStart), Month(dStart) + 1, 0)
           ComboBox2.AddItem Format(i, "DD.MM.YYYY")
       Next
    End Sub
  6. Teste die Comboboxen, indem du einen Monat in ComboBox1 auswählst. In ComboBox2 sollten nun die entsprechenden Datumswerte angezeigt werden.


Häufige Fehler und Lösungen

  • Fehler: ComboBox2 bleibt leer.

    • Lösung: Stelle sicher, dass der VBA-Code korrekt in das richtige Arbeitsblatt eingefügt wurde und dass ComboBox1 tatsächlich einen Monat ausgewählt hat.
  • Fehler: Die Monate werden nicht korrekt angezeigt.

    • Lösung: Überprüfe die Formatierung und die Werte, die in ComboBox1 eingefügt wurden. Sie sollten exakt mit den Monatsnamen übereinstimmen.

Alternative Methoden

Falls du keine VBA-Programmierung verwenden möchtest, könntest du auch die Datenüberprüfung in Excel nutzen, um die Monate auszuwählen und eine separate Tabelle für die Datumswerte anzulegen. Damit kannst du die Datumswerte manuell eingeben und dann abhängig von der Auswahl in ComboBox1 die entsprechenden Werte in ComboBox2 ausgeben.


Praktische Beispiele

Hier ist ein praktisches Beispiel, das die oben genannten Schritte veranschaulicht:

  1. Monatsnamen in ComboBox1:

    • Januar
    • Februar
    • März
    • April
    • Mai
    • Juni
    • Juli
    • August
    • September
    • Oktober
    • November
    • Dezember
  2. Wenn du Januar auswählst, sollten in ComboBox2 folgende Werte erscheinen:

    • 01.01.2016
    • 02.01.2016
    • ...
    • 31.01.2016

Dieses Beispiel zeigt, wie flexibel die Verwendung von Comboboxen in Excel sein kann, insbesondere wenn du mit Datumswerten arbeitest.


Tipps für Profis

  • Automatisierung: Du kannst den VBA-Code erweitern, um weitere Funktionen wie die Auswahl eines Jahres zu ermöglichen und die Datumswerte dynamisch zu generieren.
  • Benutzerdefinierte Formate: Experimentiere mit verschiedenen Datumsformaten in der AddItem-Methode, um deinen Anforderungen gerecht zu werden.
  • Fehlerbehandlung: Implementiere Fehlerbehandlungsroutinen im VBA-Code, um unerwartete Eingaben zu handhaben und die Benutzerfreundlichkeit zu erhöhen.

FAQ: Häufige Fragen

1. Kann ich die Comboboxen auch ohne VBA verwenden? Ja, du kannst die Comboboxen auch mit Datenüberprüfung und benutzerdefinierten Listen in Excel füllen, allerdings ist die Flexibilität geringer.

2. Funktioniert dies in allen Excel-Versionen? Die beschriebenen Methoden funktionieren in den meisten modernen Excel-Versionen, insbesondere ab Excel 2007 und höher.

3. Wie kann ich die Monatsnamen automatisch generieren? Du kannst die Monatsnamen in einer separaten Tabelle hinterlegen und mit einer Formel in ComboBox1 einfügen, um manuelle Eingaben zu vermeiden.

Beliebteste Forumthreads (12 Monate)

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