Insertion d'objets (WordArt)

Résolu
mijean94 -  
Bonjour,

A chaque création d’un WordArt, il prend un numéro qui s'incrémente .
Donc si je fais plusieurs essais de création, mais toujours un seul Word Art à l’écran. Je ne connais pas le numéro de celui-ci.

Peut-on trouver le numéro du WordArt actif sur une feuille Excel ou imposer que le numéro soit toujours 1 à la création ?

L’objectif est de remplacer le numéro 9 dans l’exemple ci-dessous par celui du WordArt actif ou si possible qu’il soit toujours à 1. 

ActiveSheet.Shapes("WordArt 9")


Merci pour votre aide

Bien cordialement

3 réponses

  1.  eriiic Contributeur
    Bonjour,

    tu le sélectionnes et tu le renommes dans la zone où apparait la référence en cours (à gauche de l'édition des formules).
    Valider par Entrée.
    eric
    0
    1. mijean94 Auteur
      Re,

      Ok, mais comment faire cette action en VBA dans mon code ?

      Cordialement
      0
      1. mijean94 Auteur
        Re, eric

        Ok merci, j'ai trouver la solution avec ton aide. 

        Selection.Name = "WordArt 1"
        ActiveSheet.Shapes("WordArt 1").Select


        Cordialement
        0