Clinton có một sổ làm việc chứa hơn 200 trang tính được nhiều người trong công ty của ông điền vào trong tháng. Cuối tháng anh ta cần in các bảng tính này. Không phải tất cả các trang tính đều chứa dữ liệu và Clinton chỉ muốn in các trang tính có chứa dữ liệu để không tốn giấy mực. Anh ta tự hỏi nếu có, có lẽ, một macro mà anh ta có thể sử dụng để chỉ in những bảng tính có giá trị trong ô G41.

Câu trả lời là một macro như vậy có thể được viết khá dễ dàng. Nó sẽ chỉ cần tìm ra có bao nhiêu trang tính, kiểm tra ô G41 trên mỗi trang và sau đó chỉ in nếu có thứ gì đó trong ô đó.

Macro sau chỉ thực hiện các thao tác này.

Sub PrintMost()

Dim wks As Worksheet     For Each wks In ActiveWorkbook.Worksheets         If Not IsEmpty(wks.Range("G41")) Then             wks.PrintOut         End If     Next     Set wks = Nothing End Sub

Có thể dễ dàng sửa đổi macro để thực hiện các thao tác khác, chẳng hạn như hỏi xem có nên in trang tính đã cho nào không hoặc yêu cầu in bao nhiêu bản sao.

_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 (3502) á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: