arkalı-önlü yazdırma komutu

[incsoft]

Private Sub CommandButton4_Click()
ActiveWindow.SelectedSheets.PrintOut From:=1, To:=2, Copies:=4, Collate _
:=True
End Sub


Yukarıdaki komut ile sayfa 1'den 2'kadar olan sayfalardan 4 adet çıktı alabiliyorum arkadaşlar ancak benim isteğim bu sayfaları komut ile arkalı önlü yazdırabilmek.
Yazıcımda bu fonksiyon bulunmakta ancak bunun komutunu bulamadım bir türlü.Yardımcı olursanız sevinirim.

 

[birayfil]

yazıcı ayarlarından yapmanız lazım, yazdır seçeneğinde çift yazma seçeneğiniz aktif hale getirmeniz gerekmektedir

 

[angurya]

'bu makro ile duplex yazdırma
ExecuteExcel4Macro "PRINT(1,,,1,,,,,,,,2,,,TRUE,,FALSE)"
Application.Goto Reference:="dublex"
ActiveWindow.SmallScroll Down:=-6

Range("A3:AK166").Select
ActiveSheet.PageSetup.PrintArea = "$A$3:$AK$166"
ActiveWindow.SelectedSheets.PrintOut copies:=1, Collate:=True

Application.ActivePrinter = "Ne00: üzerindeki DTKV-NRG7500 [iki-yüze-yazdır] " ' ağ üzerinde bulunan yazıcı iki yüze yazdır özelliği açık şekilde sürücüsü yüklendi
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _, Collate:=True

yukarıdaki kodları kullanarak arkalı önlü çıktı almıştım kendine uyarlayabilirsin.