Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
776to780
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
776to780
776to780
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Dateipfadangabe in der Fußnote

Dateipfadangabe in der Fußnote
29.06.2006 17:44:44
Melanie
Hallo,
ich brauche hilfe bei der Automatisierung der Fußnote, in der jeweils der aktuelle Pfad stehen soll!
Excel bietet standardmäßig die Möglichkeit den Dateinamen einzufügen, jedoch nicht den dazugeörigen Pfad!
Ohne VBA scheint es nicht zu gehen, aber ich weiß nicht wie ich die Befehle in das VBA eintragen soll!
Vielen Dank für die Hilfe im Voraus!
Melanie

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

Betreff
Datum
Anwender
Anzeige
AW: Dateipfadangabe in der Fußnote
29.06.2006 18:15:59
Peter
Hallo Melanie,
als Modul in DieseArbeitsmappe einfügen

Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.LeftFooter = _
"&""Arial,Fett"" " & strName _
& vbCr & vbCr & "&""Arial,Standard""&7 " _
& ActiveWorkbook.FullName & "\" & ActiveSheet.Name
ActiveSheet.PageSetup.RightFooter = "&""Arial,Standard""Seite  &P"
End Sub

Alt + F11 = VBA Umgebung.
Links steht das Project deiner Mappe, ggf. mit Klick auf das kleine Plus-Zeichen öffnen.
Rechtsklick auf DieseArbeitsmappe, dann Code anzeigen mit links anklicken und Makro einfügen.
Mit Schließen-Kreuz wieder verlassen und die Druckansicht anklicken - nur zum Test.
Viele Grüße Peter
Eine kurze Nachricht, ob es läuft, wäre nett - danke.
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige