Macro pas compatible PwP 2003

Fermé
Guy_L Messages postés 160 Date d'inscription samedi 16 septembre 2006 Statut Membre Dernière intervention 28 mars 2022 - Modifié par Guy_L le 12/01/2014 à 09:00
Bonjour,
Lorsque j'importe un PwP avec ses macros de Powerpoint 2003 vers 2010 ou inversement, les formes (en l'occurence octogones) changent de nom, et, du coup, les macros gardant elles l'ancien nom, ne fonctionnent plus.
De plus, curieusement, les formes vides animées ont toutes le même nom.

Voici ma macro:

Sub Macro1()
Set MyDocument = ActivePresentation.Slides(5)
MyDocument.Shapes("Octogone 17").TextFrame.TextRange.Font.Color = RGB(0, 0, 0)
MyDocument.Shapes("Octogone 18").TextFrame.TextRange.Font.Color = RGB(0, 0, 0)
End Sub
Merci pour votre aide
A voir également: