Làm cách nào để in tất cả các trang tính ngoại trừ một trang tính cụ thể trong Excel?
Trong Excel làm việc, in trang tính có thể là công việc chung hàng ngày đối với bạn. Tuy nhiên, bạn đã bao giờ thử in tất cả các tờ trừ một tờ cụ thể chưa? Ví dụ, một sổ làm việc ở đây, bạn muốn in tất cả các trang tính nhưng trang có tên là “Tổng cộng”, làm thế nào bạn có thể nhanh chóng xử lý nó?
In tất cả trang tính trừ một trang tính bằng VBA
In các trang nhất định bạn cần với Kutools cho Excel
In tất cả trang tính trừ một trang tính bằng VBA
Đây là mã VBA có thể in tất cả các trang tính ngoại trừ một trang tính cụ thể.
1. Kích hoạt sổ làm việc bạn muốn in trang tính và bấm Alt + F11 chìa khóa để mở Microsoft Visual Basic cho các ứng dụng cửa sổ.
2. nhấp chuột Chèn > mô-đune, dán mã dưới đây vào tập lệnh Mô-đun.
VBA: In trang tính ngoại trừ một
Sub printsheets()
'UpdatebyExtendoffice20161031
Dim xWs As Worksheet
Application.ScreenUpdating = False
For Each xWs In ThisWorkbook.Worksheets
If xWs.Visible = True Then
If xWs.Name <> "Total" Then
With xWs.PageSetup
.PrintArea = "A1:B15" ' USE YOUR PRINTAREA
.Zoom = False
.FitToPagesTall = 1
.FitToPagesWide = 1
End With
xWs.PrintOut
End If
End If
Next xWs
Application.ScreenUpdating = False
MsgBox "Sheet “Total” has not been printed", vbInformation, "Kutools for Excel"
End Sub
Lưu ý: Trong mã, Tổng số: in Nếu xWs.Name <> "Tổng" Thì và MsgBox "Tổng số trang tính chưa được in" là tên trang tính bạn không muốn in, và A1: B15 in .PrintArea = "A1: B15" là phạm vi bạn muốn in của mỗi trang tính. Bạn có thể thay đổi chúng khi bạn cần.
3. nhấn F5 để chạy mã, và sau đó một hộp thoại bật ra để nhắc bạn rằng trang tính cụ thể chưa được in. Xem ảnh chụp màn hình:
4. nhấp chuột OK để đóng hộp thoại.
In các trang nhất định bạn cần với Kutools cho Excel
Nếu bạn chỉ muốn in các trang chẵn hoặc lẻ, hoặc các trang cụ thể của trang tính, bạn có thể đăng ký Kutools cho Excel'S In các trang được chỉ định tiện ích có thể nhanh chóng giúp bạn.
Kutools cho Excel, với hơn 300 chức năng tiện dụng, giúp công việc của bạn dễ dàng hơn. |
Sau khi cài đặt Kutools cho Excel, vui lòng làm như dưới đây :(Tải xuống miễn phí Kutools cho Excel ngay!)
1. Kích hoạt trang tính mà bạn muốn in các trang nhất định, nhấp vào Kutools Plus > In > In các trang được chỉ định. Xem ảnh chụp màn hình:
2. Sau đó trong In các trang được chỉ định , hãy kiểm tra các tùy chọn dựa trên nhu cầu in của bạn. Xem ảnh chụp màn hình:
3. nhấp chuột In để in các trang.
Công cụ năng suất văn phòng tốt nhất
Nâng cao kỹ năng Excel của bạn với Kutools for Excel và trải nghiệm hiệu quả hơn bao giờ hết. Kutools for Excel cung cấp hơn 300 tính năng nâng cao để tăng năng suất và tiết kiệm thời gian. Bấm vào đây để có được tính năng bạn cần nhất...
Tab Office mang lại giao diện Tab cho Office và giúp công việc của bạn trở nên dễ dàng hơn nhiều
- Cho phép chỉnh sửa và đọc theo thẻ trong Word, Excel, PowerPoint, Publisher, Access, Visio và Project.
- Mở và tạo nhiều tài liệu trong các tab mới của cùng một cửa sổ, thay vì trong các cửa sổ mới.
- Tăng 50% năng suất của bạn và giảm hàng trăm cú nhấp chuột cho bạn mỗi ngày!