Supprimer une feuille sans confirmation

Bonjour à tous.

J'ai une question simple mais qui me pose problème. Comment peut-on, dans une macro Excel, supprimer une feuille (worksheets.delete) sans afficher la boite de dialogue demandant la confirmation.

Merci d'avance

Tibaldus

Bonjour,

Mets cette macro en VBA :

1. avec une demande confirmation :

Sub Supprimer()
'Macro par Dan
'Supprime une feuille
Dim msg As String, title As String, style As String
Dim response As Integer
Application.ScreenUpdating = False
msg = "Voulez-vous supprimer cette feuille"
style = vbYesNo + vbCritical + vbDefaultButton2
title = "Séquence de Suppression"
response = MsgBox(msg, style, title)
If response = vbYes Then
Application.DisplayAlerts = False
ActiveSheet.Delete 'Choix de Oui.
End If
Application.ScreenUpdating = True
End Sub

2. Sans demande de confirmation

Sub Supprimer()
'Macro par Dan
'Supprime une feuille
With Application
.ScreenUpdating = False
.DisplayAlerts = False
End with
ActiveSheet.Delete
Application.ScreenUpdating = True
End Sub

A placer dans un module et à associer à un bouton ou un raccourci clavier

A te lire

Dan

Salut le forum

Ne pas oublier en fin de macro

Application.DisplayAlerts = True

Sinon plus de message d'alerte par la suite

Mytå

merci beaucoup à vous deux.