Message suppression feuille

Bonjour dans mon application quand on va sur l'onglet intervention puis on clique sur APAVE cela nous fait tout un tas de traitement dont une suppression de feuille mais la il me demande de confirmer car elle contient des valeurs peut on forcer la confirmation?

Merci a vous

15gmao-vba-1.xlsm (184.00 Ko)

Bonjour

Ajoute

 Application.DisplayAlerts = False

non ca ne fonctionne pas je l'ai ajouté juste avant la suppression de la feuille

Sub copie_pour_mefa()

Sheets("List_Controle_APAVE").Delete

Application.DisplayAlerts = False

Sheets("Controle_APAVE").Select

Range("A3").Select

Range(Selection, Selection.End(xlDown)).Select

Range(Selection, Selection.End(xlToRight)).Select

Selection.Copy

Sheets.Add After:=Sheets(Sheets.Count)

Sheets(Sheets.Count).Select

ActiveSheet.Name = "List_Controle_APAVE"

ActiveSheet.Paste

Range("A1").Select

Selection.CurrentRegion.Select

ActiveWorkbook.Names.Add Name:="Liste_maj_apave", RefersToR1C1:= _

"=List_Controle_APAVE!R1C1:R22C7"

End Sub

b.vincent a écrit :

non ca ne fonctionne pas je l'ai ajouté juste avant la suppression de la feuille

    Sheets("List_Controle_APAVE").Delete
    Application.DisplayAlerts = False

ben non, justement tu l'as mis juste après !!

n'oublie pas de remettre sa valeur à True

a oui ca marche impeccablement merci a toi

Rechercher des sujets similaires à "message suppression feuille"