letzter Monat

Forumthread: letzter Monat
5 Beiträge zu diesem Forumthread
Anzeige

Forumthread: letzter Monat

letzter Monat

11.06.2003 10:48:55

Herbert

Guten Morgen
Totaler blackout. Brauche in der Fußzeile nicht den aktuellen Monat, sondern den vergangenen. Die Anweisung -1 "frißt" Excel nicht.
Danke für Hilfe im voraus

Sub Datum()
Dim Monat$
Monat = Format(Date, "mmmm")
ActiveSheet.PageSetup.LeftFooter = Monat
End Sub

5
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Re: letzter Monat

11.06.2003 10:57:11

Sönke
Re: letzter Monat

11.06.2003 10:58:06

Nepumuk
Re: letzter Monat

11.06.2003 11:04:39

EL
Re: letzter Monat

11.06.2003 11:20:04

EL
Re: letzter Monat

11.06.2003 11:20:09

EL

Re: letzter Monat

11.06.2003 10:57:11

Sönke

Hi Herbert,
versuch mal folgendes:
Sub Datum()
dim Monat
Monat = Format(Date,"MM") - 1
Monat = Format(Monat,"mmmm")
' Bitte beachte das bei Januar - 1 = Dezember ist !
'...
end sub

Re: letzter Monat

11.06.2003 10:58:06

Nepumuk

Hallo Herbert,
versuch es mal so:

Gruß
Nepumuk

Re: letzter Monat

11.06.2003 11:04:39

Hallo Hrebert
so funktioniert!
Sub Datum()
Dim Monat$
Monat = Format(Date-30, "mmmm")
ActiveSheet.PageSetup.LeftFooter = Monat
End Sub
Gruß
EL

Re: letzter Monat

11.06.2003 11:20:04

Hallo zusammen!
Es ist mir eine ehre mit euch zu kommunizieren und immer neues lehren.
Gruß
EL