OVH Cloud OVH Cloud

Ajuster à la taille

7 réponses
Avatar
Leonello
Bonsoir,

J'ai deux soucis distincts, que je n'arrive pas à résoudre:

Le premier :
Par une macro, j'ajoute à certaine cellule des commentaires de longueurs
variables, en hauteur et largeur.
Comment ajuster la grandeur du cadre commentaire au texte ?

Le second :
Par une macro, je remplis des cellules avec des textes de longueurs
variables, en hauteur et largeur
Comment ajuster la cellule au texte en largeur et hauteur ?


D'avance merci,


--

Amicalement,
leo

7 réponses

Avatar
lSteph
Bonsoir Leonello,

Avec Format, l'ajustement automatique ...non?
Sinon peux-tu préciser?

Cdlt.

lSteph

Bonsoir,

J'ai deux soucis distincts, que je n'arrive pas à résoudre:

Le premier :
Par une macro, j'ajoute à certaine cellule des commentaires de longueurs
variables, en hauteur et largeur.
Comment ajuster la grandeur du cadre commentaire au texte ?

Le second :
Par une macro, je remplis des cellules avec des textes de longueurs
variables, en hauteur et largeur
Comment ajuster la cellule au texte en largeur et hauteur ?


D'avance merci,


--
- -

Avatar
Leonello
Bonsoir,
Précision :
J'ai des cellules qui contiennent des commentaires.
Le texte de ces commentaires est de longueur très variable.
Comment faire pour que la fenêtre du commentaire soit parfaitement
ajustée à la taille du texte ?



Pour le second soucis, j'ai trouvé une solution.

--

Amicalement,
leo

"lSteph" a écrit dans le message de news:

Bonsoir Leonello,

Avec Format, l'ajustement automatique ...non?
Sinon peux-tu préciser?

Cdlt.

lSteph

Bonsoir,

J'ai deux soucis distincts, que je n'arrive pas à résoudre:

Le premier :
Par une macro, j'ajoute à certaine cellule des commentaires de
longueurs variables, en hauteur et largeur.
Comment ajuster la grandeur du cadre commentaire au texte ?

Le second :
Par une macro, je remplis des cellules avec des textes de longueurs
variables, en hauteur et largeur
Comment ajuster la cellule au texte en largeur et hauteur ?


D'avance merci,


--
- -





Avatar
lSteph
Re,
c'est très subjectif
voici par exemple selon un goût qui n'est pas forcément le mien.
Supposé commentaire en B2

Range("B2").Comment.Shape.Select

With Selection
.HorizontalAlignment = xlJustify
.VerticalAlignment = xlJustify
.ReadingOrder = xlContext
.Orientation = xlVertical
.AutoSize = True
End With



'Cdlt.

'lSteph


Leonello avait écrit le 09/12/2006 :
Bonsoir,
Précision :
J'ai des cellules qui contiennent des commentaires.
Le texte de ces commentaires est de longueur très variable.
Comment faire pour que la fenêtre du commentaire soit parfaitement
ajustée à la taille du texte ?



Pour le second soucis, j'ai trouvé une solution.

--

Amicalement,
leo

"lSteph" a écrit dans le message de news:

Bonsoir Leonello,

Avec Format, l'ajustement automatique ...non?
Sinon peux-tu préciser?

Cdlt.

lSteph

Bonsoir,

J'ai deux soucis distincts, que je n'arrive pas à résoudre:

Le premier :
Par une macro, j'ajoute à certaine cellule des commentaires de
longueurs variables, en hauteur et largeur.
Comment ajuster la grandeur du cadre commentaire au texte ?

Le second :
Par une macro, je remplis des cellules avec des textes de longueurs
variables, en hauteur et largeur
Comment ajuster la cellule au texte en largeur et hauteur ?


D'avance merci,


-- - -





--
- -



Avatar
Leonello
Bonsoir,

Ceci ressemble à ce que j'essayais, mais Excel me répond :
"La méthode "select" de l'objet "shape" a échoué.

Pourquoi ?


--

Amicalement,
leo

"lSteph" a écrit dans le message de news:

Re,
c'est très subjectif
voici par exemple selon un goût qui n'est pas forcément le mien.
Supposé commentaire en B2

Range("B2").Comment.Shape.Select

With Selection
.HorizontalAlignment = xlJustify
.VerticalAlignment = xlJustify
.ReadingOrder = xlContext
.Orientation = xlVertical
.AutoSize = True
End With



'Cdlt.

'lSteph


Leonello avait écrit le 09/12/2006 :
Bonsoir,
Précision :
J'ai des cellules qui contiennent des commentaires.
Le texte de ces commentaires est de longueur très variable.
Comment faire pour que la fenêtre du commentaire soit parfaitement
ajustée à la taille du texte ?



Pour le second soucis, j'ai trouvé une solution.

--

Amicalement,
leo

"lSteph" a écrit dans le message de news:

Bonsoir Leonello,

Avec Format, l'ajustement automatique ...non?
Sinon peux-tu préciser?

Cdlt.

lSteph

Bonsoir,

J'ai deux soucis distincts, que je n'arrive pas à résoudre:

Le premier :
Par une macro, j'ajoute à certaine cellule des commentaires de
longueurs variables, en hauteur et largeur.
Comment ajuster la grandeur du cadre commentaire au texte ?

Le second :
Par une macro, je remplis des cellules avec des textes de longueurs
variables, en hauteur et largeur
Comment ajuster la cellule au texte en largeur et hauteur ?


D'avance merci,


-- - -





--
- -







Avatar
AV
Pour l'ajustement du commentaire de A1 :

[A1].Comment.Shape.TextFrame.AutoSize = True

AV
Avatar
Garette
Bonjour,

Ci-dessous 2 exemples de code qui permettent l'ajustement des cellules et
des commentaires sur la cellule active :

Sub AjusteCommentaire()
ActiveCell.Comment.Shape.TextFrame.AutoSize = True
End Sub

Sub AjusteCellule()
ActiveCell.WrapText = True
End Sub
Avatar
Leonello
Bonjour,

C'est parfait.

Merci à tous.


--

Amicalement,
leo

"Garette" a écrit dans le message de news:

Bonjour,

Ci-dessous 2 exemples de code qui permettent l'ajustement des cellules et
des commentaires sur la cellule active :

Sub AjusteCommentaire()
ActiveCell.Comment.Shape.TextFrame.AutoSize = True
End Sub

Sub AjusteCellule()
ActiveCell.WrapText = True
End Sub