File Path Question

[Saxylady1964]

I have the following code in an Excel Spreadsheet.

I need it to work in Powerpoint and I am stumped.

[vba]Dim MyPath As String
MyPath = ThisWorkbook.Path
[/vba]

[John Wilson]

[VBA]mypath =ActivePresentation.Path[/VBA] should do it