Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Image dans commentaire

4 réponses
Avatar
nesramfr
Bonjour
Travaillant avec la version 2003 d'Excel je souhaiterais insérer une image
dans un commentaire. La chose est-elle possible et si oui comment?
Merci d'avance.
Jean

4 réponses

Avatar
JB
Bonjour,

http://boisgontierjacques.free.fr/pages_site/commentaire.htm#Image

Sub ImageFondCommentaire()
ChDir ActiveWorkbook.Path
For Each c In ActiveSheet.Comments
c.Shape.Fill.UserPicture "fond_nico.jpg"
c.Shape.Height = 100
c.Shape.Width = 100
c.Shape.ScaleHeight 1.2, msoFalse, msoScaleFromTopLeft
c.Shape.ScaleWidth 1, msoFalse, msoScaleFromTopLeft
Next c
End Sub

http://boisgontierjacques.free.fr/pages_site/commentaire.htm#PhotosComment

Sub Trombine()
ChDir ActiveWorkbook.Path
Range("A2").Select
Do While ActiveCell <> ""
ActiveCell.ClearComments
ActiveCell.AddComment
ActiveCell.Comment.Text Text:¬tiveCell.Value
ActiveCell.Comment.Shape.Fill.UserPicture ActiveCell.Value &
".jpg"
ActiveCell.Comment.Shape.Height = 50
ActiveCell.Comment.Shape.Width = 50
ActiveCell.Comment.Shape.ScaleHeight 1.2, msoFalse,
msoScaleFromTopLeft
ActiveCell.Comment.Shape.ScaleWidth 1, msoFalse,
msoScaleFromTopLeft
ActiveCell.Offset(1, 0).Select
Loop
End Sub

http://boisgontierjacques.free.fr/fichiers/jb-shapes.zip

JB

On 7 mar, 09:54, "nesramfr" wrote:
Bonjour
Travaillant avec la version 2003 d'Excel je souhaiterais insérer une ima ge
dans un commentaire. La chose est-elle possible et si oui comment?
Merci d'avance.
Jean


Avatar
JB
Manuellment:

-Clic droit bordure du commentaire*
-Format
-Couleurs et traits
-Couleurs
-Motifs et textures
-Image

JB
On 7 mar, 10:05, JB wrote:
Bonjour,

http://boisgontierjacques.free.fr/pages_site/commentaire.htm#Image

Sub ImageFondCommentaire()
  ChDir ActiveWorkbook.Path
  For Each c In ActiveSheet.Comments
    c.Shape.Fill.UserPicture "fond_nico.jpg"
    c.Shape.Height = 100
    c.Shape.Width = 100
    c.Shape.ScaleHeight 1.2, msoFalse, msoScaleFromTopLeft
    c.Shape.ScaleWidth 1, msoFalse, msoScaleFromTopLeft
  Next c
End Sub

http://boisgontierjacques.free.fr/pages_site/commentaire.htm#PhotosCo...

Sub Trombine()
    ChDir ActiveWorkbook.Path
    Range("A2").Select
    Do While ActiveCell <> ""
       ActiveCell.ClearComments
       ActiveCell.AddComment
       ActiveCell.Comment.Text Text:¬tiveCell.Value
       ActiveCell.Comment.Shape.Fill.UserPicture ActiveCell.Value &
".jpg"
       ActiveCell.Comment.Shape.Height = 50
       ActiveCell.Comment.Shape.Width = 50
       ActiveCell.Comment.Shape.ScaleHeight 1.2, msoFalse,
msoScaleFromTopLeft
       ActiveCell.Comment.Shape.ScaleWidth 1, msoFalse,
msoScaleFromTopLeft
       ActiveCell.Offset(1, 0).Select
    Loop
End Sub

http://boisgontierjacques.free.fr/fichiers/jb-shapes.zip

JB

On 7 mar, 09:54, "nesramfr" wrote:



Bonjour
Travaillant avec la version 2003 d'Excel je souhaiterais insérer une i mage
dans un commentaire. La chose est-elle possible et si oui comment?
Merci d'avance.
Jean- Masquer le texte des messages précédents -


- Afficher le texte des messages précédents -



Avatar
Daniel.C
Bonjour.
Fais un clic droit sur le bord du commentaire et choisis "Format de
commentaire". Choisis l'onglet "Couleurs et traits", dans la partie
"remplissage", clique sur la flèche de la liste déroulante "Couleur", clique
sur "Motifs et tectures", et sur l'onglet "Image", Clique sur "sélectionner
l'image" et choisis ton image.
Daniel
"nesramfr" a écrit dans le message de news:

Bonjour
Travaillant avec la version 2003 d'Excel je souhaiterais insérer une image
dans un commentaire. La chose est-elle possible et si oui comment?
Merci d'avance.
Jean



Avatar
nesramfr
Merci pour vos réponses (manuelle et par macro)
Cordialement
nesramfr
"Daniel.C" a écrit dans le message de news:

Bonjour.
Fais un clic droit sur le bord du commentaire et choisis "Format de
commentaire". Choisis l'onglet "Couleurs et traits", dans la partie
"remplissage", clique sur la flèche de la liste déroulante "Couleur",
clique sur "Motifs et tectures", et sur l'onglet "Image", Clique sur
"sélectionner l'image" et choisis ton image.
Daniel
"nesramfr" a écrit dans le message de news:

Bonjour
Travaillant avec la version 2003 d'Excel je souhaiterais insérer une
image dans un commentaire. La chose est-elle possible et si oui comment?
Merci d'avance.
Jean