Bonjour,

Dans un fichier Excel, j'aimerais pouvoir supprimer plusieurs colonnes dont l'intitulé est recherché (Cfr ci-dessous).
Comment puis-je écrire cela autrement pour que l'instruction ne soit pas répétée à plusieurs reprises? (Variable= nom de la colonne)

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
wsSheet1.Cells.Find(What:="Village").EntireColumn.Delete
wsSheet1.Cells.Find(What:="Ville").EntireColumn.Delete
wsSheet1.Cells.Find(What:="Pays").EntireColumn.Delete
wsSheet1.Cells.Find(What:="Rue").EntireColumn.Delete
wsSheet1.Cells.Find(What:="Numéro").EntireColumn.Delete
D'avance, merci pour votre aide.