Default Settings in Backstage Print to "Print Selection

Hi all and thanks in advance for any help/info.

I've been Googling and Binging to the detriment of my fingertips and hope of finding an answer to the following situation.

I have a command button on a sheet with the following code that will select a range (sometimes fixed, sometimes dynamic) and take the user to the backstage Print section of Excel:

Private Sub CommandButton_Click()
    Range("B12:H18").Select
    Application.CommandBars.ExecuteMso ("PrintPreviewAndPrint")
End Sub

However, I need to add a line (or more?) of code to have the first Settings selection to default (or change) to "Print Selection" instead landing at its normal "Print Active Sheets".

Is this possible?

I do not want to use .PrintPreview for a number of reasons.

Appreciate any help!

Regards,
Chris

Hello Chris,

If you don't need the user to set the default printout parameeters, you can do it directly using the Worksheet.PrintOut Method

The attached picture is from the VBA help files.

Hello Chris,

You can present the user with the print dialog box with this line of code...

    Application.Dialogs(xlDialogPrint).Show