Excel Macro Conditions Résolu/Fermé

Question

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

eriiic · Answer

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

evevdll · Answer

Bonsoir,
Merci Eric
Evelyne

Excel Macro Conditions

2 réponses

Discussions similaires