déplacer une centaine d'images

[eastwick]

Bonjour à toutes et tous,
J'ai 94 images sur mon tableur, imbriquées l'une dans l'autre comme un puzzle. J'aimerais les remonter toutes à la fois.
Y a t-il une manipulation qui me permettrait de le faire correctement, rapidement, sans les sélectionner une par une avec la touche CRTL et la souris ?
En vous remerciant...

 

[mécano41]

Re : déplacer une centaine d'images

Bonjour,

Si j'ai bien compris "remonter" et s'il s'agit seulement de déplacer les images, ce code devrait convenir.

Les images à déplacer doivent toutes commencer par le même nom si tu veux les distinguer d'autres formes de la feuille. Ici j'ai mis MonImage suivi d'un nombre pour les 8 images à replacer, les autres étant ignorées. Pour un nom différent, il suffit de changer le nombre de caractères en début de code dans : Const NbCarDebutNom = 8

Ensuite
- on met le nombre d'images voulu
- on les renomme
- on mémorise
- on fait glisser n'importe où
- on restitue. Elles reviennent à leur position initiale

Cordialement

 

[eastwick]

Re : déplacer une centaine d'images

merci beaucoup !