Format des commentaires

Salut Jean-Claude,

Je ne sais pas, mais cette macro pourrait peut-être
te faliciter la vie :

Sub Changer_Fonte_Commentaires_Feuille_Active()
Set ici = ActiveSheet.Comments
For Each c In ici
c.Shape.TextFrame.Characters.Font.Name = "Arial"
Next
End Sub

Serge

"Jean-Claude" <Jay_See57@hotmail.com> a écrit dans le message de news:
009901c35b60$0781c900$a101280a@phx.gbl...
Bonjour.
Est-il possible de modifier, voire changer, la police "par
défaut" (l'horrible Tahoma) utilisée pour les commentaires
insérés. Je comprends qu'on peut toujours la modifier
après coup,... mais j'aimerais pouvoir définir celle
utilisée par défaut.
J'utilise la version provenant de la suite Office 2000
Premium.
Merci pour toute aide.

Salut,

Tu peux aussi créer un bouton personnalisé pour insérer un noveau
commentaire. Le code serait alors :
ActiveCell.AddComment.Shape.OLEFormat.Object.Font.Name = "arial"

--
Nicolas B.

garnote a écrit récemment dans un message de news :

Salut Jean-Claude,

Je ne sais pas, mais cette macro pourrait peut-être
te faliciter la vie :

Sub Changer_Fonte_Commentaires_Feuille_Active()
Set ici = ActiveSheet.Comments
For Each c In ici
c.Shape.TextFrame.Characters.Font.Name = "Arial"
Next
End Sub

Serge

"Jean-Claude" <Jay_See57@hotmail.com> a écrit dans le message de news:
009901c35b60$0781c900$a101280a@phx.gbl...
Bonjour.
Est-il possible de modifier, voire changer, la police "par
défaut" (l'horrible Tahoma) utilisée pour les commentaires
insérés. Je comprends qu'on peut toujours la modifier
après coup,... mais j'aimerais pouvoir définir celle
utilisée par défaut.
J'utilise la version provenant de la suite Office 2000
Premium.
Merci pour toute aide.

Merci à vous Serge et Nicolas.
Je ne suis vraiment pas familier avec la façon d'utiliser
Visual Basic,... donc dans le brouillard total pour
appliquer (entrer) des macros. J'aurais donc intérêt à y
aller d'une procédure pas à pas bien détaillée, pour
novice de premier ordre.
Aussi, Serge, je ne souhaite pas modifier les commentaires
d'une feuille déjà créée, mais bien d'appliquer un format
de police par défaut pour tout nouveau commentaire à venir.
Le fait de convertir les commentaires déjà présents
n'élimine pas la double tâche que j'essaie d'éliminer;
insérer, puis modifier.
L'idéal pour moi, je crois, serait une macro qui activerait
un format de police par défaut pour les commentaires à
toutes et chacune des initialisations d'Excel; avec une
procédure bien détaillée,... pas à pas,...
Je sais que vous avez tenté de m'aider et je vous en
remercie.
Jean-Claude

La procédure est un peu longue pour être détaillée, mais tu trouveras
quelques infos pour débuter sur ces deux sites :

http://www.excelabo.net/xl/debuter.htm
http://dj.joss.free.fr/basic.htm

Si tu coinces, n'hésite pas à revenir sur le newsgroup.

Bonne chance !
:-)

--
Nicolas B.

Jean-Claude a écrit récemment dans un message de news :

Merci à vous Serge et Nicolas.
Je ne suis vraiment pas familier avec la façon d'utiliser
Visual Basic,... donc dans le brouillard total pour
appliquer (entrer) des macros. J'aurais donc intérêt à y
aller d'une procédure pas à pas bien détaillée, pour
novice de premier ordre.
Aussi, Serge, je ne souhaite pas modifier les commentaires
d'une feuille déjà créée, mais bien d'appliquer un format
de police par défaut pour tout nouveau commentaire à venir.
Le fait de convertir les commentaires déjà présents
n'élimine pas la double tâche que j'essaie d'éliminer;
insérer, puis modifier.
L'idéal pour moi, je crois, serait une macro qui activerait
un format de police par défaut pour les commentaires à
toutes et chacune des initialisations d'Excel; avec une
procédure bien détaillée,... pas à pas,...
Je sais que vous avez tenté de m'aider et je vous en
remercie.
Jean-Claude

Bonsoir,

Un petit exemple dont tu pourrais t'inspirer pour personnaliser tes nouveaux
commentaires selon tes besoins, à l'aide d'une macro complémentaire :

