Comment insérer rapidement des lignes vides dans Excel ?

La plupart d'entre nous sont confrontés au problème dans Excel de devoir insérer une ligne vide entre chaque ligne existante, et nous savons tous comment insérer une ligne vide manuellement. Cependant, insérer des centaines de lignes vides individuellement peut être une tâche fastidieuse. Voici quelques astuces rapides pour vous aider à résoudre ce problème.

Insérer des lignes vides avec la fonction Trier
Insérer rapidement un nombre spécifique de lignes vides avec Kutools pour Excel
Insérer des lignes vides alternées avec le code VBA

Insérer des lignes vides avec la fonction Trier

Cette méthode est plus facile mais indirecte pour insérer des lignes vides entre les lignes existantes. Vous pouvez procéder comme suit :

1. Vous avez besoin d'une colonne vide adjacente à vos données. Par exemple, si votre feuille de calcul comprend A1:E9, vous pouvez utiliser la colonne F.

2. Dans la cellule F1, saisissez le chiffre 1, et saisissez le chiffre 2 dans la cellule F2.

3. Sélectionnez les nombres 1 et 2, puis double-cliquez sur la poignée de remplissage ; Excel remplira automatiquement les cellules de la colonne F.

4. Ensuite, copiez cette nouvelle colonne F (F1:F9), sélectionnez la cellule F10, et collez les numéros de remplissage automatique de F1:F9. Voir capture d'écran :

5. Puis cliquez sur Données > Trier, et une boîte de dialogue Avertissement de tri apparaîtra. Sélectionnez l'option Développer la sélection, puis cliquez sur Trier… Voir capture d'écran :

6. Une boîte de dialogue Trier apparaîtra, choisissez le chiffre 1 dans la liste déroulante Trier par, puis cliquez sur le bouton OK. Voir capture d'écran :

Les nouvelles lignes vides ont alors été insérées entre les lignes existantes. Voir capture d'écran :

Remarque : Si vous souhaitez insérer deux ou trois lignes vides entre chaque ligne, vous pouvez copier la nouvelle colonne de remplissage automatique deux ou trois fois pour ajouter les nouvelles lignes.

Insérer rapidement un nombre spécifique de lignes vides avec Kutools pour Excel

Les deux méthodes ci-dessus concernent uniquement l'insertion de lignes vides entre chaque ligne. Pour insérer une ou plusieurs lignes vides après toutes les n lignes, que devez-vous faire ? Je recommande ici l'utilitaire Insertion de lignes et colonnes vides de Kutools pour Excel. Cet utilitaire permet d'insérer rapidement un nombre spécifique de lignes vides après chaque groupe de n lignes dans une plage donnée. Procédez comme suit.

1. Sélectionnez la plage où vous souhaitez insérer les lignes vides, puis cliquez sur Kutools > Insérer > Insertion de lignes et colonnes vides. Voir capture d'écran :

2. Dans la boîte de dialogue Insertion de lignes et colonnes vides, choisissez Lignes vides dans la section Type d'insertion , spécifiez le nombre de lignes d'intervalle en fonction desquelles vous voulez insérer des lignes vides ainsi que le nombre de lignes à insérer, puis cliquez sur le bouton OK. Voir capture d'écran :

>

Vous verrez alors que certaines lignes vides ont été insérées après chaque groupe de deux lignes. Voir captures d'écran :

Remarque : Le nombre dans Intervalle et Lignes peut être ajusté selon vos besoins. Par exemple, vous pouvez insérer trois, quatre, cinq... lignes vides après chaque groupe d'une, deux, trois... lignes.

Insérer des lignes vides alternées avec le code VBA

Si la méthode précédente est un peu complexe, vous pouvez utiliser le code VBA suivant pour résoudre le problème.

1. Appuyez sur les touches Alt + F11 pour ouvrir la fenêtre Microsoft Visual Basic pour Applications, puis cliquez sur Insérer > Module et saisissez le code suivant dans le Module :

Code VBA : Insérer des lignes vides dans Excel

Sub InsertBlackRows()
'Updateby20131127
Dim Rng As Range
Dim WorkRng As Range
Dim FirstRow As Integer, xRows As Integer, xCols As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
FirstRow = WorkRng.Row
xRows = WorkRng.Rows.Count
xCols = WorkRng.Columns.Count
Application.ScreenUpdating = False
WorkRng.Cells(xRows, 1).Resize(1, xCols).Select
Do Until Selection.Row = FirstRow
    Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
    Selection.Offset(-1, 0).Select
Loop
Application.ScreenUpdating = True
End Sub

2. Cliquez ensuite sur ou appuyez sur la touche F5 pour exécuter le code. Dans la boîte de dialogue Kutools pour Excel qui apparaît, sélectionnez la plage où vous souhaitez insérer des lignes vides, puis cliquez sur le bouton OK. Voir capture d'écran :

Une nouvelle ligne vide a alors été insérée entre chaque groupe de deux lignes. Voir capture d'écran :

Articles connexes

• Insérer rapidement une colonne vide à intervalle régulier
• Insérer plusieurs lignes ou colonnes vides en une seule fois