Macro VBA pour supprimer les feuilles ?
Résolu
jacksa3da
-
jacksa3da -
jacksa3da -
A voir également:
- Vba supprimer une feuille
- Supprimer rond bleu whatsapp - Guide
- Supprimer une page word - Guide
- Comment supprimer une application préinstallée sur android - Guide
- Supprimer pub youtube - Accueil - Streaming
- Bruler une feuille de laurier - Guide
1 réponse
bonjour,
comme ceci:
comme ceci:
Sub supprimer()
'Déclare la variable objet Worksheet
Dim Ws As Worksheet
Application.DisplayAlerts = False
'Boucle sur toutes les feuille de calcul du classeur. Les onglets graphiques ne sont pas pris
'en compte.
'ThisWorkbook correspond à l'objet classeur contenant la macro
For Each Ws In ThisWorkbook.Worksheets
If Ws.Name = "Sommaire" Or Ws.Name = "Modèle" Then 'adapter nom des feuilles à ne pas supprimer
Else
Ws.Delete
End If
Next Ws
Application.DisplayAlerts = True
End Sub
jacksa3da
Merci beaucoup! ça marche trés bien
