Supprimer une feuille active sauf si....
Vaffancolor
Messages postés
3
Date d'inscription
Statut
Membre
Dernière intervention
-
Pinzou76 Messages postés 614 Date d'inscription Statut Membre Dernière intervention -
Pinzou76 Messages postés 614 Date d'inscription Statut Membre Dernière intervention -
Bonjour à tous,
je suis à la recherche d'une macro qui me permette de supprimer la feuille active, sauf si elle s'appelle "L.1".
Si on active la macro dans la feuille "L.1", j'aimerai avoir un message box qui dit "Impossible de supprimer L.1".
Voila, je précise que je suis novice sur VBA.
Merci
je suis à la recherche d'une macro qui me permette de supprimer la feuille active, sauf si elle s'appelle "L.1".
Si on active la macro dans la feuille "L.1", j'aimerai avoir un message box qui dit "Impossible de supprimer L.1".
Voila, je précise que je suis novice sur VBA.
Merci
A voir également:
- Supprimer une feuille active sauf si....
- Supprimer rond bleu whatsapp - Guide
- Supprimer une page word - Guide
- Comment supprimer une application préinstallée sur android - Guide
- Supprimer pub youtube - Accueil - Streaming
- Bruler une feuille de laurier - Guide
1 réponse
Bonjour à toi,
If ActiveSheet.Name <> "L.1" Then
'enlève message de confirmation
Application.DisplayAlerts = False
'supprime la feuille
Sheets(ActiveSheet.Name).Delete
Else
MsgBox "impossible de supprimer L.1"
End If
Voilà, tout est dit :D
If ActiveSheet.Name <> "L.1" Then
'enlève message de confirmation
Application.DisplayAlerts = False
'supprime la feuille
Sheets(ActiveSheet.Name).Delete
Else
MsgBox "impossible de supprimer L.1"
End If
Voilà, tout est dit :D
Pinzou76
Messages postés
614
Date d'inscription
Statut
Membre
Dernière intervention
192
Je rajouterais, juste avant le End If:
altashy
Messages postés
36
Date d'inscription
Statut
Membre
Dernière intervention
2
oui je l'ai mis
Pinzou76
Messages postés
614
Date d'inscription
Statut
Membre
Dernière intervention
192
Mouais, ça n'était pas présent quand j'ai écrit mon commentaire...