VBA : supprimer une feuille si elle existe

[Laurent691]

Bjr j'ai un autre problème,

Dans mon programme à un certains moment je créer une feuil4 avec sheets.add.

Quand je relance le programme il crée une feuil5, normal

j'ai essayé de supprimer la feuil4 (pour qu'il recrée une feuil4 et non une feuil5) au début du programme, ça bug car la Feuil4 n'existe pas encore, quand on le lance pour la première fois

Je cherche donc une astuce qui permette au début du programme de supprimer la feuil4 si elle existe.
🙄

 

[vbacrumble]

Re : VBA : supprimer une feuille si elle existe

Bonsoir


Une façon de faire pour tester la présence d'une feuille.

Sub macro1()
On Error Resume Next
Worksheets("Feuil4").Activate
MsgBox (IIf(Err <> 0, "Cette feuille n'existe pas.", "Cette feuille existe.")), vbInformation, "TEST PRESENCE FEUILLE"
On Error GoTo 0
End Sub

D'autres à consulter dans les archives du forum en utilisant le moteur de recherche du forum
Excel Downloads Forums - Recherche dans les forums

 

[Catrice]

Re : VBA : supprimer une feuille si elle existe

Bonsoir à tous,

Tu peux egalement essayer ceci :

Sub Test()
Application.DisplayAlerts = False
For Each X In Sheets
If X.Name = "Feuil4" Then X.Delete
Next
Application.DisplayAlerts = True
End Sub

 

[MuscatMimi]

Re : VBA : supprimer une feuille si elle existe

Bonsoir a tous

Milles excuses de squater ce fil, mais il ce trouve que , dans un de mes programmes, je cherche justement a pourvoir ,via un Usf pouvoir supprimer une feuille que j'aurais sélectionné dans une Cbx
et que cette Cbx soit alimentée, auto, si je créé de nouvelles feuilles
Merci de votre compréhension, et de vos réponse
je vous en remercie vivement

Christian

 

[Catrice]

Re : VBA : supprimer une feuille si elle existe

Bonsoir,

Un exemple ci-joint

 

[MuscatMimi]

Re : VBA : supprimer une feuille si elle existe

Bpnjour a tout le Forum

Merci Catrice, en fait il ne ma fallait que le Code Supprimer
le resqt je l'avais,mais j'ai omis de mettre mon fichier, exemple en piéce jointe
Si toutefois cela peut interresser une Personne , je met ce bout de Fichier,
Merci beaucoup a nouveau
Bonne journée