Yazdır butonuna bastığımda aynı sayfadan iki tane yazdırsın

[wishhardone]

Selam arkadaşlar hazırladığım bir excel sayfasına yazdır butonu ekledim. Butona atadığım kod şöyle:

Private Sub Yazdır_Click()
ActiveWindow.SelectedSheets.PrintOut Copies:=2
End Sub

Bu butona basınca aynı sayfadan iki tane yazdırmasını istiyorum ama bir sayfa yazdırıyor.
Acil yardımlarınızı rica ediyorum.

 

[mirefe]

ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=2

Böyle olabilir mi?Bir denermisiniz?

 

[wishhardone]

öncelikle ilgilendiğin için teşekkür ederim Mirefe

verdiğin kodu denedim ama olmadı. yine tek sayfa yazdırıyor. office 2010 kullanıyorum
onunla ilgili olabilir mi acaba?