Comment supprimer des colonnes entières en fonction de la valeur d'en-tête dans Excel ?
Dans de nombreux cas, vous devrez peut-être supprimer des colonnes entières en fonction de la valeur d'en-tête dans Excel. Par exemple, vous devez supprimer toutes les colonnes contenant la valeur « ancien » dans l'en-tête. Dans ce tutoriel, nous vous montrerons des méthodes pour supprimer des colonnes entières en fonction de la valeur d'en-tête en détail.
Supprimer des colonnes entières en fonction de la valeur d'en-tête avec un code VBA
Supprimer des colonnes entières en fonction de la valeur d'en-tête avec Kutools pour Excel
Supprimer des colonnes entières en fonction de la valeur d'en-tête avec un code VBA
Vous pouvez supprimer des colonnes entières en fonction de la valeur d'en-tête avec un code VBA. Veuillez procéder comme suit.
1. Appuyez simultanément sur les touches Alt + F11 pour ouvrir la fenêtre Microsoft Visual Basic Application.
2. Dans la fenêtre Microsoft Visual Basic Application, cliquez sur Insertion > Module. Ensuite, copiez et collez le code ci-dessous dans la fenêtre Module.
Code VBA : Supprimer des colonnes entières en fonction de la valeur d'en-tête
Sub DeleteSpecifcColumn()
Set MR = Range("A1:D1")
For Each cell In MR
If cell.Value = "old" Then cell.EntireColumn.Delete
Next
End Sub
Remarques :
3. Appuyez sur la touche F5 pour exécuter le code, la colonne entière avec un en-tête égal au texte spécifié sera immédiatement supprimée.
Supprimer des colonnes entières en fonction de la valeur d'en-tête avec Kutools pour Excel
Avec l'utilitaire Sélectionner des cellules spécifiques de Kutools pour Excel, vous pouvez facilement sélectionner toutes les colonnes qui contiennent une certaine valeur d'en-tête en premier, puis supprimer ces colonnes sélectionnées en une seule fois. Veuillez procéder comme suit.
1. Sélectionnez la plage qui contient les colonnes que vous devez supprimer, puis cliquez sur Kutools > Sélectionner > Sélectionner des cellules spécifiques. Voir capture d'écran :
2. Dans la boîte de dialogue Sélectionner des cellules spécifiques, sélectionnez l'option Colonne entière dans la section Type de sélection, et dans la liste déroulante Type spécifique, sélectionnez l'option Égal à, puis tapez la valeur d'en-tête dans la case suivante. Enfin, cliquez sur le bouton OK. Voir capture d'écran :
3. Cliquez sur le bouton OK dans une autre boîte de dialogue qui apparaît, puis les colonnes contenant la valeur d'en-tête spécifiée sont immédiatement sélectionnées.
4. Faites un clic droit sur l'en-tête de la colonne sélectionnée, puis cliquez sur Supprimer dans le menu contextuel. Ensuite, toutes les colonnes sélectionnées sont supprimées en une seule fois.
Si vous souhaitez bénéficier d'un essai gratuit (30 jours) de cet utilitaire, veuillez cliquer pour le télécharger, puis aller appliquer l'opération selon les étapes ci-dessus.
Meilleurs outils de productivité pour Office
Améliorez vos compétences Excel avec Kutools pour Excel, et découvrez une efficacité incomparable. Kutools pour Excel propose plus de300 fonctionnalités avancées pour booster votre productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte l’interface par onglets à Office, simplifiant considérablement votre travail.
- Activez la modification et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de50 % et réduit des centaines de clics de souris chaque jour !
Tous les modules complémentaires Kutools. Une seule installation
La suite Kutools for Office regroupe les modules complémentaires pour Excel, Word, Outlook & PowerPoint ainsi qu’Office Tab Pro, idéal pour les équipes travaillant sur plusieurs applications Office.





- Suite tout-en-un — modules complémentaires Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Un installateur, une licence — installation en quelques minutes (compatible MSI)
- Une synergie optimale — productivité accélérée sur l’ensemble des applications Office
- Essai complet30 jours — sans inscription, ni carte bancaire
- Meilleure valeur — économisez par rapport à l’achat d’add-ins individuels