http://perso.wanadoo.fr/frederic.sigonneau/code/ToutFait/MoniqueComment.zip

Le mot de passe pour accéder au code (le lire, le modifier..) est 'zaza'. Une
fois installée, la macro complémentaire ajoute dans le menu contextuel des
cellules une commande 'Commentaire vierge' qui crée un commentaire personnalisé.

FS
--
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://perso.wanadoo.fr/frederic.sigonneau
Si votre question sur Excel est urgente, évitez ma bal !

Bonjour.
Est-il possible de modifier, voire changer, la police "par
défaut" (l'horrible Tahoma) utilisée pour les commentaires
insérés. Je comprends qu'on peut toujours la modifier
après coup,... mais j'aimerais pouvoir définir celle
utilisée par défaut.
J'utilise la version provenant de la suite Office 2000
Premium.
Merci pour toute aide.

Bonjour,

Pour supprimer l'entrée "résiduelle" dans le menu contextuel, recopie cette
procédure dans un module standard d'un classeur quelconque et exécute-la :

Sub nettoie()
Application.CommandBars("Cell"). _
Controls("Commentaire vierge").Delete
End Sub

Pour installer la macro complémentaire : Excel étant fermé, recopie le fichier
dézippé (extension .xla) dans le répertoire Macrolib d'Excel puis relance Excel
et installe la macro en la cochant dans la liste (OutilsMacros
complémentaires...).
Une fois installée, si tu veux adapter le code à un besoin précis, utilise
Alt+F11 pour ouvrir l'éditeur de code, clique sur la petite croix à gauche du
projet MoniqueComment et entre le mot de passe (zaza). regarde ensuite le code
du module Module1 pour modifier ce que tu souhaites.

FS
--
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://perso.wanadoo.fr/frederic.sigonneau
Si votre question sur Excel est urgente, évitez ma bal !

Bravo Frédéric, c'est exactement ce que je cherchais.
Crois-le ou non, mais c'est originalement pour moi que
Monique avait rafistolé cette macro, il y a 2 ou 3 ans.
Mais depuis lors, changements d'ordi et de OS oblige, je
ne la retrouvais plus et je suis un gros "Zéro" avec VB.
Peut-être pourras-tu m'aider davantage.
Voilà maintenant longtemps que je tente d'abord de
supprimer un "résidu" de cette macro qui est toujours
demeuré présent dans mon Excel; l'option "Commentaire
vide" dans le menu contextuel. Pourtant, aucune trace de
la macro dans les fichiers XLA, ni de module y faisant
référence dans VB. D'ailleurs, lorsque je clique sur cette
option, rien ne se produit, la macro n'étant plus présente
depuis belle lurette.
Je souhaiterais donc nettoyer cette poussière avant
d'appliquer la nouvelle macro.
Ensuite, j'apprécierais grandement si tu pouvais me
guider, pas à pas (à partir du Alt-F11), pour appliquer
cette macro que j'ai téléchargée.
Et merci, je suis vraiment content d'avoir trouvé une
personne-ressource pour cette macro tant appréciée.
Désolé pour la longueur du message.
Jean-Claude

-----Message d'origine-----
Bonsoir,

Un petit exemple dont tu pourrais t'inspirer pour
personnaliser tes nouveaux

commentaires selon tes besoins, à l'aide d'une macro
complémentaire :

http://perso.wanadoo.fr/frederic.sigonneau/code/ToutFait/M
oniqueComment.zip

Le mot de passe pour accéder au code (le lire, le
modifier..) est 'zaza'. Une

fois installée, la macro complémentaire ajoute dans le
menu contextuel des

cellules une commande 'Commentaire vierge' qui crée un
commentaire personnalisé.

FS
--
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://perso.wanadoo.fr/frederic.sigonneau
Si votre question sur Excel est urgente, évitez ma bal !

Bonjour.
Est-il possible de modifier, voire changer, la
police "par

défaut" (l'horrible Tahoma) utilisée pour les
commentaires

insérés. Je comprends qu'on peut toujours la modifier
après coup,... mais j'aimerais pouvoir définir celle
utilisée par défaut.
J'utilise la version provenant de la suite Office 2000
Premium.
Merci pour toute aide.

.

Sincères remerciements pour ton soutien, Frédéric.
Jean-Claude

-----Message d'origine-----
Re re,

La police, dans le code, c'est l'objet Font. Toutes ses
propriétés (couleur,

gras, italique, etc) sont visibles dans l'aide : mets le
curseur sur Font et

