Dateipfad in Powerpoint hinterlegen

visioo

Commander
Registriert
Okt. 2007
Beiträge
2.116
Hallo,

ich möchte den aktuellen Pfad wo Powerpoint Datei liegt, in selbigen hinterlegen.
Nicht in der Fußzeile. Kann mir einer sagen wie das geht?

Es handelt sich um Powerpoint 2010

Danke schonmal
 
Ich verstehe kein Wort!

ich möchte den aktuellen Pfad wo Powerpoint Datei liegt, in selbigen hinterlegen.

Du möchtest den Dateipfad deiner PPT in selbigem (also dem Pfand) hinterlegen? Was bitte?
 
Textfeld mit Pfad in Slide 1 einfügen geht so
Sub InsertPath()
Dim PathAndName As String

PathAndName = ActivePresentation.Path & "\" & _
ActivePresentation.Name

Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes _
.AddShape(msoShapeRectangle, 0, 0, 250, 140).TextFrame
.TextRange.Text = PathAndName
.TextRange.Font.Size = 12
.MarginBottom = 10
.MarginLeft = 10
.MarginRight = 10
.MarginTop = 10
End With
End Sub
 
ich möchte halt immer den aktuelle pfad angezeigt bekommen wo die Datei liegt :)
@Monster: hat funkitoniert. Vielen Dank ! Leider aktualisiert es sich nicht wenn es woanders liegt
 
Zuletzt bearbeitet:
Zurück
Oben