macro recopie feuille onglet

Bonjour ,

Je souhaiterais ameliorer la macro suivante.
Sub Macro2()
Sheets("DEVIS").Select
Sheets("DEVIS").Copy Before:=Sheets(5)
Sheets("DEVIS (2)").Select
Sheets("DEVIS (2)").Name = "SansDetail"
Range("A1").Select
End Sub

Je voudrais ajouter que si "SansDetail" existe, il crée "SansDetail 2"et ainsi de suite.

Merci de votre collaboration

Luger