Code pour acceptation automatique de supression d'une feuille

JFG -  
eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,



Bonjour,

Est-ce possible de trouver comment faire accepter automatiquement, (Sans confirmation de l'utilisateur) la supression d'une feuille de calcul dans un classeur Excel.

Voici ma commande:

Range("A1").Select

Sheets("VGALL").Select
ActiveWindow.SelectedSheets.Delete

Sheets("Feuil1").Select
Sheets("Feuil1").Name = "VGALL"

C'est seulement :

ActiveWindow.SelectedSheets.Delete

qui pose problème.

Merci de votre aide,

JF

1 réponse

  1.
    eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
     
    Bonjour,

    Application.DisplayAlerts = False
    remettre à true après

    eric
    0