Comment supprimer rapidement toutes les autres lignes dans Excel?

Si vous souhaitez supprimer rapidement toutes les autres lignes ou colonnes dans Excel, le point principal est de savoir comment sélectionner rapidement toutes les autres lignes ou colonnes en premier, puis leur appliquer l'opération de suppression. Et cet article vous montrera des choses délicates sur la façon de sélectionner d'abord toutes les autres lignes ou colonnes, puis de les supprimer rapidement.

Supprimer toutes les autres lignes dans Excel avec la commande Filtre

Supprimer toutes les autres lignes dans Excel avec le code VBA

Supprimez une ligne ou une colonne sur deux dans Excel avec Kutools for Excel

Supprimer toutes les autres lignes dans Excel avec la commande Filtre

Microsoft Excel Filtre peut vous aider à filtrer rapidement une ligne sur deux, puis à les supprimer à la fois, procédez comme suit:

1. Dans une colonne vide en plus des données d'origine, saisissez 0,1,0,1…, 0,1. Dans ce cas, nous entrons les nombres dans la colonne d'assistance C. Voir la capture d'écran suivante:

2. Sélectionnez la colonne C et cliquez sur le Filtre bouton sous Sauvegarde de languette. Cliquez ensuite sur le bouton fléché à côté de C1 et cochez uniquement 0 sous le Sélectionner tout option. Voir la capture d'écran:

3. Ensuite, toutes les lignes avec 1 sont masquées. Sélectionnez les lignes visibles avec 0 et cliquez sur le bouton Home > Supprimer > Supprimer les lignes de feuille pour supprimer ces lignes. Ensuite, il supprime toutes les autres lignes et vous devez cliquer sur Filtre à nouveau pour n'afficher que les lignes avec 1. Voir les captures d'écran:

4. Enfin, vous pouvez supprimer la colonne d'assistance C selon vos besoins.

Supprimer toutes les autres lignes dans Excel avec le code VBA

En fait, la macro VBA est également un bon choix pour résoudre ce problème.

1. Maintenez la touche autre + F11 clés dans Excel, et il ouvre le Microsoft Visual Basic pour applications fenêtre.

2. Cliquez sur insérer > Moduleet collez la macro suivante dans le Module Fenêtre.

Code VBA: supprimer toutes les deux lignes de la sélection:

Sub DeleteEveryOtherRow()
'Updateby Extendoffice
Dim rng As Range
Dim InputRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Application.ScreenUpdating = False
For i = InputRng.Rows.Count To 1 Step -2
    Set rng = InputRng.Cells(i, 1)
    rng.EntireRow.Delete
Next
Application.ScreenUpdating = True
End Sub

3. Appuyez sur la touche F5 clé pour exécuter cette macro. Ensuite, une boîte de dialogue apparaît pour sélectionner une plage. Voir la capture d'écran:

4. Puis clique OK, toutes les autres lignes de la plage sélectionnée à partir de la deuxième ligne sont supprimées à la fois, voir capture d'écran:

Supprimez une ligne ou une colonne sur deux dans Excel avec Kutools for Excel

Pour un utilisateur débutant de Microsoft Excel, utiliser la macro VBA est un peu compliqué. le Sélectionnez les lignes et colonnes d'intervalle utilité de Kutools for Excel peut vous aider à supprimer rapidement une ligne sur deux.

Après l'installation de Kutools for Excel, procédez comme suit:

1. Sélectionnez la plage que vous souhaitez supprimer toutes les autres lignes, puis appliquez cet utilitaire en cliquant sur le bouton Kutools > Choisir > Sélectionnez Intervalle de lignes et de colonnes….

2. Dans Sélectionnez les lignes et colonnes d'intervalle boîte de dialogue, spécifiez les paramètres comme illustré ci-dessous, puis cliquez sur OK pour sélectionner d'abord toutes les autres lignes.

3. Ensuite, toutes les autres lignes de la sélection sont sélectionnées et mises en évidence. Voir la capture d'écran:

4. Ensuite, vous pouvez supprimer rapidement les lignes sélectionnées toutes les autres en cliquant sur le bouton Home > Supprimer > Supprimer les lignes de feuille pour supprimer toutes ces lignes. Voir les captures d'écran:

Avec cette fonctionnalité, vous pouvez également supprimer toutes les nièmes lignes ou colonnes selon vos besoins.

Téléchargez et essayez gratuitement Kutools pour Excel maintenant !