Insertion de commentaire

[anthoYS]

Bonjour,

Est-il possible d'insérer un commentaire par touche raccourci prédéfini à l'avance.
Par exemple Ctrl+F2 donnera un commentaire d'où un 2 apparaîtra.
On se place sur une cellule puis par une ou deux touche insère un commentaire.
Est-ce possible? Merci. Et si une programmation plus élaboré d'insertion de commentaires existe, macro ou autres, me l'indiquer.
Car je perd du temps, clic gauche, insérer un commentaire etc...
Surtout que mes commentaires sont souvent les mêmes.

Merci à vous par avance.

 

[jp14]

Re : Insertion de commentaire

Bonjour

une piste
Utiliser l'enregistreur de macro pour créer une macro avec appel par touches clavier

Remplacer les lignes écrites par le code suivant

ActiveCell.Select
Selection.AddComment ""
Selection.Comment.Visible = True
Selection.Comment.Text Text:="s:" & Chr(10) & ""

A tester

JP

 

[anthoYS]

Re : Insertion de commentaire

Erreur d'execution '1004'.

Je n'y parviens pas.

 

[jp14]

Re : Insertion de commentaire

Bonsoir

Un exemple pour afficher un commentaire
https://www.excel-downloads.com/threads/insertion-detail.113683/


Ci dessous le fichier avec la macro
JP

 

[anthoYS]

Re : Insertion de commentaire

C'est exactement ce que je veux, mais comment en arriver à ceci.
Savoir que, "Ctrl+a" affiche le commentaire s?

 

[jp14]

Re : Insertion de commentaire

Bonsoir

C'est exactement ce que je veux, mais comment en arriver à ceci.
Savoir que, "Ctrl+a" affiche le commentaire s?

Menu "Outils"
Macro
Nouvelle macro

Mettre dans la case "touche de raccourci" la lettre désirée.

Voir image

JP

 

[anthoYS]

Re : Insertion de commentaire

Je recopie ta macro?

Je ne sais pas comment faire?
Et est-ce possible de dimensionner le cadre du commentaire?

Merci encore à toi, mais le langage macro je débute donc j'ai un peu de mal.

 

[jp14]

Re : Insertion de commentaire

Bonsoir

Pour écrire cette macro j'ai utilisé l'éditeur de macro pour connaitre le vocabulaire.

Il suffit d'utiliser l'enregistreur de macro, de modifier la dimension du commentaire et récupérer la ligne de code qui a réalisé l'opération pour l'insérer dans la procédure de base.


JP

 

[anthoYS]

Re : Insertion de commentaire

Merci.

Ceci tu le met ou et quand?

Sub Macro2()
'
' Macro2 Macro
' Macro enregistrée le 10/02/2009 par j
'
' Touche de raccourci du clavier: Ctrl+a
'
    ActiveCell.Select
    Selection.AddComment ""
    Selection.Comment.Visible = True
    Selection.Comment.Text Text:="ballo" & Chr(10) & ""
End Sub

 

[jp14]

Re : Insertion de commentaire

Bonsoir

Des réponses à cette adresse

Ce lien n'existe plus

JP

 

[vbacrumble]

Re : Insertion de commentaire

Bonsoir tous

Dans ce fil récent, des exemples de macro pour insérer commentaires
https://www.excel-downloads.com/threads/commentaire-ajuster-automatiquement-la-taille.113768/

A+

 

[anthoYS]

Re : Insertion de commentaire

Merci les gars.

 

[anthoYS]

Re : Insertion de commentaire

Désolé mais c'est pas évident ces liens.

Merci mais j'y arrive cependant le seul problème c'est que je souhaite réduire le cadre du commentaire simplement et je ne sais pas du tout comment faire.

A bientôt.

 

[BOISGONTIER]

Re : Insertion de commentaire

Bonjour,


Sub tailleZoneCommentaire()
For Each c In ActiveSheet.Comments
c.Shape.Width = 60
c.Shape.Height = 40
Next c
End Sub

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

JB

 

[anthoYS]

Re : Insertion de commentaire

merci beaucoup mais ou mettre ceci et quand?

Sub tailleZoneCommentaire()
For Each c In ActiveSheet.Comments
c.Shape.Width = 60
c.Shape.Height = 40
Next c
End Sub