VBA Nom d'objet : demande testeurs

Bonjour à tous,

J'ai créer un objet WordArt, et il est reconnu comme "Rectangle 1"

est-ce normal ?

Sur mon ancienne version Office 2000, c'était spécifié :

ActiveSheet.Shapes ("WordArt 1")

Pourriez-vous me signaler si la petite macro fonctionne bien

chez vous et sur quelle version ?

ou s'il faut changer le nom objet ?

Fichier test :

https://www.excel-pratique.com/~files/doc2/Essai_Objets.xls

Bonne journée

Claude.

Bonjour le Forum,

Claude, heu...pardon... Maître !!! (toutes mes félicitations...)

J'ai testé sur l'ordi du boulot avec Excel 2003 et cela fonctionne bien.

Visiblement, il reconnait l'appellation "rectangle 1"...

Si cela peut t'avancer dans tes investigations.

Bonne après-midi.

Fabrice,

Bonsoir, Claude

Sans utiliser de cellule intermédiaires......(A1)

essaie avec ce code :

Sub test()
Dim X As Byte, Y As Byte
X = IIf(Right(Application.Caller, 1) = 1, 1, 2)
Y = IIf(X = 1, 2, 1)
ActiveSheet.Shapes("Rectangle " & X).Visible = False
ActiveSheet.Shapes("Rectangle " & Y).Visible = True
End Sub

Bonsoir à tous,

merci à vous deux, je note,

mais cela n'explique pas pourquoi les deux objets s'appelle "Rectangle xx" et non "WordArt xx" pour l'un d'entre eux.

Je laisse le fil encore un peu

Bonne soirée

Claude.

Msieur Claude,

Aloreeeuuu :

- quand je clique sur le wordart, le rectangle 2 apparaît et vice-versa.

Il n'y a pas de bugs ..

Est-ce l'info que voulait savoir !

Excel version :

2007 (12.0.6214.1000) SP1 MSO (12.0.6213.1000)

A te lire

Adrien

Bonsoir forum,

Ben, pas vraiment,

à part que excel2007 ne fait pas de distingo entre une forme rectangle et un objet WordArt.

mais bon !

merci à tous,

Claude.