The simplest way
Application.Dialogs(xlDialogPrinterSetup).Show