Mohon pencerahan atas masalah yang saya hadapi.
1. Dalam adp yang saya bikin ada form PENJUALAN dengan field
- ID_Penjualan
- Pembeli
- Tgl_Penjualan
- Jml_Penjualan
- Jml_Pembayaran
dan sebuah subform (ITEM_PENJUALAN subform).
saya membuat btn_print untuk mencetak form yang sedang dibuka (tidak saya
lakukan melalui report).
Tapi yang tercetak itu semua record. bagaimana caranya memodifikasi vba di
bawah ini agar hanya mencetak record yang sedang dibuka saja.
Private Sub btn_print_Click()
On Error GoTo Err_btn_print_Click
Dim stDocName As String
Dim MyForm As Form
stDocName = "PENJUALAN"
Set MyForm = Screen.ActiveForm
DoCmd.SelectObject acForm, stDocName, True
DoCmd.PrintOut
DoCmd.SelectObject acForm, MyForm.Name, False
Exit_btn_print_Click:
Exit Sub
Err_btn_print_Click:
MsgBox Err.Description
Resume Exit_btn_print_Click
End Sub
2. Dalam subform tsb terdapat field Penjualan.
Bagaimana caranya agar field Jml_Penjualan secara otomatis menghitung total
field Penjualan yang ada di subform tsb.
Terima kasih sebelumnya.
diki w
___________________________________________________________________________
Yahoo! Toolbar kini dilengkapi dengan Search Assist. Download sekarang juga.
http://id.toolbar.yahoo.com/
