Message pour renomer la feuille existante

Bonjour,

J'ai créé un fichier qui permet de dupliquer soit une fiche vierge soit existante.

Je souhaiterai qu'un message apparaisse pour renommer la fiche lorsque celle-ci existe déjà dans le classeur (dans les 2 cas).

J'ai essayer plusieurs codes mais au bout d'un moment je m'embrouille et ça ne fonctionne pas.

Si besoin, il est possible de créer une liste pour répertorier les feuilles dans l'onglet "ref"

Merci d'avance

Bonjour,

cette fonction te permet de savoir si un nom de feuille est déjà utilisé :

Function existSheet(nomFeuille As String) As Long
    On Error Resume Next
    existSheet = Sheets(nomFeuille).Index
End Function

si la feuille existe tu obtiens sa position (1 à x), 0 si elle n'existe pas
eric

Merci Eric

J'avais essayé avec cette fonction mais je ne dois pas faire tout ce qu'il faut parce que ça plante.

Je vais essayer de retravailler le fichier et vous tiens au courant.

Bonne soirée

Il faut tester avant de renommer ta feuille.
Ainsi tu sais si tu peux ou s'il faut interroger l'utilisateur (ou abandonner l'opération).