Discussion :

[Amanck]

Bonjour,

J'essaie d'améliorer une macro que j'ai faite sous Word pour redimensionner les images insérées dans un document Word.

En résumé, je fais une série de captures d'écrans que je colle dans un document Word. En fin de traitement, afin de diminuer le nombre de pages, je redimensionne mes images.

J'ai fait une macro (VBA - Word 2007) qui automatise ce traitement. J'ai commencé à l'améliorer en indiquant une taille "cible" pour les images à redimensionner (images dont le taille est inférieure, égale ou supérieure à la taille cible).

Je souhaite, via un clic sur un bouton, pouvoir sélectionner avec la souris une image du document pour en récupérer la taille et redimensionner toute les images de taille inférieure, égale ou supérieure.

Ma question est donc la suivante : est-il possible de sélectionner une image dans un document Word tel que décrit plus haut ? Si oui, quelqu'un aurait-il un tuyau pour m'aider à avancer dans mon code ?

J'espère que mon message est clair, dans le cas contraire, j'essaierais d'apporter les précisions nécessaires.

Merci d'avance pour vos réponses,

Cordialement

Amanck

[Heureux-oli]

Salut,

Ça paraît si simple.

Un objet sélectionné à la souris est représenté par Selection.
Un objet Selection peut contenir d'autres objets comme des paragraphes, des lettres, ...
Pour les images, il en existe deux types, les Shapes et les InlineShapes qui sont différentes.

Essaie ce code, il devrait te mettre sur la piste.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Sub AfficherImagesSelect()
Dim stMsg As String
 
stMsg = "La selection contient " & Selection.InlineShapes.Count & " images en lignes" & vbCrLf
stMsg = stMsg & " et " & Selection.ShapeRange.Count & " images flottantes "
 
MsgBox stMsg
End Sub

[Amanck]

Bonjour et merci pour ta réponse

Je viens de tester. Ton code me met en en effet sur la piste.

Maintenant, il me reste à gérer le fait de cliquer sur un bouton pour aller sélectionner mon image et retourner les dimensions de celle-ci.

Je n'ai pas trop le temps de tester ça pour le moment.

Je reviendrais donner ma conclusion.

Merci encore

Cordialement,

Amanck

[Amanck]

Bonjour,

voilà, j'ai fait mes tests et modifications de code :

En passant le formulaire en mode non modal, je peux, sans fermer le formulaire, sélectionner une image et en récupérer les dimensions.

Merci pour ton aide Heureux-Oli

Cordialement