Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
24.04.2024 18:49:56
24.04.2024 17:19:09
Anzeige
Archiv - Navigation
1196to1200
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
Inhaltsverzeichnis

Datum: Jahr ermitteln

Datum: Jahr ermitteln
Holger,
Hallo,
ich habe als Datum in einer Zelle stehen DEZ 10.
Mit debug.print year("DEZ 10) erhalte ich nicht 2010 sondern 2011.
Was mache ich falsch?
Wie kann ich aus diesem Format, also DEZ 10, NOV 09, MAI08 etc immer das
korrekte jahr ermitteln?

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Datum: Jahr ermitteln
09.02.2011 15:58:57
Matthias
Hallo
und so ?
debug.print year(activecell)
oder eben z.B. den Zellbezug anpassen für ("O3")
z.B:
debug.print year(cells(3,"O"))
beides ergibt bei mir 2010
Gruß Matthias
DANKE ; SO GEHT ES!!!! k.t.
09.02.2011 16:50:37
Holger,
AW: Datum: Jahr ermitteln
09.02.2011 16:02:58
Tino
Hallo,
versuch mal so
debug.print clng(right("DEZ 10", 2))
Gruß Tino
oder vielleicht auch so...
09.02.2011 16:11:07
Tino
Hallo,
Debug.Print Year(Date) - Year(Date) Mod 1000 + CInt(Right("DEZ 10", 2))
Gruß Tino
besser Year(Date) Mod 100 oT.
09.02.2011 16:24:42
Tino
AW: ("DEZ 10) Richtig!?: ("DEZ 10")- owt.
09.02.2011 16:03:04
Dieter(Drummer)
.
Hast Du es probiert ?
09.02.2011 16:12:43
Matthias
Hallo
Bei mir kommt auch 2011
Userbild
Gruß Matthias
Anzeige
Jahr ermitteln aus Text
09.02.2011 18:06:27
Erich
Hi Holger,
bei der Formatierung eines Datums mit MMM wird der Monat als "Dez", nicht als "DEZ" angezeigt.
Wenn bei dir DEZ 10 in der Zelle steht, ist das kein Datum. Das kannst du leicht sehen,
wenn du der Zelle vorübergehend mal das Format "Standard" gibst. Dann sollte bei einem Datum,
das in 2010 oder 2011 liegt, eine ganze Zahl etwas über 40000 angezeigt werden.
Vermutlich bleibt aber bei dir DEZ 10 unverändert sichtbar. Dan isdst das definitiv Text, aber kein Datum.
Der Teil "DEZ" ist klar. Du musst jetzt wohl noch festlegen, was die 10 bedeuten soll:
- das zweistellige Jahr im im 21. Jahrhundert? (also nicht 1910, und nicht 2110, sondern 2010) ?
oder
- den Tag im Dezember des gerade aktuellen Jahres? (wäre heute der 10. Dez. 2011) ?
Schau dir das mal an:
 ABCD
1TextJahreszahl  
2DEZ 102010  
3    
4DatumMMM JJMMM TTStandard
510.12.2011Dez 11Dez 1040887
609.12.2010Dez 10Dez 0940521
ZelleFormatWert
B4MMM JJMMM JJ
A5TT.MM.JJJJ10.12.2011
B5MMM JJ10.12.2011
C5MMM TT10.12.2011
A6TT.MM.JJJJ09.12.2010
B6MMM JJ09.12.2010
C6MMM TT09.12.2010
ZelleFormel
B2=2000+RECHTS(A2;2)
B5=A5
C5=A5
D5=A5

Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort
Anzeige
Jahr ermitteln aus Text - VBA
09.02.2011 18:12:35
Erich
Hi,
der Ausdruck 2000+RECHTS(A1;2) lässt sich auch einfach in VBA hinschreiben:
Debug.Print 2000 + Right("DEZ 10", 2)
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige