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

Gestaltung von Fußzeilen

Forumthread: Gestaltung von Fußzeilen

Gestaltung von Fußzeilen
28.08.2006 10:57:37
Fußzeilen
Hallo zusammen!
Ich möchte mit dem angefügten Makro die Erfassung von Kopf- und Fußzeilen steuern. Siehe Beispiel:
https://www.herber.de/bbs/user/36205.xls
Eine Funktion soll es ermöglichen, die Daten in Kopf- und Fußzeile des aktuellen Arbeitsblattes in die UserForm einzulesen.
Kann mir jemand eine Lösung für das Problem nennen.
Danke im Voraus
Dirk
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Gestaltung von Fußzeilen
28.08.2006 14:05:27
Fußzeilen
Hallo Dirk,
das Makro zum Auslesen der Informationen sieht etwa so aus:

Sub Auslesen()
'Einlesen der Einstellungen des aktuellen Blattes (Tabelle oder Diagramm)
Dim Blatt As Object
Set Blatt = ActiveSheet
With UserForm2
.TextBox1.Text = Blatt.PageSetup.LeftHeader
.TextBox2.Text = Blatt.PageSetup.CenterHeader
.TextBox3.Text = Blatt.PageSetup.RightHeader
.TextBox4.Text = Blatt.PageSetup.LeftFooter
.TextBox5.Text = Blatt.PageSetup.CenterFooter
.TextBox6.Text = Blatt.PageSetup.RightFooter
End With
End Sub

Ich empfehle in diesem Fall, die Makros "Auslesen", "EinBlatt" und "AlleBlätter" nicht in einem allgemeinen Modul (hier Fusszeile) zu speichern, sondern unter der Codeseite des Userforms einzufügen und als "Private Sub ..." zu deklarieren.
Dann besteht nicht die Gefahr, dass man diese Makros versehentlich direkt startet.
Gruß
Franz
Anzeige
AW: Gestaltung von Fußzeilen
28.08.2006 18:58:12
Fußzeilen
Hallo Franz,
das hat bestens funktioniert. Danke auch für den Tip mit der Private Sub.
Gruß
Dirk
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige