Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Word > VBA Word
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 19/09/2011, 00h37   #1
Invité de passage
 
Inscription : août 2006
Messages : 3
Détails du profil
Informations forums :
Inscription : août 2006
Messages : 3
Points : 0
Points : 0
Par défaut Image : Habillage du texte

Bonsoir,

Je souhaite insérer une image dans un document Word et mettre l'habillage du texte sur la valeur : Aligné sur le texte.

L'insertion se déroule correctement mais je ne parviens pas à appliquer l'habillage de texte que je souhaite.

Je n'ai pas d'erreur mais cela ne produit aucun effet sur l'image.
Je convertis l'image InlineShapes en Shapes. Il y a d'autres objets shapes sur le document c'est pourquoi j'utilise l'index (3) pour shapes dans le code.

Mon code est le suivant:

Code :
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
'------------------------------------
'Insérer nouvelle image
'------------------------------------
'***
'Nom du répertoire + Nom image 
.InlineShapes.AddPicture FileName:=oFol & "\Image1.JPG" 
 
'***
'Modification hauteur et largeur de l'image
With .InlineShapes(1)
        .Height = 53.85
        .Width = 547.1
        .ConvertToShape
End With
 
'***
'Modification de l'habillage 
.Shapes(3).WrapFormat.Type = wdWrapInline
Merci d'avance pour votre aide,

Bonne soirée
scintrat est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 02h24.


 
 
 
 
Partenaires

Hébergement Web