File Path Question

[Saxylady1964]

I have the following code in an Excel Spreadsheet.

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

Dim MyPath As String
MyPath = ThisWorkbook.Path

[John Wilson]

mypath =ActivePresentation.Path should do it