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]