Wie füge ich der Kopfzeile einer Excel-Arbeitsmappe nur den aktuellen Monat und das aktuelle Jahr hinzu?

1378
rtinstruct

Ich muss das aktuelle Jahr in die Kopfzeile eingeben und den Blattnamen als Tag hinzufügen (z. B. 2 / [Tab] / [JJJJ]). Ist das möglich? Ich weiß, dass die Option " Datum einfügen" ein dynamisches Datum in die Kopfzeile einfügt, aber ich muss in der Lage sein, den Monat manuell zu steuern, wenn dies möglich ist.

Anregungen wären sehr dankbar.

0
Eine Möglichkeit besteht darin, eine VBA-Routine zu verwenden, und Sie können die Kopfabschnitte beliebig einstellen. Das Makro kann entweder manuell ausgeführt werden oder durch ein `Workbook_BeforePrint` -Ereignis ausgelöst werden, je nach Ihren Anforderungen. Ron Rosenfeld vor 6 Jahren 0

1 Antwort auf die Frage

0
PeterH

Es ist möglich, dies mit VBA zu tun.

Geben Sie zuerst die unten stehende Formel ein CELL A1. Diese kann in jede gewünschte Zelle geändert werden. Stellen Sie sicher, dass Sie den Referenzpunkt im Makroteil ändern.

=DAY(TODAY())&"/"&MID(CELL("filename",A1),FIND("]",CELL("filename",A1))+1,255)&"/"&YEAR(TODAY())

Es erstellt Ihre dynamische Datums- und Blattnamen-Kombination.

Dann fügen Sie das Folgende in ein Modul ein:

Private Sub Workbook_BeforePrint(Cancel As Boolean) ActiveSheet.PageSetup.CenterHeader = Range("A1").Value End Sub

Die Datumskombination wird vor dem Drucken in die Kopfzeile eingefügt.

Es sollte auch wirksam werden, bevor Sie die Druckvorschau anzeigen.

Peter, ich werde das auf jeden Fall ausprobieren! Ich gehe davon aus, dass dies nicht funktionieren würde, wenn die Datei hauptsächlich in der Online-Excel-App verwendet wird. rtinstruct vor 6 Jahren 0
@rtinstruct lässt mich wissen, wie es Ihnen geht, denn ich bin mir nicht sicher, wie ich Online-Dienste für Excel verwendet habe PeterH vor 6 Jahren 0
Warum erfragen Sie den Blattnamen nicht direkt mit nativen VBA-Methoden? Ron Rosenfeld vor 6 Jahren 1

Verwandte Probleme