Je cherche à modifier mon format de commentaire par défaut afin d'avoir toujours le même lorsque j'en fait un nouveau.
Pourriez-vous me dire si cela est possible sans avoir à lancer une macro systématiquement au démarrage?
Merci d'avance. -- Glouglou
Bonsoir,
Juste une piste (que tu as peut être déjà visitée) :
http://www.excelabo.net/excel/outilscommentaires.php#formatcommentaire
--
Avec plaisir
Philippe.R
"Glouglou" <Glouglou@discussions.microsoft.com> a écrit dans le message de
news:4C279D81-E612-4C83-A4D2-6260285A0CB4@microsoft.com...
Bonjour à tous,
Je cherche à modifier mon format de commentaire par défaut afin d'avoir
toujours le même lorsque j'en fait un nouveau.
Pourriez-vous me dire si cela est possible sans avoir à lancer une macro
systématiquement au démarrage?
Je cherche à modifier mon format de commentaire par défaut afin d'avoir toujours le même lorsque j'en fait un nouveau.
Pourriez-vous me dire si cela est possible sans avoir à lancer une macro systématiquement au démarrage?
Merci d'avance. -- Glouglou
jps
bonjour glouglou tu peux coller cette proc dans ton perso.xls et monter un bouton dans ta BO qui pourrait remplacer même celui actuel pour insérer un commentaire tu adaptes bien sûr la police, sa taille et sa couleur... HTH jps
On Error Resume Next Set cmt = ActiveCell.AddComment With cmt.Shape .Placement = xlFreeFloating .TextFrame.AutoSize = True With .OLEFormat.Object With .Font .Name = "Times New Roman": .Size = 10: '.Color = vbRed End With End With End With cmt.Text Text:=""
"Philippe.R" <AS_rauphil_at_wanadoo.fr> a écrit dans le message de news:
Je cherche à modifier mon format de commentaire par défaut afin d'avoir toujours le même lorsque j'en fait un nouveau.
Pourriez-vous me dire si cela est possible sans avoir à lancer une macro systématiquement au démarrage?
Merci d'avance. -- Glouglou
bonjour glouglou
tu peux coller cette proc dans ton perso.xls et monter un bouton dans ta BO
qui pourrait remplacer même celui actuel pour insérer un commentaire
tu adaptes bien sûr la police, sa taille et sa couleur...
HTH
jps
On Error Resume Next
Set cmt = ActiveCell.AddComment
With cmt.Shape
.Placement = xlFreeFloating
.TextFrame.AutoSize = True
With .OLEFormat.Object
With .Font
.Name = "Times New Roman": .Size = 10: '.Color = vbRed
End With
End With
End With
cmt.Text Text:=""
"Philippe.R" <AS_rauphil_at_wanadoo.fr> a écrit dans le message de news:
uDtmNI06HHA.536@TK2MSFTNGP06.phx.gbl...
Bonsoir,
Juste une piste (que tu as peut être déjà visitée) :
http://www.excelabo.net/excel/outilscommentaires.php#formatcommentaire
--
Avec plaisir
Philippe.R
"Glouglou" <Glouglou@discussions.microsoft.com> a écrit dans le message de
news:4C279D81-E612-4C83-A4D2-6260285A0CB4@microsoft.com...
Bonjour à tous,
Je cherche à modifier mon format de commentaire par défaut afin d'avoir
toujours le même lorsque j'en fait un nouveau.
Pourriez-vous me dire si cela est possible sans avoir à lancer une macro
systématiquement au démarrage?
bonjour glouglou tu peux coller cette proc dans ton perso.xls et monter un bouton dans ta BO qui pourrait remplacer même celui actuel pour insérer un commentaire tu adaptes bien sûr la police, sa taille et sa couleur... HTH jps
On Error Resume Next Set cmt = ActiveCell.AddComment With cmt.Shape .Placement = xlFreeFloating .TextFrame.AutoSize = True With .OLEFormat.Object With .Font .Name = "Times New Roman": .Size = 10: '.Color = vbRed End With End With End With cmt.Text Text:=""
"Philippe.R" <AS_rauphil_at_wanadoo.fr> a écrit dans le message de news:
Je cherche à modifier mon format de commentaire par défaut afin d'avoir toujours le même lorsque j'en fait un nouveau.
Pourriez-vous me dire si cela est possible sans avoir à lancer une macro systématiquement au démarrage?
Merci d'avance. -- Glouglou
jps
re glouglou (un nick qui sonne bien à mon oreille de pochtron...en pleines vendanges, enfin...de ce qui a résisté à la grêle)
j'ai oublié un morceau de cette proc signée frédéric sigonneau la voici :
On Error Resume Next Set cmt = ActiveCell.AddComment If Err <> 0 Then GoTo Fin With cmt.Shape .Placement = xlFreeFloating .TextFrame.AutoSize = True With .OLEFormat.Object With .Font .Name = "Times New Roman": .Size = 10: '.Color = vbRed End With End With End With cmt.Text Text:="" Fin: SendKeys "%IM"
"jps" a écrit dans le message de news: %
bonjour glouglou tu peux coller cette proc dans ton perso.xls et monter un bouton dans ta BO qui pourrait remplacer même celui actuel pour insérer un commentaire tu adaptes bien sûr la police, sa taille et sa couleur... HTH jps
On Error Resume Next Set cmt = ActiveCell.AddComment With cmt.Shape .Placement = xlFreeFloating .TextFrame.AutoSize = True With .OLEFormat.Object With .Font .Name = "Times New Roman": .Size = 10: '.Color = vbRed End With End With End With cmt.Text Text:=""
"Philippe.R" <AS_rauphil_at_wanadoo.fr> a écrit dans le message de news:
Je cherche à modifier mon format de commentaire par défaut afin d'avoir toujours le même lorsque j'en fait un nouveau.
Pourriez-vous me dire si cela est possible sans avoir à lancer une macro systématiquement au démarrage?
Merci d'avance. -- Glouglou
re glouglou (un nick qui sonne bien à mon oreille de pochtron...en pleines
vendanges, enfin...de ce qui a résisté à la grêle)
j'ai oublié un morceau de cette proc signée frédéric sigonneau
la voici :
On Error Resume Next
Set cmt = ActiveCell.AddComment
If Err <> 0 Then GoTo Fin
With cmt.Shape
.Placement = xlFreeFloating
.TextFrame.AutoSize = True
With .OLEFormat.Object
With .Font
.Name = "Times New Roman": .Size = 10: '.Color = vbRed
End With
End With
End With
cmt.Text Text:=""
Fin:
SendKeys "%IM"
"jps" <jps@wannadoodoo.fr> a écrit dans le message de news:
%23NlgJr06HHA.536@TK2MSFTNGP06.phx.gbl...
bonjour glouglou
tu peux coller cette proc dans ton perso.xls et monter un bouton dans ta
BO qui pourrait remplacer même celui actuel pour insérer un commentaire
tu adaptes bien sûr la police, sa taille et sa couleur...
HTH
jps
On Error Resume Next
Set cmt = ActiveCell.AddComment
With cmt.Shape
.Placement = xlFreeFloating
.TextFrame.AutoSize = True
With .OLEFormat.Object
With .Font
.Name = "Times New Roman": .Size = 10: '.Color = vbRed
End With
End With
End With
cmt.Text Text:=""
"Philippe.R" <AS_rauphil_at_wanadoo.fr> a écrit dans le message de news:
uDtmNI06HHA.536@TK2MSFTNGP06.phx.gbl...
Bonsoir,
Juste une piste (que tu as peut être déjà visitée) :
http://www.excelabo.net/excel/outilscommentaires.php#formatcommentaire
--
Avec plaisir
Philippe.R
"Glouglou" <Glouglou@discussions.microsoft.com> a écrit dans le message
de news:4C279D81-E612-4C83-A4D2-6260285A0CB4@microsoft.com...
Bonjour à tous,
Je cherche à modifier mon format de commentaire par défaut afin d'avoir
toujours le même lorsque j'en fait un nouveau.
Pourriez-vous me dire si cela est possible sans avoir à lancer une macro
systématiquement au démarrage?
re glouglou (un nick qui sonne bien à mon oreille de pochtron...en pleines vendanges, enfin...de ce qui a résisté à la grêle)
j'ai oublié un morceau de cette proc signée frédéric sigonneau la voici :
On Error Resume Next Set cmt = ActiveCell.AddComment If Err <> 0 Then GoTo Fin With cmt.Shape .Placement = xlFreeFloating .TextFrame.AutoSize = True With .OLEFormat.Object With .Font .Name = "Times New Roman": .Size = 10: '.Color = vbRed End With End With End With cmt.Text Text:="" Fin: SendKeys "%IM"
"jps" a écrit dans le message de news: %
bonjour glouglou tu peux coller cette proc dans ton perso.xls et monter un bouton dans ta BO qui pourrait remplacer même celui actuel pour insérer un commentaire tu adaptes bien sûr la police, sa taille et sa couleur... HTH jps
On Error Resume Next Set cmt = ActiveCell.AddComment With cmt.Shape .Placement = xlFreeFloating .TextFrame.AutoSize = True With .OLEFormat.Object With .Font .Name = "Times New Roman": .Size = 10: '.Color = vbRed End With End With End With cmt.Text Text:=""
"Philippe.R" <AS_rauphil_at_wanadoo.fr> a écrit dans le message de news: