DateSerial

Forumthread: DateSerial
7 Beiträge zu diesem Forumthread
Anzeige

Forumthread: DateSerial

DateSerial

30.10.2025 17:54:28

Frank H.

Hallo Zusammen,

im Change Ereignis der ComboBox2 steht folgender Code - Schnipsel.

i = ComboBox2.ListIndex

If ComboBox2.ListIndex = 1 Then
ActiveSheet.Range("A10") = DateSerial(CDbl(ComboBox1), Month(i), 1)
End If

Wenn ich Debugge ergibt wenn ich in der ComboBox Januar auswähle i gleich 1.

Aber warum steht dann in der Zelle A10 nun der 01.12.2025 und nicht der 01.01.2025

Die ComboBox2 ist wie folgt gefüllt:

bitte auswählen
Januar
Februar
.
.
.
Dezember

Weiß jemand wo ich den Wald vor lauter Bäumen nicht erkenne.

Bitte um Hilfe und vorab Danke!

L.G. Frank H.

7
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: DateSerial

30.10.2025 17:57:32

UweD
AW: DateSerial

30.10.2025 18:01:47

UweD
AW: DateSerial

30.10.2025 18:06:34

Frank H.
AW: DateSerial

30.10.2025 18:00:40

Christian
an Uwe

30.10.2025 18:01:16

Christian
AW: an Uwe

30.10.2025 18:10:44

Frank H.
AW: an Uwe

30.10.2025 18:13:42

Christian

AW: DateSerial

30.10.2025 17:57:32

UweD

Hallo

Syntax ist: DateSerial(Jahr, Monat, Tag)

LG UweD

AW: DateSerial

30.10.2025 18:01:47

UweD

Sorry war zu schnell

Der Listindex beginnt mit 0 = erstes Element

Dann wird in deinem Fall der Vormonat verwendet

AW: DateSerial

30.10.2025 18:06:34

Frank H.

Hallo Uwe,

das ist mir bewusst.
ComboBox1 = Jahreszahl, i = ComboBox2.ListIndex (also wenn Januar ausgewählt ist i = 1), 1 der erste Tag

somit ist doch die Syntax erfüllt.

Aber ich erkenne meinen Fehler nicht!

Könnt ihr nochmals schauen!!!

L.G.

AW: DateSerial

30.10.2025 18:00:40

Christian

Hallo Frank,

völlig ungetestet, bin selber kein Experte, aber lass das month(i) mal weg und schreib nur i
Month erwartet soweit ich weiß ein Datum und i ist eine Zahl.

Falls ich total danebenliege sorry, wie gesagt bin selber alles andere als Experte.

Gruß
Christian