vba to print Word document double side

[JPR]

Hello,
I have a vba that export data from a form to a MS Word template. It works great but I would like to add a final code that allows wither to open the file in case users need to modify it, or print is double side.
I cannot specify the printer type as the database will be used my multiple users who use different printers, therefore the printer selection should be automotic.

This is the code I have at the end of my routine:

AnswerYes = MsgBox("Open document to modify?", vbQuestion + vbYesNo, "User Response")

 If AnswerYes = vbYes Then
objWord.Visible = True
 Else
'this is where the code print double side should go
 End If

Thank you for your help.

 

[Gasman]

Word has a Record macro as well as Excel.
Why not create a macro doing just that and review the code?

Then again ChatGPT produces.

Sub PrintDoubleSided()
    Dim wdDoc As Document
    Set wdDoc = ActiveDocument ' Use the active document

    ' Set up the printer settings
    With wdDoc
        .PrintOut _
            Background:=False, _
            Copies:=1, _
            PrintZoomColumn:=1, _
            PrintZoomRow:=1, _
            PrintZoomPaperWidth:=0, _
            PrintZoomPaperHeight:=0, _
            PrintToFile:=False, _
            Collate:=True, _
            ManualDuplexPrint:=False, _
            PrintZoom:=100, _
            OutputFileName:="", _
            Item:=wdPrintDocumentContent, _
            PageType:=wdPrintAllPages, _
            PrintHiddenText:=False, _
            PrintBackground:=False, _
            Range:=wdPrintAllDocument, _
            Duplex:=wdPrintDuplex
    End With
End Sub
Explanation:
Duplex:=wdPrintDuplex ensures that the document is printed double-sided.

ActiveDocument.PrintOut prints the currently open document.

If you want to print multiple copies, modify Copies:=1 accordingly.

Make sure your printer supports duplex printing and that the setting is enabled.