[VBA] Supprimer plusieurs feuilles Excel

Feuille

Opacho -
headshoot444 Messages postés 1 Date d'inscription Statut Membre Dernière intervention - 2 mai 2016 à 11:18

Bonjour,

Dans le cadre d'un projet contenant du VBA, l'utilisateur est amené à creer différentes feuilles (dans le but d'une consultation). A la fermeture du classeur, je souhaiterai que toutes les feuilles ainsi créées soient automatiquement supprimées, le problème c'est que je ne peux pas connaître le nom de ces feuilles et je suis donc bloqué. J'ai commencé un bout de code mais je me retrouve vite dans l'impasse:

Sub Test()

Application.DisplayAlerts = False
nbfeuille = Worksheets.Count

For i = 4 To nbfeuille (je souhaite garder les 4 premières feuilles du classeur Excel)
w = ActiveSheet.Name

Next i

End Sub

Si vous avez quelques solutions à mon problème, ça ne serait pas de refus ^^

Merci d'avance.

A voir également:

Comment supprimer plusieurs feuilles excel en même temps
Supprimer rond bleu whatsapp - Guide
Excel trier plusieurs colonnes en même temps - Guide
Comment supprimer une page sur word - Guide
Liste déroulante excel - Guide
Formule moyenne excel plusieurs colonnes - Guide

2 réponses

Réponse 1 / 2

lermite222 Messages postés 8724 Date d'inscription Statut Contributeur Dernière intervention 1 191

Bonjour,
Valable seulement si les feuilles ajoutées le sont "Après" (After)

Sub SuppFeuille() 
Dim i As Integer 
    Application.DisplayAlerts = False 
    For i = 5 To Sheets.Count 
        Sheets(i).Delete 
    Next i 
    Application.DisplayAlerts = True 
End Sub

Sinon faut tester les noms des feuilles que tu connaît.
A+

L'expérience instruit plus sûrement que le conseil. (André Gide)
Si tu te cogne à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius)

headshoot444 Messages postés 1 Date d'inscription Statut Membre Dernière intervention

Sub Test()
Dim i As Integer
application.DisplayAlerts = False
For i = 5 To Sheets.Count
Sheets(5).Delete
Next i
End Sub

en remplaçant i par 5, ça marche mieux

Discussions similaires

Excel : protéger une partie de la feuille

si imprimante en panne, où imprimer?

Excel : Recherche sur plusieurs feuilles

envoi feuille excel

Excel - Récupérer données autre feuille

macro référence

Votre réponse

Discussions similaires