Créer une feuille excel nommé en l'écrasant si elle existe déjà

cs_sophie11 Messages postés 2 Date d'inscription samedi 27 mars 2010 Statut Membre Dernière intervention 28 mars 2010 - 27 mars 2010 à 17:14
cs_sophie11 Messages postés 2 Date d'inscription samedi 27 mars 2010 Statut Membre Dernière intervention 28 mars 2010 - 28 mars 2010 à 18:28
Bonjour les amis

J'ai créer une macro qui me permet de creer une nouvelle feuille nommé "blabla".
dont le code est le suivant:
[b]Sub blabla()
ActiveWorkbook.Worksheets.Add
ActiveSheet.Name = "blabla"
End Sub /b

Mon probleme c'est que quand je veux réitéré l'opération ca m'indique une erreur ce qui est logique puisque ma feuille existe deja.. Je souhaite que quand je refais cette operation ca re-créer ma feuille blabla en écrasant la précédente?
Merci d'avance pour votre aide précieuse

ps: je précise que je veux ecraser et pas supprimer la feuille et recréer

1 réponse

cs_sophie11 Messages postés 2 Date d'inscription samedi 27 mars 2010 Statut Membre Dernière intervention 28 mars 2010
28 mars 2010 à 18:28
J'ai eu ma réponse...

Sub blabla()
On Error Resume Next
Set f = Sheets("blabla")
If Err.Number <> 0 Then Sheets.Add.Name = "blabla"
On Error GoTo 0
Sheets("blabla").Cells.Clear
End Sub



Merci quand même.. Bonne journée à tous
0
Rejoignez-nous