VBA duplex printing of specific sheets in workbook?

[tnuis]

Hello,

I want to print certain sheets in a workbook in singel sided and certain sheets in Duplex all in one operation/button.

I cannot find anything on the internet giving a simple code for this. This should however apply to the default printer and not a specific one.

I tried the following but all sheets still come out singel sided:

Sub printpagekjop()
 ' Print out the Sheets
 If Duplex = True Then SetPrinterDuplex.PrinterName.Default
 Duplex = False
 Sheets("Ordremal").PrintOut
 Duplex = True
 Sheets("Kjøpsavtale").PrintOut
 Duplex = False
 Sheets("Serviceavtale").PrintOut
 Duplex = False
 Sheets("Ordreoversikt").PrintOut
 End Sub

Any suggestions here would be greatly appreciated