appuie sur F1, la touche dont, normalement, le texte est
devenu illisible,

effacé par l'usure :)
Pour mettre le texte du commentaire en gras, italique et
souligné :

With .Font
.Name = "Times New Roman"
.Size = 14
.Color = vbRed
.Bold=True
.Italic=True
.Underline = xlUnderlineStyleSingle
End With

FS
--
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://perso.wanadoo.fr/frederic.sigonneau
Si votre question sur Excel est urgente, évitez ma bal !

Super, Frédéric; tout fonctionne à nouveau comme
auparavant.
Dernières petites questions,... promis.
Dans le contenu du module, de quelle façon puis-je
ajouter, voire modifier, le "style" de la police (gras,
italique, souligné)?
Et finalement, où pourrais-je trouver une liste des
différentes "nomenclatures" à utiliser pour, disons, les
couleurs et les styles?

Merci à nouveau et bonne fin de journée.
Jean-Claude

-----Message d'origine-----
Bonjour,

Pour supprimer l'entrée "résiduelle" dans le menu
contextuel, recopie cette

procédure dans un module standard d'un classeur
quelconque et exécute-la :

Sub nettoie()
Application.CommandBars("Cell"). _
Controls("Commentaire vierge").Delete
End Sub

Pour installer la macro complémentaire : Excel étant
fermé, recopie le fichier

dézippé (extension .xla) dans le répertoire Macrolib
d'Excel puis relance Excel

et installe la macro en la cochant dans la liste
(OutilsMacros

complémentaires...).
Une fois installée, si tu veux adapter le code à un
besoin précis, utilise

Alt+F11 pour ouvrir l'éditeur de code, clique sur la
petite croix à gauche du

projet MoniqueComment et entre le mot de passe (zaza).
regarde ensuite le code

du module Module1 pour modifier ce que tu souhaites.

FS
--
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://perso.wanadoo.fr/frederic.sigonneau
Si votre question sur Excel est urgente, évitez ma
bal !

Bravo Frédéric, c'est exactement ce que je cherchais.
Crois-le ou non, mais c'est originalement pour moi
que

Monique avait rafistolé cette macro, il y a 2 ou 3
ans.

Mais depuis lors, changements d'ordi et de OS
oblige, je

ne la retrouvais plus et je suis un gros "Zéro" avec
VB.

Peut-être pourras-tu m'aider davantage.
Voilà maintenant longtemps que je tente d'abord de
supprimer un "résidu" de cette macro qui est toujours
demeuré présent dans mon Excel; l'option "Commentaire
vide" dans le menu contextuel. Pourtant, aucune
trace de

la macro dans les fichiers XLA, ni de module y
faisant

référence dans VB. D'ailleurs, lorsque je clique sur
cette

option, rien ne se produit, la macro n'étant plus
présente

depuis belle lurette.
Je souhaiterais donc nettoyer cette poussière avant
d'appliquer la nouvelle macro.
Ensuite, j'apprécierais grandement si tu pouvais me
guider, pas à pas (à partir du Alt-F11), pour
appliquer

cette macro que j'ai téléchargée.
Et merci, je suis vraiment content d'avoir trouvé une
personne-ressource pour cette macro tant appréciée.
Désolé pour la longueur du message.
Jean-Claude

-----Message d'origine-----
Bonsoir,

Un petit exemple dont tu pourrais t'inspirer pour
personnaliser tes nouveaux

commentaires selon tes besoins, à l'aide d'une macro
complémentaire :

http://perso.wanadoo.fr/frederic.sigonneau/code/ToutFait/M

oniqueComment.zip

Le mot de passe pour accéder au code (le lire, le
modifier..) est 'zaza'. Une

fois installée, la macro complémentaire ajoute dans
le

menu contextuel des

cellules une commande 'Commentaire vierge' qui crée
un

commentaire personnalisé.

FS
--
Frédéric Sigonneau [MVP Excel - né un sans-
culottide]

Gestions de temps, VBA pour Excel :
http://perso.wanadoo.fr/frederic.sigonneau
Si votre question sur Excel est urgente, évitez ma
bal !

Bonjour.
Est-il possible de modifier, voire changer, la
police "par

défaut" (l'horrible Tahoma) utilisée pour les
commentaires

insérés. Je comprends qu'on peut toujours la
modifier

après coup,... mais j'aimerais pouvoir définir
celle

utilisée par défaut.
J'utilise la version provenant de la suite Office
2000

Premium.
Merci pour toute aide.

.

.

.