Ajustement de la hauteur de la cellule active

[Sofhy]

Bonjour à tous,

Je souhaiterai faire une macro qui permette d'ajuster automatiquement la hauteur de la cellule active.
Avec la ligne nommée, ça fonctionne.

Rows("28:28").EntireRow.AutoFit

Par contre, comment lui dire que si, par exemple, c'est la cellule T5 qui est sélectionnée à ce moment, alors, c'est la ligne 5 que l'on ajuste... etc...

J'ai essayer de "bidouiller" le code ...
~~ Active.Rows.EntireRow.AutoFit ~~
Sinon, j'ai pensé à une variable qui me donnerait le numéro de la ligne de la cellule, ...
mais n'y a t-il pas plus simple ?

Merci,
Sofhy

 

[Pierrot93]

Re : Ajustement de la hauteur de la cellule active

Bonjour Sofhy,

essaye peut être le code ci-dessous :

Rows(ActiveCell.Row).AutoFit

bon après midi
@+

 

[Sofhy]

Re : Ajustement de la hauteur de la cellule active

Merci beaucoup Pierrot93,

C'est parfait.
Bon après midi à toi aussi.