Comment insérer rapidement des lignes vides / vides dans Excel?

La plupart d'entre nous peuvent être confrontés au problème dans Excel selon lequel nous devons insérer une ligne vide entre chacune des lignes existantes, et nous savons tous comment insérer une ligne vide manuellement. Mais l'insertion de centaines de lignes vides sera une tâche fastidieuse si vous insérez chaque ligne individuellement. Voici quelques astuces rapides pour vous aider à résoudre ce problème.

Insérer des lignes vides avec la fonction de tri
Insérez rapidement des nombres spécifiques de lignes vides avec Kutools for Excel
Insérer des lignes vides alternées avec le code VBA

Insérer des lignes vides avec la fonction de tri

Cette méthode est une méthode plus facile mais détournée pour insérer des lignes vides entre les lignes sortantes. Vous pouvez faire comme suit:

1. Vous avez besoin d'une colonne vide à côté de vos données. Par exemple, j'ai une feuille de calcul comprenant A1: E9, vous pouvez utiliser la colonne F.

2. Dans la cellule F1, saisissez le numéro 1 et saisissez 2 dans la cellule F2.

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

4. Copiez ensuite cette nouvelle colonne F (F1: F9), sélectionnez la cellule F10 et collez le numéro de remplissage automatique de F1: F9. Voir la capture d'écran:

5. Et puis cliquez sur Sauvegarde de > SortEt un Avertissement de tri la boîte de dialogue apparaîtra, sélectionnez Élargir la sélection option, et cliquez Sort… Voir capture d'écran:

6. Et un Sort la boîte de dialogue apparaîtra, choisissez le numéro 1 du Trier par liste déroulante, puis cliquez sur le OK bouton. Voir la capture d'écran:

Ensuite, les nouvelles lignes vides ont été insérées dans les lignes sortantes. Voir la capture d'écran:

Notes: 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érez rapidement des nombres spécifiques de lignes vides avec Kutools for Excel

Les deux méthodes ci-dessus se réfèrent simplement à l'insertion de lignes vides entre chaque ligne, pour insérer une ligne vide ou plusieurs lignes après toutes les nièmes lignes, comment devez-vous faire? Ici, je recommande le Insérer des lignes et des colonnes vides utilité de Kutools for Excel. Cette uility peut aider à insérer rapidement des nombres spécifiques de lignes vides après chaque nième ligne dans une certaine plage. Veuillez faire comme suit.

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

2. dans le Insérer des lignes et des colonnes vides boîte de dialogue, choisissez Lignes vides dans le type d'insertion , spécifiez le nombre de lignes d'intervalle sur lesquelles vous allez insérer des lignes vides et le nombre de lignes à insérer, puis cliquez sur le bouton OK bouton. Voir la capture d'écran:

>

Ensuite, vous pouvez voir que certaines lignes vides ont été insérées toutes les deux lignes. Voir les captures d'écran:

Notes: le nombre dans le Intervalle de et rangées peut être ajusté pour répondre à vos besoins. Par exemple, vous pouvez insérer trois, quatre, cinq… lignes vides après chaque une, deux, trois… lignes.

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

Si la méthode ci-dessus est un peu complexe, vous pouvez utiliser le code VBA suivant pour le résoudre.

1. Appuyez sur les touches Alt + F11 pour ouvrir le Microsoft Visual Basic pour les applications fenêtre, puis cliquez sur insérer > Module et entrez 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. Puis clique ou appuyez sur la touche F5 pour exécuter le code. Dans la boîte de dialogue contextuelle Kutoos pour Excel, sélectionnez la plage dans laquelle vous allez insérer des lignes vides, puis cliquez sur le bouton OK. Voir la capture d'écran:

Ensuite, une nouvelle ligne vide a été insérée entre toutes les deux lignes. Voir la capture d'écran:

Articles connexes

• Insérez rapidement une colonne vide toutes les autres colonnes
• Insérer plusieurs lignes ou colonnes vides à la fois