Thay đổi số trong mỗi lần tôi in

1

Tôi có một bảng Excel tôi sử dụng làm hóa đơn.

Tôi muốn in 100 trang và tôi muốn số hóa đơn thay đổi từ 1 thành 100, để mỗi giấy sẽ có số hóa đơn khác nhau.

Tôi có thể làm cái này như thế nào?

microsoft-excel printing

— khalid
nguồn

Bạn có cần thực hiện tất cả việc in trong một lần chạy hoặc bạn sẽ mở tệp, in một lần, đóng, lặp lại sau đó?

— Piskvor

tôi sẽ in tất cả trong một lần chạy, sau đó trong tương lai có lẽ tôi muốn tiếp tục và lặp lại nó .. cảm ơn

— khalid

2

Bạn cần một macro cho điều đó. Tôi tìm thấy macro sau đây và thực hiện một số thay đổi về nó. Hãy thử để xem nó hoạt động chính xác:

Sub PrintCopies_ActiveSheet()

Dim CopiesCount As Long
Dim copynumber As Long

CopiesCount = Application.InputBox("How many copies do you want?", Type:=1)
'Now the program wants you to input how many pages you like to print.
'You can input 100 here.

For copynumber = 1 To CopiesCount
With ActiveSheet
   .Range("E1").Value = copynumber 'I assume your invoice number is in cell E1.
   .PrintOut 'Print the sheet
End With
Next copynumber
End Sub

— Mehper C. Palavuzlar
nguồn

vấn đề duy nhất là tôi không thể bắt đầu từ 100 hoặc 1000, luôn luôn bắt đầu từ 1

— khalid

Thay đổi dòng này: For copynumber = 1 To CopiesCount như For copynumber = 100 To CopiesCount

— Mehper C. Palavuzlar

1

Tôi sẽ sử dụng một macro để làm điều này, vì dường như không có một phương pháp dễ dàng, được xây dựng trong việc này. Các phác thảo của macro sẽ khá đơn giản. Một cái gì đó thuộc về bản chất này:

Nhắc số lượng bản sao và tên máy in
Đặt ô Số hóa đơn thành 0
Vòng lặp cho số lượng bản sao
1. Tăng số ô hóa đơn
2. In tài liệu sang tên máy in

Chỉnh sửa

Trang này có một ví dụ về Word cho Word, vì vậy bạn chỉ cần điều chỉnh nó thành excel. Trang này có một ví dụ sơ bộ cho excel

— xdumaine
nguồn

hoặc nếu bạn sẽ sử dụng cùng một máy in mỗi lần và luôn in 100 bản, bạn có thể bỏ qua bước 1.

— xdumaine