![]() |
||
![]() |
Dynamische Texte in Excels Kopf- und Fu▀zeileIch setze seit geraumer Zeit Excel ein. Trotz vieler Versionswechsel ist es mir immer noch nicht m÷glich, in die Kopf- und Fu▀zeile eines Arbeitsblattes das Ergebnis einer beliebigen Funktion einzubinden. Gibt es etwa eine M÷glichkeit, die mir entgangen sein sollte? Ja, es gibt diese M÷glichkeit. Die in der Layout-Ansicht verfⁿgbaren Einstellungen sind Attribute des gerade aktiven PageSetup-Objekts. Jedes Tabellenblatt verfⁿgt ⁿber so ein Objekt und sichert darin seine Layout- Einstellungen. Die Texte fⁿr den linken, mittleren und rechten Kopf- beziehungsweise Fu▀zeilentext sind ebenfalls Eigenschaften des Page-Setup-Objekts. Da es nicht m÷glich ist, die gewⁿnschten Informationen ⁿber den typischen Dialog einzutragen, modifizieren Sie die Eigenschaften dieses Objekts per Makro. Dazu legen Sie mit Hilfe des Befehls Einfⁿgen ù Makro ù Visual-Basic-Modul ein neues Makro an. Im Visual-Basic-Editor geben Sie folgenden Text ein: Sub WriteLeftHeader ()╢ ActiveSheet.PageSetup.LeftHeader = ô Mein Textô╢ End Sub╢Dabei k÷nnen Sie MeinText durch jede beliebige Zeichenkette ersetzen. Auf die gleiche Weise k÷nnen Sie auch die anderen Eigenschaften des Page- Setup-Objekts Σndern. Um mehrere Eigenschaften mit einem Makro zu Σndern, verwenden Sie das WITH-Konstrukt. Folgende Anweisung schreibt beispielsweise den Inhalt der Zelle A1 in den linken, den Inhalt der Zelle B1 in den mittleren und den Inhalt von C3 in den rechten Bereich der Kopfzeile: Sub WriteHeaders ()╢ With ActiveSheet.PageSetup╢ .LeftHeader = Range ( ôA1ô).Value╢ .CenterHeader = Range ( ôB1ô).Value╢ .RightHeader = Range ( ôC3ô).Value╢ End With╢ End Sub╢Auf diese Weise ist es ⁿbrigens auch ein Kinderspiel, das Ergebnis von Tabellen-Funktionen wie beispielsweise INFO in die Kopf- und Fu▀zeile zu schreiben. |
![]() |