Vilain
XLDnaute Accro
Bonjour à tous,
Je vous soumet une petite question.
J'ai une macro qui me crée des onglets.
Cette macro est lancée régulièrement, je voudrais donc qu'avant toutes choses elle vérifie si les onglets sont dans le classeur et si oui, je voudrai les supprimer.
Comment faire ?
J'utilise pour le moment une macro qui compte les onglets et agit en fonction :
Sub EXEMPLE()
Dim NbreOnglets As Byte
NbreOnglets = Sheets.Count
If NbreOnglets > 2 Then
Application.DisplayAlerts = False
Sheets(Array("Base_pour_graph", "Graphique", "Calcul")).Select
ActiveWindow.SelectedSheets.Delete
Else
End If
End Sub
Merci pour votre aide par avance
Je vous soumet une petite question.
J'ai une macro qui me crée des onglets.
Cette macro est lancée régulièrement, je voudrais donc qu'avant toutes choses elle vérifie si les onglets sont dans le classeur et si oui, je voudrai les supprimer.
Comment faire ?
J'utilise pour le moment une macro qui compte les onglets et agit en fonction :
Sub EXEMPLE()
Dim NbreOnglets As Byte
NbreOnglets = Sheets.Count
If NbreOnglets > 2 Then
Application.DisplayAlerts = False
Sheets(Array("Base_pour_graph", "Graphique", "Calcul")).Select
ActiveWindow.SelectedSheets.Delete
Else
End If
End Sub
Merci pour votre aide par avance