In hàng loạt nhiều lựa chọn (tất cả các vùng in) trên một trang trong Excel

Ở đây tôi sẽ nói về việc in nhiều hàng đã chọn trên một trang bằng VBA trong Excel. Vui lòng làm như sau:

1. nhấn Khác + F11 đồng thời để mở cửa sổ Microsoft Visual Basic for Applications.

2. nhấp chuột Chèn > Mô-đun, và sau đó dán mã VBA bên dưới vào cửa sổ Mô-đun mở mới.

VBA: In nhiều hàng đã chọn trên một trang trong Excel

Sub Extract_to_Print()
Dim Rg As Range, Rg1 As Range, Rg2 As Range
Dim xAddress As String
Dim xSht As Worksheet
Dim I As Long
Dim xScreenUpdate As Boolean
Dim xAlert As Boolean
On Error Resume Next
xAddress = Application.ActiveWindow.RangeSelection.Address
Set Rg = Application.InputBox("Please select ranges you will print:", "Kutools for Excel", xAddress, , , , , 8)
If Rg Is Nothing Then Exit Sub
xScreenUpdate = Application.ScreenUpdating
xAlert = Application.DisplayAlerts
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Set xSht = ThisWorkbook.Worksheets.Add
I = 1
For Each Rg1 In Rg.Areas
Rg1.Copy xSht.Range("A" & I)
I = I + Rg1.Rows.Count
Next
xSht.PrintOut
xSht.Delete
Application.ScreenUpdating = xScreenUpdate
Application.DisplayAlerts = xAlert
End Sub

3. nhấn F5 phím hoặc nhấp vào chạy để chạy VBA này.

4. Bây giờ một hộp thoại Kutools cho Excel bật lên. Vui lòng chọn nhiều hàng mà bạn sẽ in và nhấp vào OK để in các hàng này.

Chú thích: Giữ Ctrl , bạn có thể chọn nhiều hàng không liền kề cùng một lúc.

Nếu chúng ta có thể sao chép các hàng không liên tiếp này và dán thành một dải liên tiếp trong trang tính khác, chúng ta có thể dễ dàng in chúng trên một trang. Phương pháp này sẽ giới thiệu Kutools cho Excel's Sao chép phạm vi tiện ích để đối phó với nó.

1. Tạo một trang tính mới, tiếp theo chọn các hàng mà bạn sẽ in từ bảng của mình và nhấp vào Kutools > Sao chép phạm vi.

Chú thích: Giữ Ctrl , bạn có thể chọn nhiều hàng không liên tiếp cùng một lúc.

2. Trong hộp thoại Sao chép Nhiều Dải ô đang mở, hãy chọn Tất cả và nhấp vào Ok .

Chú thích: Các Bao gồm cả chiều cao hàng lựa chọn và Bao gồm chiều rộng cột các tùy chọn sẽ sao chép chiều cao hàng và chiều rộng cột của phạm vi đã chọn và dán vào phạm vi đích.

3. Chọn Ô A1 trong trang tính mới được tạo và nhấp vào OK Button.

4. Ở trong bảng tính đích và nhấp vào Kutools > Xóa bỏ > Xóa hàng trống > Trong trang tính hoạt động.

Và sau đó một hộp thoại xuất hiện và cho bạn biết có bao nhiêu hàng đã bị xóa. Chỉ cần đóng nó lại.

5. Nhấp vào Tập tin (Hoặc Nút văn phòng)> In để in các hàng này.

Trên thực tế Kutools cho các thiết kế Excel Trình hướng dẫn in nhiều lựa chọn để in nhiều phạm vi cùng nhau trong Excel.

1. nhấp chuột Doanh nghiệp > In > Trình hướng dẫn in nhiều lựa chọn để mở Trình hướng dẫn In Nhiều lựa chọn.

2. Trong trình hướng dẫn in nhiều lựa chọn mở, hãy nhấp vào Thêm nút  để thêm các hàng mà bạn sẽ in cùng nhau và nhấp vào Kết thúc .

Ghi chú:

(1) Sau khi nhấp vào Thêm nút , bạn có thể chọn nhiều phạm vi không liên tiếp trong một trang tính bằng cách giữ Ctrl phím và sau đó chọn từng cái một;

(2) Để xóa một dải / hàng khỏi Phạm vi để in danh sách, chỉ cần chọn phạm vi / hàng này và nhấp vào Xóa bỏ nút.

(3) Tiện ích này không hỗ trợ in toàn bộ hàng và cột, chẳng hạn như toàn bộ hàng $ 4: $ 4hoặc toàn bộ cột $ B: $ B.

3. Các hàng / phạm vi đã chọn đã được dán dưới dạng ảnh được liên kết trong một trang tính mới. Tiếp tục nhấp vào Tập tin (Hoặc Nút văn phòng)> In để in nó.