Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

Tabellenblatt per Makro mit Monatsnamen versehen

Forumthread: Tabellenblatt per Makro mit Monatsnamen versehen

Tabellenblatt per Makro mit Monatsnamen versehen
Michael
Hallo,
ich möchte gern den Namen des aktuellen Tabellenblattes (entweder per Button oder per Stichtag z.B. am Monatsende) umbenennen. Das Tabellenblatt heißt Patchday und soll nach den Bedingungen s.o, auf Patchday_Januar usw. umbenannt werden.
Könnte mir jemand den Code dazu liefern ?
Gruß
Michael
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Tabellenblatt per Makro mit Monatsnamen versehen
27.09.2010 17:05:02
Dirk
Hallo Michael,
probier mal folgendes:
if day(date) = Day(DateSerial(Year(Date), Month(date) + 1, 1) - 1) then
sheets("patchday").name="Patchday_" & monthname(month(date))
end if
das Kannst Du per Button oder ueber ein Macro starten.
gruss
Dirk aus Dubai
AW: Tabellenblatt per Makro mit Monatsnamen versehen
27.09.2010 19:02:08
Hajo_Zi
Hallo Dirk,,
warum offen. Du hast doch einen Vorschlag gemacht. Lass den Fragesteller doch entscheiden ob offen.

Anzeige
@Dirk: Bedingung für Monatsende
29.09.2010 09:53:43
Erich
Hi Dirk,
statt
If Day(Date) = Day(DateSerial(Year(Date), Month(Date) + 1, 1) - 1) Then
könnte man doch auch einfach schreiben:
If Day(Date + 1) = 1 Then
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort
AW: @Dirk: Bedingung für Monatsende
30.09.2010 13:24:26
Dirk
Hallo!
Ja, das geht auch :-)
Dirk aus Dubai

Forumthreads zu verwandten Themen

Anzeige
Anzeige