Datumsformat definieren

Question

Hallo,

ich habe in einer "Kundendatei" ein Spalte 16 mit Datumseinträgen, die allerdings nicht als Datenformat erkannt werden.
Im Überwachungsausdruck wird der VariablenTyp mit "Variant/Object/Range" angezeigt.

If Cells(i, 16) > "31.12.2016" Then

ich habe es mit CDate(cells(i,16)) probiert und mit

Columns(16).NumberFormat = "dd.mm.yy"

.

Beides hat nicht dazu geführt, daß ich das Datum abfragen kann. Was könnte noch gehen?
Danke für Euren Tipp!
Gruß A.

Answer 1

Hallo Andreas,

wie wär's damit?

If Cells(i, 16) > CDate("31.12.2016") Then

Gruß
Rainer

Answer 2

Hallo Rainer,
ja das geht, aber habe ich an anderer Stelle wieder das Problem

If Year(Cells(i, 16)) = Year(Date) ......

Hier bleibt Year(cells(i,16)) immer leer...?
Gruß A.

Answer 3

Hallo Andres .-)

Year(CDate(Cells(1, 1)))

Gruss Nighty

Answer 4

Hallo,
danke euch beiden für die Tipps! (Hatte gedacht, daß meine Antwort schon früher gesendet wurde...)