AccessTr.neT
sayfa yazdırma hatası - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Excel (https://accesstr.net/forum-microsoft-excel.html)
+--- Forum: Excel Cevaplanmış Soruları (https://accesstr.net/forum-excel-cevaplanmis-sorulari.html)
+--- Konu Başlığı: sayfa yazdırma hatası (/konu-sayfa-yazdirma-hatasi.html)



sayfa yazdırma hatası - devely - 15/03/2014

arkadaşlar userformda ilgili sayfada belli bir yeri yazdırmak için aşağıdaki kodları yazdığımda hata alıyorum sebebi ne olabilir

Private Sub CommandButton2_Click()
Cevap = MsgBox(" Maaş Dökümü Yazdırılsın mı?", vbYesNo)
If Cevap = 6 Then
ActiveSheet.PageSetup.PrintArea = "Sayfa3!$C$10:$F$31"
ActiveSheet.PrintOut Copies:=2
End If
End Sub


Cvp: sayfa yazdırma hatası - atoz112 - 15/03/2014

merhaba,

kodlarınızı aşağıdaki gibi düzenlemek ister misiniz.bu şekilde sorununuz çözümlenecektir kanısındayım.

Private Sub CommandButton2_Click()
Cevap = MsgBox("Maaş dökümü yazdırılsın mı?", vbYesNo)
If Cevap = 6 Then
Sheets("Sayfa3").Select
Range("C10:F31").Select
ActiveSheet.PageSetup.PrintArea = "$C$10:$F$31"
ActiveWindow.SelectedSheets.PrintOut Copies:=2, Collate:=True
ActiveSheet.PageSetup.PrintArea = ""
Else

End If
End Sub

iyi çalışmalar,
saygılar.


Cvp: sayfa yazdırma hatası - devely - 16/03/2014

çok tşkler sorun çözüldü