Hi,
wie muss ich den Code abändern das nicht nur Februar 2008 sondern Diagramm Februar 2008
als Tabellenblattname steht.
ActiveSheet.Name = Format(DateSerial(Year(Date), _
Month(Date) - 1, 1), "MMMM YYYY")
Grüssle
Chantal