online 1
gast (50)

/ Forum / Tabellenkalkulation

TabellenkalkulationTabellenkalkulation

Fragevon Tomschi vom 05.06.2020, 09:01 Options

VBA - Pfadangabe

Guten Morgen!

Folgendes Problem:
Ich möchte gerne eine Pfadangabe per VBA machen.
Der Dateiname selbst, soll jedoch als Variable eingefügt werden.

ActiveWorkbook.FullName oder
ActiveWorkbook.Path & "\" & ActiveWorkbook.Name
hilft mir da nicht weiter.

Der Makrorekorder bringt mir folgenden Code:
.LeftFooter = "C:\tmp\test\\&F"
Wie kann ich das &F mit z. B. workbook.path verbinden?

Thanx

Tom


Antwort schreiben

Antwort 1 von M.O. vom 05.06.2020, 11:37 Options

Hallo Tom,

suchst du vielleicht so etwas:

Sub Fuß_Mit_Pfad()
ActiveSheet.PageSetup.LeftFooter = ActiveWorkbook.Path & "\" & ActiveWorkbook.Name
End Sub 


Gruß

M.O.

Antwort 2 von Tomschi vom 05.06.2020, 12:44 Options

Mahlzeit M.O.!

Danke, dass Du Dir mein Problem angesehen hast.
Wie bereits kurz erwähnt kann ich mit dem Befehl
ActiveWorkbook.Path & "\" & ActiveWorkbook.Name
leider nichts anfangen.

Mit ActiveWorkbook.Name wird der Dateiname fix in die Fusszeile gestellt.
Wird aber nunmehr die Datei z. B. umbenannt, so müsste der User bzw. die Datei jedesmal das Makro ausführen.
Die Datei selbst enthält keine Makros. Der Pfad wird via AddIn in der Datei festgelegt.

Mir geht es jetzt darum, dass zwar der Pfad mit ActiveWorkbook.Path festgehalten wird, jedoch der Dateiname variabel ist.
ActiveSheet.PageSetup.LeftFooter = "&F" macht dies bekanntlich, aber der Pfad fehlt eben.
Wie kann ich als ActiveWorkbook.Path und "&F" miteinander verknüpfen?

Ciao

Tom

Antwort 3 von M.O. vom 05.06.2020, 13:17 Options

Hallo Tom,

jetzt ist bei der Groschen gefallen :-).

Suchst du etwa diesen Code:

Sub Fuß_Mit_UPfad()
ActiveSheet.PageSetup.LeftFooter = "&Z&F"
End Sub


Gruß

M.O.

Antwort 4 von Tomschi vom 10.06.2020, 08:20 Options

Guten Morgen M.O.!

Sorry, dass ich mich erst jetzt melde.
Unter Office2003 klappt alles, aber unter Office2000 wird nur der Dateiname als .CenterFooter = festgelegt.
Der Pfad ist nicht vorhanden.

Hm, vielleicht gibt es noch einen anderen Ansatz.

Ciao

Tom

Antwort 5 von M.O. vom 10.06.2020, 11:32 Options

Hallo Tom,

ich habe leider kein EXCEL 2000 mehr. Außer den geposteten Antworten habe ich leider keine weiteren Ideen.

Gruß

M.O.

Antwort 6 von Tomschi vom 10.06.2020, 12:10 Options

Hi M.O.!

Schade, da kann man wohl nichts machen.
Trotzdem DANKE fuer Deine Unterstützung.

Tom

Ähnliche Themen

Makro in Office Word 2007?
Snoop07  04.10.2007 - 97 Hits - 1 Antwort

Makro in Excel für Pfadangabe
randy08  25.10.2007 - 171 Hits - 6 Antworten

VBA - Import mit Pfadangabe (Inputbox)
Tomschi  24.01.2008 - 118 Hits - 9 Antworten

Hinweis

Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..

Neue Einträge

Version: supportware 1.9.150 / 10.06.2022, Startzeit:Mon Jan 26 01:23:17 2026