Merci =E0 tous de vos r=E9ponses toujours aussi rapides !
J'aimerais maintenant faire une macro de r=E9initialisation de mon
application. Cela supprimerait certaines feuilles si celles-ci existent
bien. Je ne sais pas quoi mettre en condition de mon "if". Pouvez-vous
m'aider ?
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
FdeCourt
Salut,
Une solution :
Sub suppression_feuille() For Each sh In Sheets Select Case sh.Name Case "a", "b", "c", "d" Application.DisplayAlerts = False sh.Delete Application.DisplayAlerts = True End Select Next End Sub
Bonjour,
Merci à tous de vos réponses toujours aussi rapides !
J'aimerais maintenant faire une macro de réinitialisation de mon application. Cela supprimerait certaines feuilles si celles-ci existent bien. Je ne sais pas quoi mettre en condition de mon "if". Pouvez-vous m'aider ?
Merci !
Ashley
Salut,
Une solution :
Sub suppression_feuille()
For Each sh In Sheets
Select Case sh.Name
Case "a", "b", "c", "d"
Application.DisplayAlerts = False
sh.Delete
Application.DisplayAlerts = True
End Select
Next
End Sub
Bonjour,
Merci à tous de vos réponses toujours aussi rapides !
J'aimerais maintenant faire une macro de réinitialisation de mon
application. Cela supprimerait certaines feuilles si celles-ci existent
bien. Je ne sais pas quoi mettre en condition de mon "if". Pouvez-vous
m'aider ?
Sub suppression_feuille() For Each sh In Sheets Select Case sh.Name Case "a", "b", "c", "d" Application.DisplayAlerts = False sh.Delete Application.DisplayAlerts = True End Select Next End Sub
Bonjour,
Merci à tous de vos réponses toujours aussi rapides !
J'aimerais maintenant faire une macro de réinitialisation de mon application. Cela supprimerait certaines feuilles si celles-ci existent bien. Je ne sais pas quoi mettre en condition de mon "if". Pouvez-vous m'aider ?