Impression par lots de plusieurs sélections (toutes les zones d'impression) sur une page dans Excel

Ici, je parlerai de l'impression de plusieurs lignes sélectionnées sur une page avec VBA dans Excel. Veuillez procéder comme suit:

1. presse autre + F11 simultanément pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.

2. Cliquez insérer > Module, puis collez le code VBA ci-dessous dans la nouvelle fenêtre Module d'ouverture.

VBA: imprimer plusieurs lignes sélectionnées sur une page dans 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. presse F5 ou cliquez sur la cours bouton pour exécuter ce VBA.

4. Maintenant, une boîte de dialogue Kutools for Excel apparaît. Veuillez sélectionner plusieurs lignes que vous imprimerez et cliquez sur le bouton OK bouton pour imprimer ces lignes.

Notes: Tenir le Ctrl clé, vous pouvez sélectionner plusieurs lignes non adjacentes en même temps.

Si nous pouvons copier ces lignes non consécutives et les coller en tant que plage consécutive dans une autre feuille de calcul, nous pouvons facilement les imprimer sur une page. Cette méthode présentera Kutools for Excel's Copier les plages utilité pour y faire face.

1. Créez une nouvelle feuille de calcul, sélectionnez ensuite les lignes que vous imprimerez à partir de votre tableau, puis cliquez sur Kutools > Copier les plages.

Notes: Tenir le Ctrl clé, vous pouvez sélectionner plusieurs lignes non consécutives en même temps.

2. Dans la boîte de dialogue d'ouverture Copier plusieurs plages, cochez Tout option, et cliquez sur le Ok .

Notes: Le Y compris la hauteur de ligne option et Y compris la largeur de colonne Les options copient les hauteurs de ligne et les largeurs de colonne des plages sélectionnées et les collent dans la plage de destination.

3. Sélectionnez la cellule A1 dans la nouvelle feuille de calcul créée et cliquez sur le OK Bouton.

4. Restez dans la feuille de calcul de destination et cliquez sur Kutools > Supprimer > Supprimer les lignes vides > Dans la feuille active.

Et puis une boîte de dialogue apparaît et vous montre combien de lignes ont été supprimées. Fermez-le.

5. Cliquez sur l' Déposez le (ou Bouton Office)> Impression pour imprimer ces lignes.

En fait, Kutools pour les conceptions Excel Imprimer l'assistant de sélection multiple pour imprimer plusieurs plages ensemble dans Excel.

1. Cliquez Entreprise > Impression > Imprimer l'assistant de sélection multiple pour ouvrir l'assistant d'impression de sélection multiple.

2. Dans l'assistant d'impression de sélection multiple qui s'ouvre, cliquez sur Ajouter une détection de fuite de données bouton (dans la fenêtre de contrôle qui apparaît maintenant)  pour ajouter des lignes que vous imprimerez ensemble, puis cliquez sur le bouton Récapitulatif .

Notes:

(1) Après avoir cliqué sur le Ajouter une détection de fuite de données bouton (dans la fenêtre de contrôle qui apparaît maintenant) , vous pouvez sélectionner plusieurs plages non consécutives dans une feuille de calcul en maintenant la touche Ctrl puis sélectionnez-les un par un;

(2) Pour supprimer une plage / ligne du Plages à imprimer liste, sélectionnez simplement cette plage / ligne et cliquez sur le Supprimer bouton (dans la fenêtre de contrôle qui apparaît maintenant).

(3) Cet utilitaire ne prend pas en charge l'impression de lignes et de colonnes entières, telles qu'une ligne entière de $ 4: $ 4, ou colonne entière de G $: G $.

3. Les lignes / plages sélectionnées ont été collées sous forme d'images liées dans une nouvelle feuille de calcul. Allez-y pour cliquer Déposez le (ou Bouton Office)> Impression pour l'imprimer.