Centrer du texte dans un label - VBA - [Résolu]

Merci pour ton aide, le problème est résolu : @+

 ActiveSheet.OLEObjects.Add(ClassType:="Forms.Label.1", Link:=False, _
            DisplayAsIcon:=False, Left:=(x * (indiceligne - gauche) + 5 * (indiceligne - gauche)), Top:=x + haut, Width:=x, Height:= _
            15).Select
            With Selection
                .Object.Caption = CheminRéférence & " [" & CheminPrix & " " & " Frs]"
                .Object.TextAlign = fmTextAlignCenter
            End With

Bonjour,
Il y a peut-être plus simple avec...

    Label1.TextAlign = fmTextAlignCenter

A+

re salut,
donc en fait je vien de changer de "chemin", je vais créer mon label de cette manière :

ActiveSheet.OLEObjects.Add(ClassType:="Forms.Label.1", Link:=False, _
DisplayAsIcon:=False, Left:=(x * (indiceligne - gauche) + 5 * (indiceligne - gauche)), Top:=x + haut, Width:=145, Height:= _
15).Select

Now, il faut que ce label, recupère les données qui sont dans mes variables et j'aimerai centrer ces données dans le label si possible :
CheminRéférence = Cells(5 + indiceligne, 4) 'récupére la Référence
CheminPrix = Cells(5 + indiceligne, 6) 'récupére le Prix

Si tu as une idée, je suis preneur =) , thx pour votre aide

Le label que tu ajoute fait partie des composants 'Formulaire' et il n'y a pas de propriété.
Tu doit ajouter un label de MSForms qui a notamment la propriété signalée ci-dessus.
Pour ajouter un composant MSForms tu peu t'inspirer de cette astuce
A+