XL 2013 Résolue par DoubleZéro et M12 : Code pour contourner la confirmation de suppression feuilles

arthour973

XLDnaute Barbatruc
Supporter XLD
Bonjour à toutes et à tous,

Devant une nouvelle énigme pour moi, me voici encore à vous demander votre aide.
Mes recherches ne m'ont pas permis de trouver la solution.

Voici mon petit souci
J'ai une macro qui supprime mes onglets :
Code:
Sub Onglets()
    Call DebloqueFeuilles
    Sheets.Add After:=Sheets(Sheets.Count)
    Sheets("Citations").Visible = True
    Sheets("Clients fini").Visible = True
    Sheets("Gestion").Visible = True
    Sheets("Stst Retours RdV").Visible = True
    Sheets("Confirmations").Visible = True
    Sheets("TextesConfirm").Visible = True
    Sheets("TextesArgus").Visible = True
    Sheets("Infos").Visible = True
    Sheets("ClientsCoordonnées").Visible = True

    Sheets("Agenda client").Delete
    Sheets("Annonces Clients").Delete
    Sheets("RendezVous").Delete
    Sheets("SuivisAppels").Delete
    Sheets("A Faire").Delete
    Sheets("TextesArgus").Delete
    Sheets("Arguments location").Delete
    Sheets(" Arguments Vente").Delete
    Sheets("NPA RdV").Delete
    Sheets("NPA").Delete
    Sheets("TextesConfirm").Delete
    Sheets("Confirmations").Delete
    Sheets("Gestion").Delete
    Sheets("Clients fini").Delete
    Sheets("ClientsCoordonnées").Delete
    Sheets("Infos").Delete
    Sheets("Citations").Delete
    ActiveWorkbook.Save
End Sub
Mais excel me demande une confirmation à chaque suppression
Supprimer.jpg
Est-il possible de coder pour qu'excel exécute ma macro sans me le demander ?

Encore une fois un grand merci pour votre aide.
Amicalement,
Lionel,
 

M12

XLDnaute Impliqué
Bonjour

en mettant

Code:
Application.DisplayAlerts = False
'audebut

code

'a la fin
Application.DisplayAlerts = True
 

DoubleZero

XLDnaute Barbatruc
Bonjour, arthour973 :), le Forum,

Il suffit d'insérer :
Code:
Application.DisplayAlerts = False
' onglets x, y, z... supprimer
Application.DisplayAlerts = True
A bientôt :)

P. S. : Bonjour, M12
 

Créez un compte ou connectez vous pour répondre

Vous devez être membre afin de pouvoir répondre ici

Créer un compte

Créez un compte Excel Downloads. C'est simple!

Connexion

Vous avez déjà un compte? Connectez vous ici.

Haut Bas