congtruckd
Thành viên mới

- Tham gia
- 15/10/09
- Bài viết
- 2
- Được thích
- 0

Cám ơn nhiều
Làm biếng quá nhỉ.Các huynh chỉ giúp mình cách tạo 1 nút lệnh để in vùng vùng dữ liệu có định (in chứng từ thu chi trong kế toán), có hỏi số lượng bản in.
Cám ơn nhiều
Làm biếng quá nhỉ.
Tô chọn vùng muốn in, Ctrl - P, Alt - N, Tab, gõ số bản in, Enter. Khoảng 03 giây, chẳng code kiết gì cả.
Muốn có nút cho phiền phức thì xem thử file này.
Private Sub CommandButton1_Click()
Dim nn As Byte
On Error Resume Next
nn = InputBox("In bi nhieu ban?", "GPE")
Range("A1:I18").PrintOut Copies:=nn, Collate:=True
[A1].Select
End Sub
Các huynh chỉ giúp mình cách tạo 1 nút lệnh để in vùng vùng dữ liệu có định (in chứng từ thu chi trong kế toán), có hỏi số lượng bản in.
Cám ơn nhiều