Commentaire Centrer et nom propre

G

Guest

Guest

• 6 Novembre 2011

• #2

Re : Commentaire Centrer et nom propre

bonjour,

Code:

Sub ttttt()
Dim cmt As Comment
Dim t As String
Set cmt = Sheets("Feuil1").Range("A1").Comment
t = Application.Proper(cmt.Text)
With cmt.Shape.TextFrame
    .HorizontalAlignment = xlHAlignCenter
    .Characters.Text = t
End With
End Sub

utiliser la fenêtre des variables locales et ou la fenêtre Espion pour examiner les propriétés des objets.

A+

 

Vote positif 0 Vote négatif

A

apdf1

XLDnaute Impliqué

• 6 Novembre 2011

• #3

Re : Commentaire Centrer et nom propre

Bonjour Hasco,

Je vous remercie en faite j'ai récuperé cette partie de votre code.

Code:

C.Shape.TextFrame.HorizontalAlignment = xlHAlignCenter

Y a t-il une ligne de code similaire a celle ci pour mettre en nom propre

Merci d'avance

@+

Max

 

Vote positif 0 Vote négatif

G

Guest

Guest

• 6 Novembre 2011

• #4

Re : Commentaire Centrer et nom propre

Re,

Non, mais j'ai donné une solution dans le post précédent.

A+

 

Vote positif 0 Vote négatif

A

apdf1

XLDnaute Impliqué

• 6 Novembre 2011

• #5

Re : Commentaire Centrer et nom propre

Re,

Oui mais je n'arrive pas a rentrer le code donc voici mon code au complet.

@+

Max

 

Dernière édition: 6 Novembre 2011

Vote positif 0 Vote négatif

G

Guest

Guest

• 6 Novembre 2011

• #6

Re : Commentaire Centrer et nom propre

Re,

Je ne vois pas de tentative d'adapter la solution donnée dans l'exemple.

Je passe mon chemin.

A+

 

Vote positif 0 Vote négatif