XL 2013 réécrire code obtenu via enregistreur macro

Dudesson

XLDnaute Junior
bonjour le forum,
qlq sait me réécrire proprement ce code svp?
je l'ai obtenu via enregistreur de macro, but = réduire automatiquement taille de police par rapport à la cellule.
ces codes sont trop long et englobent des choses inutiles dont les 'sachant' savent se passer pour obtenir le même résultat.

With plgX
.WrapText = False
.Orientation = 0
.AddIndent = False
.IndentLevel = 0
.ShrinkToFit = True
.ReadingOrder = xlContext
.MergeCells = False
End With

merci d'avance.
Pedro
 

D.D.

XLDnaute Impliqué
Bonjour

Au début, quand j'étais novice dans le VBA, j'enlevais la moitié du code et je testais. Si mon résultat disparaissait, c'était que la partie intéressante était dans la moitié que j'avais enlevé. Donc j'enlevais l'autre partie, je rajoutais celle intéressante et à nouveau division en 2.
Jusqu'à trouver uniquement la partie que je voulais.

Bien à toi.
 

Statistiques des forums

Discussions
311 725
Messages
2 081 940
Membres
101 845
dernier inscrit
annesof