Excel Macro Conditions

Résolu
evevdll Messages postés 81 Date d'inscription   Statut Membre Dernière intervention   -  
evevdll Messages postés 81 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
J'ai un classeur qui contient une feuille nommée devis.
j'ai réussi à créer une macro qui copie la feuille devis et colle son double avant cette feuille devis et la nomme en récupérant la valeur qui se trouve dans la cellule C8 de la feuille devis (ex : ED09005).
Cependant, si le nom de la nouvelle feuille est déjà utilisé dans mon classeur, j'ai un bug. J'aimerai qu'une vérification se fasse automatiquement en boucle afin de savoir si ce nom existe déjà et si c'est le cas, qu'il ajoute 1 à ce nom (ex : ED09006) et ensuite que le reste de ma macro reprenne normalement.
J'espère m'être fait comprendre car je préfère ne pas devoir, si c'est possible, mettre mon classeur en ligne.
(je bidouille encore pas mal avec les macros)
Je vous remercie de bien vouloir m'aider.
Eve
A voir également:

2 réponses

eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   7 276
 
Bonsoir,

pas besoin de boucle, c'est plus simple de faire une gestion d'erreur et agir en conséquence.
ex:
    nomf = "feuil4"
    On Error Resume Next
    l = Len(Worksheets(nomf).Name) ' si la feuille existe tu as la longueur de son nom, sinon l est vide
    On Error GoTo 0
    If Not (l > 0) Then nomf = nomf & "-1"

eric
0
evevdll Messages postés 81 Date d'inscription   Statut Membre Dernière intervention   51
 
Bonsoir,
Merci Eric
Evelyne
0