AS3434
Özel Üye
- Katılım
- 13 Ocak 2005
- Mesajlar
- 1,820
- Excel Vers. ve Dili
- M.Office/Excel 2007 Türkçe
Selamlar
Tam iş bitti derken yeni bir sorun çıkıyor.
Aşağıda kullanmış olduğum yazdır makrosu "O1" hücresindeki değer kadar sayfa yazdırıyor. Yani O1, 2 ise 2 sayfa, 3 se 3 sayfa gibi. Yalnız sorun şurda , Eğer sayfaya özel altbilgi yerleştirirsem yazıcı alıyor başını gidiyor. 1111 sayfa basmaya başlıyor. Özel alt bilgiyi kaldırınca sorun yok.
Bu sorunu çözmenin bir çaresi varmı?
Sub YazHakediş()
ActiveSheet.PageSetup.PrintTitleRows = "$1:$5"
ActiveSheet.PageSetup.PrintArea = "$p$6:$v$65500"
ActiveSheet.PrintOut From:=1, To:=[O1].Value, Copies:=1, preview:=False, Collate:=True
End Sub
Edit . Arkadaşlar Bu aralar çok dalgınım. Sorunu çözdüm. Vaktinizi aldığım için özür dilerim.
Sevgilerle
Tam iş bitti derken yeni bir sorun çıkıyor.
Aşağıda kullanmış olduğum yazdır makrosu "O1" hücresindeki değer kadar sayfa yazdırıyor. Yani O1, 2 ise 2 sayfa, 3 se 3 sayfa gibi. Yalnız sorun şurda , Eğer sayfaya özel altbilgi yerleştirirsem yazıcı alıyor başını gidiyor. 1111 sayfa basmaya başlıyor. Özel alt bilgiyi kaldırınca sorun yok.
Bu sorunu çözmenin bir çaresi varmı?
Sub YazHakediş()
ActiveSheet.PageSetup.PrintTitleRows = "$1:$5"
ActiveSheet.PageSetup.PrintArea = "$p$6:$v$65500"
ActiveSheet.PrintOut From:=1, To:=[O1].Value, Copies:=1, preview:=False, Collate:=True
End Sub
Edit . Arkadaşlar Bu aralar çok dalgınım. Sorunu çözdüm. Vaktinizi aldığım için özür dilerim.
Sevgilerle