Bonjour à tous,
voici encore une petite question que je me pose :
je souhaiterais pouvoir effacer toutes les feuilles dont le nom contient "Produit"
Voici ce que j'ai écrit, et qui, vous vous en serez douté ne fonctionne pas...
Ne serait-ce pas qu'un problème d'utilisation du signe * ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 For Each Feuille In ActiveWorkbook.Worksheets If Feuille.Name = "Produit*" Then Application.DisplayAlerts = False Feuille.Delete Application.DisplayAlerts = True Exit For End If Next Feuille
PS : je remercie l'auteur de ce bout de macro que j'ai tenté de mettre à ma sauce (il me semble que c'est Pierre Fauconnier. Pierre Fauconnier, si c'est toi, je te remercie)
Partager