powerpoint

Version imprimable

Bonjour
je vous remercie d'avance , j'ai un code vba qui tourne super bien dans office 2003 quand je lui fait tournée en office 2010 rien ne marche j'ai changé les références qui manque , mais sa marche pas tjr

le programme consiste a lire un fichier PowerPoint et le remplir a partir un fichier excel je met un bout de code ou sa plante exactement et le message d'erreur .
Code:

1 2 3 4 ' Pres.Slides(1).Shapes("Group 165").Ungroup 'Add the project name, the date, the sale aera and the EM name on the slide Pres.Slides(1).Shapes("Rectangle 96").TextFrame.TextRange.Text = projectname
Item RECTANGLE 96 not Found in the shapes collection :cry:

merci d'avance

10/02/2012, 17h53
Invité

Bonjour

A priori il ne trouve pas la forme rectangulaire nommée "Rectangle 96".

Regardes dans ton fichier PowerPoint si la forme n'aurait pas changer de nom.

Philippe
17/02/2012, 10h16
anasscom

merci pour ta réponse j'ai une question banal comment je peux connaitre la place de Rectangle 96

merc

j'ai autre question pouvez me conseillé la meilleur méthode que je peux utiliser pour migrer tout mes utiles qui sont développé en 2003 à 2010 .

merci :ccool:

j'ai vérifié a l 'aide d'un code VBA tout les noms des objet qui sont pas renommer avant sa mtn m'affiche une erreur de type

Citation:

Runtime error - (-2147467529 (80004005))
this member can only be accessed for a group

sur cette ligne

Code:

Pres.Slides(1).Shapes.Range("Group 165").Ungroup
17/02/2012, 12h14
Didier Gonard

Bonjour,

Vois dans ce fil les # 8, 16 et 18 entre autres, les règles de nommage des Shapes on évoluées, ça pourrait venir de là ?

Citation:

Envoyé par Ormonth

bon cette soluce est valable en perso, si tu tombes sur un PPT où les shapes de commentaires ont été renommés où le sont en cours => boum
La preuve, si tu transposes le code dans un PPT 2007 ... d'où l'option mis en commentaire. Preuve puissance 2, si, au contraire, tu coupes colles tes dias 2003 dans un 2007 vierge ou non , les shapes commentaires gardent leur nom 2003 avec tout ce que ça entraîne...

Cordialement,

Ps : si le côté technique de la réponse = OK ou pas => pensez à cliquer sur les pouces et quand question résolue à la taguer résolue, et chaque action vous rapporte des points

Didier