1.4k Aufrufe
Gefragt in Tabellenkalkulation von ahorn38 Experte (3.2k Punkte)
Hallo,

ich will aus einem Datum den 3stelligen Monatsnamen ableiten.

monat = Format(Month(ActiveCell), "MMM")

Die Formel bringt als Ergebnis aber immer nur "JAN" obwohl da Datum im Dezember liegt. Was mache ich da falsch? Danke für euren Tipp!
Gruß

8 Antworten

0 Punkte
Beantwortet von nighty Experte (6.6k Punkte)
hi Ahorn ^^

monat = Mid(Month(ActiveCell), 1, 3)

gruss nighty
0 Punkte
Beantwortet von ahorn38 Experte (3.2k Punkte)
Hallo nighty,,
danke für deine schnelle Antwort. Aber bei mir kommt da als Ergebnis nur "12" heraus anstelle "Dez"....?
0 Punkte
Beantwortet von nighty Experte (6.6k Punkte)
hi Ahorn ^^^

besser so
wat nur aus dem stehgreif und natuerlich falsch :-)

Mid(MonthName(Month(ActiveCell)), 1, 3)

gruss nighty
0 Punkte
Beantwortet von ahorn38 Experte (3.2k Punkte)
..perfekt! Danke. Schön wieder mal was von dir gehört zu haben! Wie immer seeeehr hilfreich,
Gruß
0 Punkte
Beantwortet von rainberg Profi (14.9k Punkte)
Hallo Andreas,



Option Explicit

Sub test()
Dim monat
monat = Format(CDate(ActiveCell), "mmm")
MsgBox monat
End Sub


Gruß
Rainer
0 Punkte
Beantwortet von nighty Experte (6.6k Punkte)
hi all ^^

rainer seine antwort ist die präzisere antwort,hatte keine zeit zum nachschauen :-)

gruss nighty
0 Punkte
Beantwortet von massaraksch Experte (3.1k Punkte)
"Month" ist überflüssig (und falsch).
Format(ActiveCell, "mmm")

mfg, Massaraksch
0 Punkte
Beantwortet von ahorn38 Experte (3.2k Punkte)
Danke euch ALLEN für eure Antworten!!
Gruß A.
...