OVH Cloud OVH Cloud

supprimer des onglets

1 réponse
Avatar
lematou
Bonjour à la communauté,

voilà ce qui me ramène vers vous, je veux en début d'exécution d'une macro
supprimer 4 onglets (feuilles) dans un fichier.
pour ceci j'utilise:
Sheets(Array("Reint_Sauveg_las40378", "Reint_Clone_las40378", _
"Reint_Sauveg_las40367", "Reint_Clone_las40367")).Select
Sheets("Reint_Clone_las40367").Activate
ActiveWindow.SelectedSheets.Delete
Mon problème c'est qu'il me demande ce confirmer .
A votre avis est ce possible d'éviter ceci ?
merci pour votre aide et désolé pour le dérangement

jacks

1 réponse

Avatar
papou
Bonjour
Avant la suppression :
Application.DisplayAlerts = False
Après la suppression tu rétablis :
Application.DisplayAlerts = True

Cordialement
Pascal
"lematou" a écrit dans le message de
news:
Bonjour à la communauté,

voilà ce qui me ramène vers vous, je veux en début d'exécution d'une macro
supprimer 4 onglets (feuilles) dans un fichier.
pour ceci j'utilise:
Sheets(Array("Reint_Sauveg_las40378", "Reint_Clone_las40378", _
"Reint_Sauveg_las40367", "Reint_Clone_las40367")).Select
Sheets("Reint_Clone_las40367").Activate
ActiveWindow.SelectedSheets.Delete
Mon problème c'est qu'il me demande ce confirmer .
A votre avis est ce possible d'éviter ceci ?
merci pour votre aide et désolé pour le dérangement

jacks