Skip to main content

AccessTr.neT


Alt Form Yazdırma

Alt Form Yazdırma

Çözüldü #1
Merhaba,

Bir form içerisinde yer alan ALT FORM'u yazdırmanın yöntemi nedir? Ben ALT FORM'a yazdır butonu ekledim, yazdır diyince hem ANA FORM'u hem ALT FORM'u yazdırıyor. Ben sadece ALT FORM'u yazdırsın istiyorum.

Bu kodu nasıl düzenlemeliyim?

Private Sub Komut72_Click()
On Error GoTo Err_Komut72_Click


DoCmd.PrintOut

Exit_Komut72_Click:
Exit Sub

Err_Komut72_Click:
MsgBox Err.Description
Resume Exit_Komut72_Click

End Sub
Private Sub Komut73_Click()
On Error GoTo Err_Komut73_Click


DoCmd.PrintOut

Exit_Komut73_Click:
Exit Sub

Err_Komut73_Click:
MsgBox Err.Description
Resume Exit_Komut73_Click

End Sub
Cevapla
Çözüldü #2
Sn.zihniates
Dim stDocName As String
Dim MyForm As Form

stDocName = "alt_form"
Set MyForm = Screen.ActiveForm
DoCmd.SelectObject acForm, stDocName, True
DoCmd.PrintOut
DoCmd.SelectObject acForm, MyForm.Name, False
Application Engineer
Cevapla
Çözüldü #3
teşekkür ederim, şimdi deneyeceğim.
Cevapla
Çözüldü #4
Denedim fakat beceremedim kodu nerede kullanmam gerekiyor? Buton'da mı yoksa başka bir yerde mi?

Teşekkürler.
Cevapla
Çözüldü #5
Kodu birebir aynı yazmadınız değil mi?
AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Cevapla
Çözüldü #6
(13/04/2011, 15:49)zihniates yazdı: Denedim fakat beceremedim kodu nerede kullanmam gerekiyor? Buton'da mı yoksa başka bir yerde mi?

Teşekkürler.

stDocName = "alt_form"
Yazan Kısma Kendi Alt Formunuzun Adını Yazmamış Olabilirsiniz.

Application Engineer
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task