Comment imprimer plusieurs lignes sélectionnées sur une seule page dans Excel ?

Je vais vous expliquer ici comment imprimer plusieurs lignes sélectionnées sur une seule page à l’aide de VBA dans Excel. Suivez ces étapes :

1. Appuyez simultanément sur les touches Alt + F11 pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.

2. Cliquez sur Insertion > Module, puis collez le code VBA ci-dessous dans la nouvelle fenêtre de module qui s’ouvre.

VBA : Imprimer plusieurs lignes sélectionnées sur une seule 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. Appuyez sur la touche F5 ou cliquez sur le bouton Exécuter pour exécuter ce code VBA.

4. Une boîte de dialogue Kutools pour Excel s’ouvre maintenant. Sélectionnez les lignes multiples que vous souhaitez imprimer, puis cliquez sur le bouton OK pour imprimer ces lignes.

Remarque : En maintenant la touche Ctrl enfoncée, vous pouvez sélectionner simultanément plusieurs lignes non adjacentes.

Si nous pouvons copier ces lignes non consécutives et les coller sous forme d’une plage consécutive dans une autre feuille de calcul, nous pourrons facilement les imprimer sur une seule page. Cette méthode utilise l’utilitaire Copier des plages de Kutools pour Excel pour résoudre ce problème.

1. Créez une nouvelle feuille de calcul, puis sélectionnez les lignes que vous souhaitez imprimer dans votre tableau et cliquez sur Kutools > Plage > Copier des plages.

Remarque : en maintenant la touche Ctrl enfoncée, vous pouvez sélectionner plusieurs lignes non consécutives simultanément.

2. Dans la boîte de dialogue « Copier plusieurs plages » qui s’ouvre, cochez l’option Tout, puis cliquez sur le bouton OK.

Remarque : les options Inclure la hauteur de ligne et Inclure la largeur de colonne copient la hauteur des lignes et la largeur des colonnes de la plage sélectionnée, puis les appliquent à la plage de destination.

3. Sélectionnez la cellule A1 dans la nouvelle feuille de calcul créée, puis cliquez sur le bouton OK.

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

Une boîte de dialogue s’affiche alors, indiquant le nombre de lignes supprimées. Il vous suffit de la fermer.

5. Cliquez sur Fichier(ou sur le)bouton Office) > Imprimer pour imprimer ces lignes.

En réalité, Kutools pour Excel a conçu l’Assistant Impression de sélections multiples afin d’imprimer plusieurs plages ensemble dans Excel.

1. Cliquez sur KUTOOLS PLUS > Impression > Assistant Impression de sélections multiples pour ouvrir cet assistant.

2. Dans l’Assistant Impression de sélections multiples qui s’ouvre, cliquez sur le bouton Ajouter pour ajouter plusieurs lignes que vous souhaitez imprimer ensemble, puis cliquez sur le bouton Terminer.

Remarques :

(1) Après avoir cliqué sur le bouton Ajouter, vous pouvez sélectionner plusieurs plages non consécutives dans une même feuille de calcul en maintenant la touche Ctrlenfoncée, puis en les sélectionnant une par une ;

(2) Pour supprimer une plage ou une ligne de la liste des Plages à imprimer, il suffit de la sélectionner, puis de cliquer sur le bouton Supprimer.

(3) Cet utilitaire ne permet pas d’imprimer des lignes entières ni des colonnes entières, telles que la ligne entière $4 : $4 ou la colonne entière $B:$B.

3. Les lignes ou plages sélectionnées ont été collées sous forme d’images liées dans une nouvelle feuille de calcul. Cliquez sur Fichier(ou sur le)bouton Office) > Imprimer pour l’imprimer.