Office - Word, Excel und Co. 9.703 Themen, 40.813 Beiträge

Fusszeile mit Pfad auch für Excel

Rebedj / 1 Antworten / Flachansicht Nickles

Hi Leuts,


hätte da mal wieder gerne ein Problem. Möchte ähnlich wie bei meinen Worddokumenten nun auch bei Exceltabellen den Pfad in einem festgelegten Feld automtisch immer mitdrucken lassen.
Mein Problem: ich weiss nicht ob, und wenn ja, wie das geht.


Danke im voraus


Rebedj

Wer aufhört besser zu werden, hat aufgehört gut zu sein ! Spott bekommt man umsonst, Neid muß man sich verdienen !
bei Antwort benachrichtigen
Uli M Rebedj „Fusszeile mit Pfad auch für Excel“
Optionen

Kommt auf deine Excel-Version an. Bei XP (event. schon ab 2000) ist zumindest die Pfadangabe in dem kümmerlichen Dialog möglich. In älteren Versionen müsstest du dir mit einer VBA-Routine behelfen, etwa wie folgt (Code in "DieseArbeitsmappe"):
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim I As Integer, objSheet As Worksheet
' Die Schleife bearbeitet alle Blätter (außer Diagrammblättern), alternativ: nur auf ActiveSheet anwenden
On Error Resume Next
For I = 1 To Sheets.Count
Set objSheet = Sheets(I)
' anstatt LeftFooter sind natürlich auch die anderen 5 Teile möglich
' statt Fullname auch nur .Path oder .Name möglich, natürlich auch Text davor
' jeglicher Inhalt zuvor wird überschrieben
objSheet.PageSetup.LeftFooter = ActiveWorkbook.FullName
Next I
End Sub

bei Antwort benachrichtigen