quoc nhat
Thành viên tiêu biểu

- Tham gia
- 8/3/12
- Bài viết
- 567
- Được thích
- 43
- Nghề nghiệp
- cán bộ ngành y tế
Chào các anh chị.
Em muốn nhờ các anh chị giúp đỡ em một tý để hoàn thiện file cụ thể là sheet "đơn thuốc"
1. Ẩn những dòng mà có số lượng = 0 cột K ( K15:K19)
2. Em muốn copy nút IN PHIẾU bên sheet" phiếu xuất in" sang cho Sheet " đơn thuốc" mà không biết sửa Code lại thế nào cả. Cụ thể code như thế này: 'Sheet6.PrintPreview 'Xem truoc khi in'
Sheet6.PrintOut From:=1, To:=1, Copies:=1, Preview:=False
' Neu muon in bao nhieu ban thi sua lai o so trong Copies:=??? '
'ThisWorkbook.Save
End Sub
và thêm cái đoạn code gạch những ô khi có số lượng = 0 giống Sheet "phiẽu xuất in" khi ta bấm nut "IN PHIẾU". như em có vẻ cái gạch chéo trong sheet.
3.Nếu hàng nào có cột số lượng = 0 thì STT của hàng cũng theo đó = 0 ( Tất nhiên là từ dưới lên) vì em có cái hàm đếm số khoản phía dưới nên bắt buộc phải đúng.
Mọi người đừng quan tâm vì sao em lại thiết kế trang giấy như vậy vì em in trên tờ giấy bằng 1/2 tờ giấy A4
KÍnh mong các anh chị tận tình giúp đõ em với
Em cảm ơn nhiều!
Em muốn nhờ các anh chị giúp đỡ em một tý để hoàn thiện file cụ thể là sheet "đơn thuốc"
1. Ẩn những dòng mà có số lượng = 0 cột K ( K15:K19)
2. Em muốn copy nút IN PHIẾU bên sheet" phiếu xuất in" sang cho Sheet " đơn thuốc" mà không biết sửa Code lại thế nào cả. Cụ thể code như thế này: 'Sheet6.PrintPreview 'Xem truoc khi in'
Sheet6.PrintOut From:=1, To:=1, Copies:=1, Preview:=False
' Neu muon in bao nhieu ban thi sua lai o so trong Copies:=??? '
'ThisWorkbook.Save
End Sub
và thêm cái đoạn code gạch những ô khi có số lượng = 0 giống Sheet "phiẽu xuất in" khi ta bấm nut "IN PHIẾU". như em có vẻ cái gạch chéo trong sheet.
3.Nếu hàng nào có cột số lượng = 0 thì STT của hàng cũng theo đó = 0 ( Tất nhiên là từ dưới lên) vì em có cái hàm đếm số khoản phía dưới nên bắt buộc phải đúng.
Mọi người đừng quan tâm vì sao em lại thiết kế trang giấy như vậy vì em in trên tờ giấy bằng 1/2 tờ giấy A4
KÍnh mong các anh chị tận tình giúp đõ em với
Em cảm ơn nhiều!