[XL-MAC 2004] Grouper des images

[patyom]

Bonjour,
J'ai besoin de grouper une dizaines d'images ("PictureNNN") dans une feuille en code VBA.
Je tourne en rond depuis un petit moment alors je viens demander à quelqu'un s'il a déjà fait.
J'ai récupéré le code suivant:

 
    ActiveSheet.Shapes.Range(Array("Picture 511", "Picture 512", "Picture 513")).Select
    Selection.ShapeRange.Group

mais il faut que je remplace ce qui se trouve dans "array(...)" par je ne sais pas quoi ?

A+

[Philippe JOCHMANS]

Bonjour

Peux-tu être un peu plus clair,car à priori tu as trouvé le code que tu veux, alors qu'est-ce qui bloque

Philippe

[patyom]

oui pardon,
Moi qui suis dessus je ne me rends pas compte.
Voilà, j'ai dans ma feuille des pictures déjà crées mais je ne connais pas leurs noms (j'ai mis ""Picture 511", "Picture 512",.. " comme exemple) donc j'ai créé le code qui suit pour les récupérer :

 
 
Dim MyArray(10) as string
 
' Sélection des Picture seules
' ************************************************************
        If img.Name Like "Picture*" Then
             i = i + 1
            MyArray(i) = img.Name
        End If

et c'est là que ça coince car il n'accepte pas ce code :

ActiveSheet.Shapes.Range(Array(MyArray(1) & "," & MyArray(2) & "," & MyArray(3) & "," & MyArray(4))).Select
Selection.ShapeRange.Group.Select

J'espère que c'est plus clair

A+

[Philippe JOCHMANS]

Ok

Je ne connais pas Excel pour Mac, mais il y a le moyen de voir le nom des objets, mais sur les versions 2002 de Excel, on peut avoir une icone dans la barre de dessin qui se nomme "Sélectionnez les objets", elle permet de voir les noms.

Cependant, on la trouve dans les menus personnalisés car elle n'est pas affichée tout de suite, il faut regarder dans la barre d'outils dessin du menu personnalisé et la glisser dans ta barre d'outil.

Philippe