'Datenpfad' auf Dokument hinterlege

Hallo,
wer kann helfen?

Wie bekomme ich in Word 2000 automatisch den „Dateipfad“ unten mit aufgedruckt?
So in etwa folgendermaßen:

Eigene Dateien/neuer Ordner/Dokument1

ich hoffe Ihr versteht was ish meine.

Ist das auch in Excell möglich?

Danke! Gruß

Thomas

Wie bekomme ich in Word 2000 automatisch den „Dateipfad“ unten
mit aufgedruckt?
So in etwa folgendermaßen:
Eigene Dateien/neuer Ordner/Dokument1
Ist das auch in Excell möglich?

Hi Thomas,
in Excel geht das so:

Sub Makro1()
 With ActiveSheet.PageSetup
 .LeftHeader = ""
 .CenterHeader = ""
 .RightHeader = ""
 .LeftFooter = ""
 .CenterFooter = ""
 .RightFooter = ActiveWorkbook.FullName
 End With
End Sub

In Word, k.A., nachfolgender Code scheint zu funktionieren, mir ist aber unklar was man darin löschen kann, da unnötig.
Gruß
Reinhard

Sub Makro11()
 If ActiveWindow.View.SplitSpecial wdPaneNone Then
 ActiveWindow.Panes(2).Close
 End If
 If ActiveWindow.ActivePane.View.Type = wdNormalView Or ActiveWindow. \_
 ActivePane.View.Type = wdOutlineView Then
 ActiveWindow.ActivePane.View.Type = wdPrintView
 End If
 ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
 If Selection.HeaderFooter.IsHeader = True Then
 ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageFooter
 Else
 ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
 End If
 Selection.TypeText Text:=ActiveDocument.FullName
 ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument
End Sub

Hallo Thomas,
der einfachste Weg in Word ist, den Dateinamen inkl. Pfad in der Fußzeile als Feld anzulegen. In Word97 ist in der Symbolleiste für Kopf-/Fusszeile auch ein Button „Autotext einfügen“. In der zugehörigen Drop-Down-Liste kann man u.a. wählen „Dateiname und Pfad“. Nach Anklicken wird an der Cursorposition ein entsprechendes Feld eingefügt.

Falls diese Symbolleiste in Word2000 diese Funktion nicht mehr enthält, dann folgende Schritte ausführen:

  1. Ansicht für Fusszeile wählen und Cursor positionieren
  2. Menü Einfügen —> Feld…
  3. Kategorie = Dokument-Informationen
  4. Feldname = Dateiname
  5. Optionen…
  6. Register „spezifische Schalter“ /P wählen und hinzufügen klicken
  7. Register „Allgemeine Schalter“ gewünschtes wählen und hinzufügen klicken
  8. Eingaben mit OK bestätigen

Für EXCEL ist mir kein einfacher Weg bekannt, da kann man einfach nur den Dateinamen und das Register in der Kopf- oder Fusszeile einfügen, aber nicht den Pfad.

Gruß
Franz

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

Hallo!

Wie bekomme ich in Word 2000 automatisch den „Dateipfad“ unten…
Ist das auch in Excell möglich?

im neuen Excel kann man bei benutzerdefinierte Kopf- oder Fusszeile neben Datei- und Blattname etc auch den Pfadnamen ausgeben

bis Excel 97 oder so geht das nicht; mit excel 2000 erstellte Dateien werden auch nicht richtig gelesen (es steht Mist auf der Fusszeile)

die genannten Makros erstellen m.E. nur einen statischen Eintrag:
wird die Datei auf einem anderen Rechner bzw. in einem anderen
Verzeichnis - z. B. nach EMail-Versand - aktualisisert sich diese
Angabe NICHT automatisch…)

daher mein Vorschlag (verwende das auch):
in der Tabelle selbst (nicht Fusszeile) an passender Stelle
=ZELLE(„Dateiname“;$A$1)

evtl. muss man das ganze noch weiterbearbeiten:
=LINKS(ZELLE(„Dateiname“;$A$1);FINDEN("[";ZELLE(„Dateiname“;$A$1))-1)

cu
kai