Dialog Box
 

I am using excel to send charts to powerpoint. I can send it to a new
powerpoint with:
Set xlapp = Excel.Application
Set xlwb = xlapp.ActiveWorkbook
Set pptapp = New PowerPoint.Application
pptapp.Visible = True
Set pptpres = pptapp.Presentations.Add

However, I want to open an existing power point and wonder if it has a
dialog method as excel does:
Set xlapp = Excel.Application
sFilename = xlapp.GetOpenFilename("xls (*.xls),*.xls")
Set xlwb = xlapp.Workbooks.Open(sFilename)

Thanks for any help you can give me.