Macro pour photo sur word [Résolu]

Messages postés
1104
Date d'inscription
lundi 2 juillet 2018
Statut
Membre
Dernière intervention
14 octobre 2019
- - Dernière réponse : JCB40
Messages postés
1104
Date d'inscription
lundi 2 juillet 2018
Statut
Membre
Dernière intervention
14 octobre 2019
- 12 oct. 2019 à 16:02
Bonjour,
J'essaie de réduire la grandeur de mes photos sur word avec une macro.
Des photos téléchargées pas de problème,mes photos persos pas moyen de réduire.
Ou est le problème?
https://www.cjoint.com/c/IJmnhYS755h
Merci pour votre aide
Cordialement


Configuration: Windows / Firefox 69.0
Afficher la suite 

3 réponses

Meilleure réponse
Messages postés
15547
Date d'inscription
mardi 12 juin 2007
Statut
Contributeur
Dernière intervention
14 octobre 2019
8722
1
Merci
Bonjour,

Ton fichier a été décelé comme virussé dangereux et supprimé illico par mon antivirus...

Je n'ai donc pas eu le temps de regarder. A toutes fins utiles, c'est peut être une question d'image avec ou sans habillage. Regarde ici :
http://faqword.com/index.php/word/objets-graphiques/884-comment-appliquer-la-meme-taille-a-toutes-les-images-d-un-document

m@rina

Dire « Merci » 1

Heureux de vous avoir aidé ! Vous nous appréciez ? Donnez votre avis sur nous ! Evaluez CommentCaMarche

CCM 62878 internautes nous ont dit merci ce mois-ci

Commenter la réponse de m@rina
Messages postés
1104
Date d'inscription
lundi 2 juillet 2018
Statut
Membre
Dernière intervention
14 octobre 2019
134
0
Merci
Bonjour
Merci pour ta réponse et ton aide
Comprend pas le virussage,mais bon pas grave.
J'ai appliqué cette macro

Sub taille_images()
Dim image as InlineShape
For Each image In ActiveDocument.InlineShapes
image.Width = CentimetersToPoints(4)
Next
End Sub

Cela fonctionne bien
2 questions
dans word comment avoir un raccourci pour déclencher la macro
Comment procéder pour redimensionner plusieurs photos d'un coup (si c'est possible)
Crdlt
Commenter la réponse de JCB40
Messages postés
1104
Date d'inscription
lundi 2 juillet 2018
Statut
Membre
Dernière intervention
14 octobre 2019
134
0
Merci
Re bonjour

C'est bon j'ai résolu les 2 problèmes
Bonne continuation
Cordialement
Commenter la réponse de JCB40