File Picker Question

B

Barb Reinhardt

Why is this not working?

With Application.FileDialog(msoFileDialogFilePicker)
.AllowMultiSelect = False
.Filters.Clear
.Filters.Add "Powerpoint Presentations", "*.ppt"
.FilterIndex = 1
.Title = "Please Select File to open"
If .Show = False Then Exit Sub
sfile = .SelectedItems(1)
End With

Thanks,
Barb Reinhardt
 
A

Andy Pope

Hi,

I what sense is it not working?
What version of ppt are you working with?

Cheers
Andy
 
J

John Wilson

Looks fine to me Barb. I take it you have a
Presentations.Open(sfile) somewhere else in the code and that you have
Declared sfile as a string
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Inconsistent Add Record Performance 2
How to Reset ButtonName and Filters in msoFileDialogOpen? 1
msoFileDialogFilePicker with filter 2
Calling Function 1
What am I missing - Workbooks.Open 13
Referring to two different open worksheets in code 8
Powerpoint VBA slide show Open file 0
file dialog in access 2007 3

Top