Discussion :

[bruxmu]

Bonjour le Forum,

Je souhaite créer une macro pour changer le type d'habillage de l'image sélectionnée avant le lancement de la macro.

Problème : une fois l'enregistreur de macro lancé, les outils de la fenêtre Format de l'image > onglet Habillage ne sont pas opérationnels...
Comment faire ? (je souhaite sélectionner l'habillage "devant le texte")

Merci !

[bruxmu]

Bon, il m'aura fallu chercher dans les recoins du web pour trouver qqch qui a l'air simple une fois que ça fonctionne !

Alors, voilà 2 macros pour le prix d'une :

Pour permettre de changer l'habillage d'une image pour laquelle les boutons d'habillage restent désespérément grisés (et les poignées autour de l'image sont des carrés noirs au lieu d'être des ronds vides).

Code :

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

1
2
3
4
5
6
Sub Format_Image_Habillage_autorisé()
 
ActiveDocument.InlineShapes(1).Select
Selection.InlineShapes(1).ConvertToShape
 
End Sub

Et pour appliquer directement un type d'habillage prédéfini

Code :

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

1
2
3
4
5
6
Sub Format_Image_Habillage_rapproché()
 
Selection.ShapeRange.WrapFormat.Type = 1 
'cette valeur permet de choisir le type d'habillage : 1= rapproché — 2= au travers — 3= devant le texte — 4= haut et bas — 5= derrière le texte — 6= devant le texte
 
End Sub

Voilà, c'est tout.
Et j'espère que ça pourra servir à d'autres.