Bonsoir à tous,
avec la macro ci-dessous qui je crois vient de JB, je voudrais savoir s'il
est possible de n'ajuster en automatique que la largeur ou la hauteur du
shape.
For Each Wks In Worksheets
For Each Cmt In Wks.Comments
Cmt.Shape.OLEFormat.Object.AutoSize = True
With Cmt.Shape.OLEFormat.Object.Font
.Name = "Tahoma"
.Size = 10
.Bold = False
End With
Cmt.Shape.OLEFormat.Object.ShapeRange.Fill.ForeColor.SchemeColor =
42
Next Cmt
Next Wks
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Infogroup
Bonjour à tous,
pas de réponse à mon post du 19, ça veut-il dire que la réponse est négative ?
Infogroup
"Infogroup" a écrit dans le message de news:
Bonsoir à tous, avec la macro ci-dessous qui je crois vient de JB, je voudrais savoir s'il est possible de n'ajuster en automatique que la largeur ou la hauteur du shape.
For Each Wks In Worksheets For Each Cmt In Wks.Comments Cmt.Shape.OLEFormat.Object.AutoSize = True With Cmt.Shape.OLEFormat.Object.Font .Name = "Tahoma" .Size = 10 .Bold = False End With Cmt.Shape.OLEFormat.Object.ShapeRange.Fill.ForeColor.SchemeColor = 42 Next Cmt Next Wks
Merci par avance
Infogroup
Bonjour à tous,
pas de réponse à mon post du 19, ça veut-il dire que la réponse est négative
?
Infogroup
"Infogroup" <Infogroup70@orange.fr> a écrit dans le message de
news:uFEgsbfYJHA.5156@TK2MSFTNGP04.phx.gbl...
Bonsoir à tous,
avec la macro ci-dessous qui je crois vient de JB, je voudrais savoir s'il
est possible de n'ajuster en automatique que la largeur ou la hauteur du
shape.
For Each Wks In Worksheets
For Each Cmt In Wks.Comments
Cmt.Shape.OLEFormat.Object.AutoSize = True
With Cmt.Shape.OLEFormat.Object.Font
.Name = "Tahoma"
.Size = 10
.Bold = False
End With
Cmt.Shape.OLEFormat.Object.ShapeRange.Fill.ForeColor.SchemeColor =
42
Next Cmt
Next Wks
pas de réponse à mon post du 19, ça veut-il dire que la réponse est négative ?
Infogroup
"Infogroup" a écrit dans le message de news:
Bonsoir à tous, avec la macro ci-dessous qui je crois vient de JB, je voudrais savoir s'il est possible de n'ajuster en automatique que la largeur ou la hauteur du shape.
For Each Wks In Worksheets For Each Cmt In Wks.Comments Cmt.Shape.OLEFormat.Object.AutoSize = True With Cmt.Shape.OLEFormat.Object.Font .Name = "Tahoma" .Size = 10 .Bold = False End With Cmt.Shape.OLEFormat.Object.ShapeRange.Fill.ForeColor.SchemeColor = 42 Next Cmt Next Wks