Set nvlleFeuille = Worksheets.Add
nvlleFeuille.Name = "mafeuille"
Si une feuille portant déjà le nom "mafeuille" existe, VBA renvoie un
message d'erreur.
Idem si j'essaie de créer un autre objet portant un nom qui existe déjà.
Comment puis-je tester son existence avant ?
Merci
Roland Wynants
rol.w...@infonie.be
regarde cette macro pour apprendre le principe
Sub Test()
Dim nvlleFeuille As Worksheet
Dim nomUnique As String
On Error Resume Next
nomUnique = "mafeuille"
Set nvlleFeuille = Worksheets.Add
Do
If Worksheets(nomUnique) Is Nothing Then Exit Do
nomUnique = nomUnique & "."
Loop
nvlleFeuille.name = nomUnique
End Sub
Souvenir de Bavière, Tommy.
Roland Wynants schrieb in Nachricht <924551297.486825@eole>...