Chọn một số khách hàng trong FORM và in ra (3 người xem)

Liên hệ QC

Người dùng đang xem chủ đề này

trungthinhas

Thành viên mới
Tham gia
16/2/11
Bài viết
12
Được thích
0
E tạo một trang form .Trong đó có: Mã KH,tên KH, Họ tên, Điạ chi ( TPHCM, TG, ĐN, HP).

Mấy a cho e hỏi:
E đã làm Command chọn cho TPHCM, TG, ĐN, HP rồi.
E muốn khi chọn chẳng hạn TPHCM có rất nhiều khách hàng ở TPHCM, E chỉ muốn chọn 4, 5 khách hàng là TPHCM thôi và chuyển sang Report để in 4,5 khách hàng mà e đã chọn ở form.
E fải làm sao,
Mong mấy a giúp.
Thanks.
 
E tạo một trang form .Trong đó có: Mã KH,tên KH, Họ tên, Điạ chi ( TPHCM, TG, ĐN, HP).

Mấy a cho e hỏi:
E đã làm Command chọn cho TPHCM, TG, ĐN, HP rồi.
E muốn khi chọn chẳng hạn TPHCM có rất nhiều khách hàng ở TPHCM, E chỉ muốn chọn 4, 5 khách hàng là TPHCM thôi và chuyển sang Report để in 4,5 khách hàng mà e đã chọn ở form.
E fải làm sao,
Mong mấy a giúp.
Thanks.

Bạn thiết kế 1 form trong đó gồm 1 combo, 1 listbox, 1 commandbutton rồi gửi lên đây xem CSDL của bạn thế nào nhé.
 
E gưi CSDL mấy các A giúp E vơi nhé.
Thanks cáxc A nhiêu.

SAO DOI HOAI MA KHONG THAY PHẢN HOI VẬY TA.
MAY A CAO THU OI, GIUP E VOI.
 

File đính kèm

Lần chỉnh sửa cuối:
E gưi CSDL mấy các A giúp E vơi nhé.
Thanks cáxc A nhiêu.

SAO DOI HOAI MA KHONG THAY PHẢN HOI VẬY TA.
MAY A CAO THU OI, GIUP E VOI.

Dùng vòng lặp duyệt qua những địa chỉ bạn chọn, dùng phương thức SelectObject để chọn report, sau đó in ra.
Code như sau:

Mã:
Private Sub Preview_Click()
Dim frm As Form, ctl As Control, varItm As Variant
Set frm = Forms![frmForm]: Set ctl = frm!lstDC

For Each varItm In ctl.ItemsSelected
    coKh = ctl.ItemData(varItm)
    DoCmd.SelectObject acReport, "R_KH", True
    DoCmd.PrintOut acPrintAll, , , , 1
    ctl.Selected(varItm) = False
Next varItm

End Sub

Bạn xem thêm file đính kèm nhé.
 

File đính kèm

Thank a nhiu, nhưng E chi muốn Tạo option group de chọn 2 or 3 khách hảng de in ra thoi. chu khong phai in het tat ca danhsach
cua 1 tỉnh
 
Web KT

Bài viết mới nhất

Back
Top Bottom