Tom đang cố gắng tạo một số mã macro sẽ kiểm soát số lượng bản sao cần in, dựa trên giá trị được nhập vào một ô. Anh ấy đã tạo một biểu mẫu đầu vào để nhân viên vận chuyển của mình sử dụng để in nhãn nội dung gói hàng. Anh ta muốn có thể yêu cầu họ nhập số nhãn cần in vào ô B11 và sau đó in số nhãn đó.

Điều này tương đối dễ thực hiện, tùy thuộc vào những gì bạn muốn in. Nếu bạn chỉ muốn in nội dung của trang tính đang hoạt động, thì bạn có thể sử dụng mã tương tự như sau:

iNumCopies = Range("B11").Value If iNumCopies < 1 Then iNumCopies = 1 ActiveSheet.PrintOut Copies:=iNumCopies

Nếu bạn không muốn in toàn bộ trang tính, thì bạn chỉ cần sửa đổi câu lệnh PrintOut một chút. Ví dụ, ví dụ sau giả định rằng “nhãn” được in trong phạm vi A1: A5:

Set MyRange = Range("A1:A5")

iNumCopies = Range("B11").Value If iNumCopies < 1 Then iNumCopies = 1 MyRange.PrintOut Copies:=iNumCopies

_Lưu ý: _

Nếu bạn muốn biết cách sử dụng các macro được mô tả trên trang này (hoặc trên bất kỳ trang nào khác trên trang ExcelTips), tôi đã chuẩn bị một trang đặc biệt bao gồm thông tin hữu ích.

ExcelTips là nguồn của bạn để đào tạo Microsoft Excel hiệu quả về chi phí.

Mẹo này (3272) áp dụng cho Microsoft Excel 97, 2000, 2002 và 2003. Bạn có thể tìm thấy phiên bản của mẹo này cho giao diện ribbon của Excel (Excel 2007 trở lên) tại đây: