Theresa tự hỏi liệu có cách nào để định dạng một ô để nếu nội dung của ô đáp ứng các tiêu chí nhất định thì một trang tính cụ thể sẽ tự động được in. Câu trả lời ngắn gọn là không, không có cách nào sử dụng định dạng để đạt được mục tiêu này. Tuy nhiên, bạn có thể sử dụng macro xử lý sự kiện để thực hiện in.

Ví dụ: một trong những trình xử lý sự kiện được hỗ trợ bởi Excel được kích hoạt mỗi khi một cái gì đó trong sổ làm việc được thay đổi. Bạn có thể tạo một trình xử lý sự kiện để kiểm tra ô nào đã được thay đổi. Nếu đó là một ô cụ thể và nếu ô đó chứa một giá trị cụ thể, thì một trang tính có thể được in.

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address = "B2" Then         If Target.Value = 1001 Then             Worksheets(1).PrintOut         End If     End If End Sub

Macro này kiểm tra ô nào đã được thay đổi. Nếu đó là ô B2 và nếu ô chứa giá trị 1001, thì trang tính sẽ tự động được in.

Tất nhiên, bạn có thể muốn nội dung của một ô cụ thể kiểm soát những gì được in khi ai đó thực sự chọn in. Ví dụ: nếu người dùng chọn in, bạn có thể muốn kiểm tra nội dung của một ô (chẳng hạn như E2) và dựa trên nội dung của ô đó, tự động sửa đổi nội dung được in. Macro sau sử dụng cách tiếp cận này:

Private Sub Workbook_BeforePrint(Cancel As Boolean)

Application.EnableEvents = False     Select Case Worksheets("Sheet1").Range("E1")

Case 1             Worksheets("Sheet1").PrintOut         Case 2             Worksheets("Sheet2").PrintOut         Case 3             Worksheets("Sheet3").PrintOut         Case 4             Worksheets("Sheet4").PrintOut         Case Else             ActiveSheet.PrintOut     End Select     Cancel = True     Application.EnableEvents = True End Sub

Macro in Sheet1, Sheet2, Sheet3 hoặc Sheet4 tùy thuộc vào việc ô E2 chứa 1, 2, 3 hoặc 4.

_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 (11578) áp dụng cho Microsoft Excel 2007, 2010, 2013 và 2016.

Bạn có thể tìm thấy phiên bản của mẹo này cho giao diện menu cũ hơn của Excel tại đây: