Taille du commentaire

Le
Tibert
Bonjour à tous ;
J’ai une macro pour copie de feuille, et je voudrais que mon commentaire en
(R1) puisse avoir une taille de « H 4,0 L 6,4 » à chaque copie, j’ai pensé à
une macro, que j’ajouterais à celle de copie de feuille, mais celle que j’ai
essayé de faire ne fonctionne pas, alors si qq à une solution.
Merci.
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
jps
Le #4759041
bonjour tibert
voici une proc d'un vieux de la vieille

Dim T As TextBox
Set T = ActiveCell.Comment.Shape.OLEFormat.Object
T.Text = "Hello, je suis la cellule " & ActiveCell.Address(0, 0) & "."
T.Width = 150
T.Height = 15
With T.Font
.Name = "Arial"
.Size = 10
.Bold = True
.Color = vbRed
End With

HTH
jps


"Tibert"
Bonjour à tous ;
J'ai une macro pour copie de feuille, et je voudrais que mon commentaire
en
(R1) puisse avoir une taille de « H 4,0 L 6,4 » à chaque copie, j'ai pensé
à
une macro, que j'ajouterais à celle de copie de feuille, mais celle que j'ai
essayé de faire ne fonctionne pas, alors si qq à une solution.
Merci.



garnote
Le #4759031
Bonsoir,

Une piste :
Voici un exemple pour fixer la taille du commentaire de la cellule R1.

Sub Dim_Commentaire()
With [r1].Comment.Shape
.Height = 50
.Width = 125
End With
End Sub

Serge

"Tibert"
Bonjour à tous ;
J'ai une macro pour copie de feuille, et je voudrais que mon commentaire en
(R1) puisse avoir une taille de « H 4,0 L 6,4 » à chaque copie, j'ai pensé à
une macro, que j'ajouterais à celle de copie de feuille, mais celle que j'ai
essayé de faire ne fonctionne pas, alors si qq à une solution.
Merci.



Tibert
Le #4758871
Merci à vous c'est Ok
@ +


Bonsoir,

Une piste :
Voici un exemple pour fixer la taille du commentaire de la cellule R1.

Sub Dim_Commentaire()
With [r1].Comment.Shape
.Height = 50
.Width = 125
End With
End Sub

Serge

"Tibert"
Bonjour à tous ;
J'ai une macro pour copie de feuille, et je voudrais que mon commentaire en
(R1) puisse avoir une taille de « H 4,0 L 6,4 » à chaque copie, j'ai pensé à
une macro, que j'ajouterais à celle de copie de feuille, mais celle que j'ai
essayé de faire ne fonctionne pas, alors si qq à une solution.
Merci.








Publicité
Poster une réponse
Anonyme