Monat + Jahr

[RPP63]

Moin!
Schreibe doch einfach =HEUTE() in Deine Zelle und formatiere sie benutzerdefiniert mit MMMM JJJJ

Gruß Ralf

[Flotter Feger]

Hallo Ralf,

hab ich schon https://www.clever-excel-forum.de/thread...#pid138087

Interessiiert nur keinen ... soll er machen, was er will ...

[RPP63]

Moin Sabina!
… wobei =TEXT(Datum;"Format") ja etwas anderes ist als =Datum im Format MMMM JJJJ …
Scheinbar will er ja durch "klicken" im Nachgang den Monat nach oben durchreichen.
Dann wäre auch ein Drehfeld 1-1000 mit Ausgabezelle denkbar (siehe Beitrag von Jack).

Denn wie wir alle wissen ist der 1.578.2018 für Excel der 1.2.2066

Gruß Ralf

[helwagemi]

Hallo Basti, anbei Beispieltabelle. N.B.: Wenn du ein Datum in D1 sehen willst musst du die Zelle als … na als was denn?? formatieren.  

Gruß Helmut

[Basti5]

Hi,

danke, aber so ist das nicht gemeint.

Ich habe mal meine Probetabelle angehängt. Wenn man auf den Button 2 klicke ändert sich
zwar die Ausgabe in D1 aber wie man oben in der Zeile sieht (so wie ich es vorher beschrieben habe)
manchmal als August 2018 und manchmal als 01.10.2018.

Ich benötige aber nur die Ausgaben als Monat/Jahr also:

August 2018
September 2018
Oktober 2018

etc.

VG

[Basti5]

so hier die Probedatei

[Kuwer]

Hallo Basti,

Private Sub CommandButton2_Click()

  With Range("D1")

    .NumberFormat = "@"

    If IsDate(.Value) Then

      .Value = Format(CDate(.Value) + 31, "mmmm yyyy")

    Else

      .Value = Format(Date, "mmmm yyyy")

    End If

  End With

End Sub

Gruß Uwe

[Basti5]

Ja der passt genau.

Vielen Dank an alle, bis zum nächsten mal.

LG