VBA duplex printing of specific sheets in workbook?

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:

Code:

---

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:)

Quote:

---

SetPrinterDuplex

---

i would believe that this should be a procedure, to change printer settings, do you have it in your code somewhere
i doubt that the syntax you use here is correct, though they may have built in some extra printer properties /methods in later versions, i doubt this is a built in property