Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
796to800
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
796to800
796to800
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Datum Format in Combobox

Datum Format in Combobox
30.08.2006 11:44:52
Bernd
Hallo zusammen!
Habe folgendes Problemchen
Ich fülle eine Combobox mit einer Schleife mit Datumswerten.
Ich hätte gerne das die Datumswerte in der Form Jan 95, Feb 95, Mär 95 usw. in der Combobox angezeigt werden. Bisher verwende ich diese sub:

Sub combobox1_fuellen()
Dim i As Integer
D = "Jan 95" 'Startwert
ComboBox1.Clear
For i = 0 To 24
ComboBox1.AddItem D
D = DateSerial(Year(D), Month(D) + 1, Day(D)) ' + 1 Monat
Next i
End Sub

Das Ergebnis ist das der erste Wert in der Combobox korrekt in der Form Jan 95 angezeigt wird die folgenden Werte jedoch in der Form 01.02.1995, 01.03.1995 usw.
Danke im Voraus für alle Tips!

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Datum Format in Combobox
30.08.2006 11:52:43
Piet
Hallo Bernd,
der erste Eintrag resultiert aus dem Text, den den du als Startwert definiert hast. Die weiteren Einträge werden mittels Dateserial völlig korrekt im Datumsformat ausgegeben. enn du das ändern willst, musst du zunächst die Monatszahl dem dreibuchstabigen String für den Monat zuordnen, z.B. über ein Array. Anschließend musst du nur den Monat berechnen und die Jahreszahl anhängen. Das funktioniert z.B. über ein Berechnen aus dem Ergebnis von Dateserial.
Gruß
Piet
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige