yazdırma seçeneği

[ipkins]

hazırladığı bir userform üzerinde yazdırma butonu var altındaki kodlarda şunlar:ActiveWindow.SelectedSheets.PrintOut from:=1, To:=1, copies:=3, collate:=True benim isteğim copie seçeneğinin değişken olması bunu inputboxla yapabilirmiyiz denedim çalıştıramadım yardımcı olursanız çok ama çok sevinirim

 

[emrexcel123]

yazdırma

tam olarak sorunun nedir arkadaşım...

 

[ipkins]

tam olarak sorunum şu arkadaşım yazdır dediğim zaman bir ınputbox veya başka bir seçenek açılılarak kaçtane kopya çıkaracağımı oraya yazmak istiyorum bazen 1 adet yetiyor bazende 2 adet bazen 3 adet yazıcının toner durumuna göre copies seçeneğini değişken olmasını copies değerini açılan ınputboxtan alsın gibi mesela copies:=inputbox.vaalue gibi ama çalışmıyor

 

[emrexcel123]

buyrun

arkadaşım dosyan ektedir.iyi akşamlar...:icelim:

 

[Kemal Demir]

adet=inputbox("Kopya Sayısını Giriniz")
ActiveWindow.SelectedSheets.PrintOut from:=1, To:=1, copies:=adet, collate:=True

Yukarıdaki Gibi Deneyiniz.