Ce didacticiel vous montre comment supprimer efficacement toutes les autres lignes, ou toute première ligne, dans Microsoft Excel. Nous couvrirons deux méthodes: le filtrage et le code VBA.

Il existe de nombreux scénarios où le retrait des lignes spécifiques est nécessaire. Par exemple, vous devrez peut-être conserver les données des semaines uniformes tout en transférant des données de semaine impair à une feuille séparée. Le c?ur du processus consiste à sélectionner les lignes cibles, puis à les supprimer.

Méthodes:

• Suppression de toutes les autres lignes par filtrage
• Suppression de lignes alternatives avec VBA
• Suppression de toutes les lignes du Nième

Méthode 1: Suppression de toutes les autres lignes à l'aide du filtrage

Cette méthode utilise une colonne d'assistance et les capacités de filtrage d'Excel.

1. Colonne d'aide: ajoutez une nouvelle colonne à c?té de vos données. Entrée =MOD(ROW(),2) dans la première cellule de cette colonne et faites-la glisser vers le bas. Cette formule renvoie 0 pour même les lignes et 1 pour les lignes impaises.

   

2. Filtrage: appliquez un filtre à la colonne d'assistance (données> tri et filtre> filtre). Sélectionnez 0 (pour supprimer même les lignes) ou 1 (pour supprimer les lignes impaises).

   

3. Suppression: sélectionnez les lignes visibles (celles qui correspondent à vos critères de filtre), cliquez avec le bouton droit et choisissez "Supprimer la ligne".

   

4. Suppression du filtre: éteignez le filtre (cliquez à nouveau sur le bouton Filtre). Supprimez la colonne d'assistance.

   

   Votre feuille de travail ne contient désormais que les lignes que vous vouliez garder.

   

Astuce: pour déplacer les lignes au lieu de les supprimer, copiez les lignes filtrées avant de les supprimer et collez-les dans un nouvel emplacement.

Méthode 2: Suppression de lignes alternatives avec VBA

Cette macro VBA automatise le processus:

 Sub delete_alternate_rows_excel ()
  DIM SourCerrange comme portée
  Définir SourceRange = Application.Selection
  Set sourcerange = application.inputbox ("plage:", "Sélectionnez la plage", SourceRange.address, Type: = 8)
  Si sourcerange.rows.count> = 2 alors
    Dim Firstcell comme portée
    Dim RowIndex comme entier
    Application.screenupdating = false
    Pour rowIndex = sourcerange.Rows.Count - (sourcERORD.ROWS.COUNT MOD 2) à 1 étape -2
      Définissez FirstCell = SourCerange.Cells (RowIndex, 1)
      Firstcell.entirerow.delete
    Suivant
    Application.screenupdating = true
  Terminer si
Sub-Sub

1. Ouvrez l'éditeur VBA (ALT F11).

2. Insérez un module (insérer> module).

3. Collez le code dans le module.

4. Exécutez la macro (F5).

5. Sélectionnez la plage de données lorsque vous y êtes invité.

   

   La macro supprimera toutes les autres lignes de la plage sélectionnée.

   

Méthode 3: Suppression de chaque ligne nème

Cela se développe sur la méthode de filtrage. Utilisez cette formule dans la colonne d'assistance:

=MOD(ROW() - *m*, *n*)

Où:

• m est le numéro de ligne de la première ligne de données moins 1.
• n est la nième ligne à supprimer.

Par exemple, pour supprimer chaque 3ème ligne à partir de la ligne 2, utilisez =MOD(ROW()-1,3) . Filtrez ensuite pour 0 et supprimez les lignes visibles.

Cela vous permet de supprimer efficacement n'importe quelle ligne de la nième. N'oubliez pas de régler m en fonction de votre ligne de départ.

Ce qui précède est le contenu détaillé de. pour plus d'informations, suivez d'autres articles connexes sur le site Web de PHP en chinois!