Code VBA suppression de feuilles [Résolu/Fermé]

Signaler
Messages postés
4
Date d'inscription
vendredi 11 juillet 2008
Statut
Membre
Dernière intervention
28 juillet 2008
-
 sailey -
Bonjour à tous,

Je code en ce moment sous VBA un petit programme pour générer des fiches de
personnes automatiquement, sur des onglets différents. Tout marche bien sauf
qu'il me faut aussi coder l'inverse: c'est à dire une commande
"réinitialiser" qui supprime les fiches précédemment créées.

Pour ce faire j'utilise une boucle loop qui compte les feuilles et supprime
les feuilles, sauf les 10 premières (mes bases de données, la maquette
initiale de fiche...) du type:

i = Sheets.Count
Do While i > 10
Sheets(i).Select
ActiveSheet.Delete
i = Sheets.Count
Loop

Le problème c'est qu'à chaque suppression, Excel demande une confirmation:
il faut alors cliquez sur le bouton "supprimer"! Sachant que j'ai plusieurs
dizaines de feuilles à supprimer à chaque fois...
Est-il possible d'ignorer cette confirmation, et de faire en sorte que la
boucle tourne sans intervention de l'utilisateur?

D'avance merci pour votre aide, qui m'a déjà été très utile!
Bonne journée,
BastienP

4 réponses

Merci beaucoup pour ce post, il m'a bien servi !
Sur 2003 : Application.DisplayAlerts = False
Rajouter le s
8
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 60769 internautes nous ont dit merci ce mois-ci

Messages postés
8700
Date d'inscription
dimanche 8 avril 2007
Statut
Contributeur
Dernière intervention
22 janvier 2020
1 105
Bonjour,
Application.DisplayAlert = False

et pas oublier de remettre à true à la fin de la macro.
A+
Messages postés
4
Date d'inscription
vendredi 11 juillet 2008
Statut
Membre
Dernière intervention
28 juillet 2008
1
Merci!!
Ceci marche parfaitement.

Bonne soirée.
Merci !
ça m'a vraiment dépané