VB _ Zone de texte : Centrer le texte

[Jérémy_Concret]

Bonjour le forum!

Voilà mon problème:

Dans une macro je crée des zones de texte avec une valeur à l'intérieur. De base, cette valeur se place sur la gauche alors que je souhaiterais que celle-ci se place au centre de ma zone de texte.
Pas moyen de trouver le bout de code qui me permettrai ceci!
Voici comment se présente mon bout de code:

***
With Selection.Characters(Start:=1, Length:=6).Font
.Name = "Arial"
.FontStyle = "Normal"
.Size = 7
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = 1
End With
***

J'ai essayé le "horizontalalignment = xlcenter" et "verticalalignment = xlcenter" sans succès où alors je l'ai mal placé dans le code...


Merci par avance de vos réponses!

 

[Bebere]

Re : VB _ Zone de texte : Centrer le texte

bonjour Jeremy
si tu parles de textbox
Me.TextBox1.TextAlign = 2 'ou fmTextAlignCenter
voir propriétés del'objet
à bientôt

 

[JNP]

Re : VB _ Zone de texte : Centrer le texte

Bonjour Jérémy Concret et bienvenue ,
Tout simplement

Selection.HorizontalAlignment = xlCenter

et non

Selection.Characters(Start:=1, Length:=6).Font.HorizontalAlignment = xlCenter

qui travaille des caractères, pas la cellule .
Bon courage
Ajout : Salut Bebere

 

[ROGER2327]

Re : VB _ Zone de texte : Centrer le texte

Bonjour Jérémy_Concret

Essayez ceci :

[COLOR="DarkSlateGray"][B]   ActiveSheet.Shapes("[I][COLOR="SeaGreen"]Nom_de_la_boîte_de_texte[/COLOR][/I]").Select
   Selection.HorizontalAlignment = xlCenter[/B][/COLOR]

ROGER2327
#4076

Dimanche 1er Absolu 138 (Nativité d' Alfred Jarry, SPp)
22 Fructidor An CCXVIII
2010-W36-3T12:09:11Z

 

[Jérémy_Concret]

Re : VB _ Zone de texte : Centrer le texte

Merci à vous pour le temps consacré à mon égard! JNP et Roger2327 surtout ! mais merci aussi à toi bébère.

Nickel!

C'est repartie... @ bientôt