Software » Manipulation d'image dans une macro Word par VBA
Manipulation d'image dans une macro Word par VBA
Publié le 02/01/2007 @ 11:47:27,
Par ClandestinoBonjour tout le monde,
Dans le cadre d'un petit projet que je réalise pour ma tendre épouse, j'ai besoin de pouvoir manipuler une image dans Word 2003 via une macro. "Manipuler" signifie ici charger l'image dans un document, modifier sa taille, son agencement, et sa position sur la page.
Jusqu'ici, j'ai trouvé sans trop de problème comment charger l'image. Mais dès lors qu'il s'agit de toucher aux propriétés de cette image, je sèche. J'ai passé pas mal de temps sur Google et sur le site de référence de VBA (le langage intégré à Word), mais sans succès. C'est donc ici que j'aurais besoin d'un petit coup de main.
Pour être tout à fait précis, une fois l'image chargée dans le document, j'ai besoin de la rétrécir à 4 x 4 cm, et la positionner exactement à 1 cm de la gauche et 19 cm du haut de la page. C'est précisément pour effectuer cette manipulation que je cale.
Un tout grand merci d'avance pour tout coup de pouce, et encore à tous une excellente année 2007.
Dernière édition: 02/01/2007 @ 11:55:55
Dans le cadre d'un petit projet que je réalise pour ma tendre épouse, j'ai besoin de pouvoir manipuler une image dans Word 2003 via une macro. "Manipuler" signifie ici charger l'image dans un document, modifier sa taille, son agencement, et sa position sur la page.
Jusqu'ici, j'ai trouvé sans trop de problème comment charger l'image. Mais dès lors qu'il s'agit de toucher aux propriétés de cette image, je sèche. J'ai passé pas mal de temps sur Google et sur le site de référence de VBA (le langage intégré à Word), mais sans succès. C'est donc ici que j'aurais besoin d'un petit coup de main.
Pour être tout à fait précis, une fois l'image chargée dans le document, j'ai besoin de la rétrécir à 4 x 4 cm, et la positionner exactement à 1 cm de la gauche et 19 cm du haut de la page. C'est précisément pour effectuer cette manipulation que je cale.
Un tout grand merci d'avance pour tout coup de pouce, et encore à tous une excellente année 2007.
Dernière édition: 02/01/2007 @ 11:55:55
Manipulation d'image dans une macro Word par VBA
Publié le 02/01/2007 @ 13:47:23,
Par ClandestinoY'a vraiment personne qui sait ou tout le monde s'en fout ?
Manipulation d'image dans une macro Word par VBA
Publié le 02/01/2007 @ 13:53:20,
Par zionPerso je sais pas
JC saura peut être
JC saura peut être
Je suis le Roy
Manipulation d'image dans une macro Word par VBA
Publié le 02/01/2007 @ 13:56:58,
Par ovhY'a vraiment personne qui sait ou tout le monde s'en fout ?
T'énerve pas, ça ne fait que 2h que tu as posté ta question...
Moi perso j'ai quasi jamais touché au VBA, et jamais en tout cas pour les images, franchement je sais pas t'aider là comme ça
Je n'ai rien à voir avec www.ovh.com
Manipulation d'image dans une macro Word par VBA
Publié le 02/01/2007 @ 14:51:17,
Par tuloravouluY'a vraiment personne qui sait ou tout le monde s'en fout ?
Je ne réponds jamais quand je ne sais pas parce que je pourrais faire des copiés-collés de " kesketuveukjtedisemoi" ou à la rigueur dire des conneries mais là , certaines personnes pourraient y croire. Non , je ne donnerais pas de noms !
.
.
.
.
.
.
.
N'insiste pas !!!
"L'amour pour épée, l'humour pour bouclier." Bernard Werber
Manipulation d'image dans une macro Word par VBA
Publié le 02/01/2007 @ 15:15:47,
Par etikTrouve ca sur google, peut-etre te donner une piste ???
Dernière édition: 02/01/2007 @ 15:40:16
- Sub Insert_Pic()
- ' declare an InlineShape object variable
- Dim MyShape As Shape
- ' store the pointer to the new shape
- Set MyShape = ActiveDocument.Shapes.AddPicture(FileName:="C:\MySignature.bmp", LinkToFile:=False, SaveWithDocument:=True, Anchor:=Selection.Range)
- ' set properties of the Shape object
- With MyShape
- .Width = 160
- .Height = 49
- .ZOrder msoSendBehindText
- .WrapFormat.Type = wdWrapNone
- .RelativeHorizontalPosition = wdRelativeHorizontalPositionCharacter
- .RelativeVerticalPosition = wdRelativeVerticalPositionParagraph
- .Left = 0
- .Top = InchesToPoints(0.02)
- End With
- End Sub
Dernière édition: 02/01/2007 @ 15:40:16
Manipulation d'image dans une macro Word par VBA
Publié le 02/01/2007 @ 15:38:09,
Par ClandestinoMAGNIFIQUE !!!!! Un tout grand merci, etik.
Pourrais-je juste te demander si tu te souviens du site où tu l'as trouvé ?
Pourrais-je juste te demander si tu te souviens du site où tu l'as trouvé ?