Discussion :

[Eric93]

Bonjour,

J'ai un programme qui comporte deux procédure pour ouvrir et fermer un classeur :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
Sub creer_classeur(feuille)
Workbooks.Add
Worksheets.Add after:=Sheets(Sheets.Count)
Worksheets(Sheets.Count).Name = feuille
End Sub
 
Sub fermer_classeur(feuille)
Sheets(1).Delete
Sheets(2).Delete
Sheets(3).Delete
ActiveWorkbook.SaveAs Filename:=feuille
ActiveWindow.Close
End Sub

Avant de sauvegarder et de fermer le classeur, j'ai mis 3 delete pour supprimer les feuilles 1 à 3 existante à la création du classeur.

Mon problème est que le programme demande confirmation pour chaque suppression de feuille.

Y à t-il un moyen d'éviter cela ?

Merci d'avance

[Eric93]

J'ai résolu mon problème en mettant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Application.DisplayAlerts = False

Avant la suppression.

Merci