Application.dialogs and PDF - again
 

I'm posting this again after 9 days because I never got a response the first
time:

With application.dialogs how can I open the "Publish PDF or XPS" dialog box
in Excel 2007? I want the user to be able to choose the file name and folder
for saving a PDF file.

Application.dialogs and PDF - again
 

As far as I know there is no Publish Pdf/Xps dialog box in Excel.
Maybe...

With Application.FileDialog(msoFileDialogFolderPicker)
.Show
MsgBox .SelectedItems(1)
End With

Options for FileDialog...
msoFileDialogFilePicker
msoFileDialogFolderPicker
msoFileDialogOpen
msoFileDialogSaveAs
--
Jim Cone
Portland, Oregon USA
http://www.contextures.com/excel-sort-addin.html
(add-in with 30 + ways to sort)

..
..
..

"John"
wrote in message
...
I'm posting this again after 9 days because I never got a response the first
time:
With application.dialogs how can I open the "Publish PDF or XPS" dialog box
in Excel 2007? I want the user to be able to choose the file name and folder
for saving a PDF file.

Application.dialogs and PDF - again
 

After serious thinking John wrote :
I'm posting this again after 9 days because I never got a response the first
time:

With application.dialogs how can I open the "Publish PDF or XPS" dialog box
in Excel 2007? I want the user to be able to choose the file name and folder
for saving a PDF file.

Try...

Application.Dialogs(xlDialogSaveAs).Show

and have the user choose "PDF (*.pdf)" from the file type dropdown.

--
Garry

Free usenet access at http://www.eternal-september.org
ClassicVB Users Regroup! comp.lang.basic.visual.misc

Application.dialogs and PDF - again
 

And maybe

CommandBars.ExecuteMso "FileSaveAsPdfOrXps"

"John" wrote in message
...
I'm posting this again after 9 days because I never got a response the
first time:

With application.dialogs how can I open the "Publish PDF or XPS" dialog
box in Excel 2007? I want the user to be able to choose the file name and
folder for saving a PDF file.

Application.dialogs and PDF - again
 

Jim Rech pretended :
And maybe

CommandBars.ExecuteMso "FileSaveAsPdfOrXps"

Awesome! Thank you for that...

--
Garry

Free usenet access at http://www.eternal-september.org
ClassicVB Users Regroup! comp.lang.basic.visual.misc