INSERER DES IMAGES EN APPUYANT SUR UN BOUTON (en mieux expliqué...)

[Thomas]

je voudrais, lors un clic sur un COMMANDBUTTON, qu'une macro affiche des IMAGES ou/et des TEXTBOX aux dimensions voulu.

j'arrive a faire apparaitre les IMAGES et le TEXTBOX(voir code ci-dessous) mais les element sont aux dimensions et couleurs standart

il fodré insérer ds la macro ci-dessous des lignes de code indiquant le HEIGHT, WIDTH ...
et ca c'est mon probleme...

Private Sub CommandButtonValider_Click()

Selection.MoveLeft Unit:=wdCharacter, Count:=1
Selection.MoveLeft Unit:=wdCharacter, Count:=1
Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter
Selection.InsertBreak Type:=wdPageBreak
Selection.InlineShapes.AddOLEControl ClassType:="Forms.Image.1"
Selection.MoveRight Unit:=wdCharacter, Count:=1
Selection.TypeText Text:=" "
Selection.InlineShapes.AddOLEControl ClassType:="Forms.Image.1"
Selection.MoveRight Unit:=wdCharacter, Count:=1
Selection.TypeParagraph
Selection.TypeParagraph
Selection.InlineShapes.AddOLEControl ClassType:="Forms.Image.1"
Selection.MoveRight Unit:=wdCharacter, Count:=1
Selection.TypeParagraph
Selection.TypeParagraph
Selection.InlineShapes.AddOLEControl ClassType:="Forms.TextBox.1"
Selection.MoveRight Unit:=wdCharacter, Count:=1
Selection.TypeParagraph

End Sub

j'ai eu ce code en enregistrant une MACRO

Si quelqu'un connait la solution ... je suis tout ouie

 

[Didier]

Bonsoir Thomas et tout le monde
Essais ce petit truc si ça te convient
Bonne soirée
Didier