-
If you would like to post, please check out the MrExcel Message Board FAQ and register here. If you forgot your password, you can reset your password.
How to open the SAVE AS dialog box with VBA?
- Thread starter peter_z
- Start date
I have the below which is working perfectly - it opens up the Save As dialog box, enters a file name, and selects PDF as the file type.. I would like to adjust slightly to include the range of cells to PDF print, rather than the predefined print area. Any ideas? It's surely a simple little adjustment but my attempts have failed despite trying to use ideas from mikerickson as above.
Sub SaveAsPDF()
Application.Dialogs(xlDialogSaveAs).Show Range("A33") & " " & Range("C33"), 57
End Sub
Sub SaveAsPDF()
Application.Dialogs(xlDialogSaveAs).Show Range("A33") & " " & Range("C33"), 57
End Sub
Upvote
0
Excel Facts
Test for Multiple Conditions in IF?
Use AND(test, test, test, test) or OR(test, test, test, ...) as the logical_test argument of IF.
mikerickson
MrExcel MVP
- Joined
- Jan 15, 2007
- Messages
- 24,355
The range of cells that form a PDF are not part of the SaveAs dialog. Set the ActiveSheet.PageSetup.PrintArea just before calling this and you should be fine.
Upvote
0
