XL pour MAC Les commentaires dans excel

Nono1835

XLDnaute Occasionnel
bonjour à tous
j'ai un document excel avec menu déroulant dans les cellules.
Assez souvent j'ai besoins de mettre un commentaire en complément d'info.
Les commentaires à ajouter sont souvent les mêmes
Ma question est de savoir s'il est possible d'avoir des commentaires pré enregistrés , voir même un menu déroulant dans le commentaire .
merci d'avance de vos réponses
Nono
 

Nono1835

XLDnaute Occasionnel
Bonjour Nono 1835 et le forum
oui c'est possible avec une colonne en plus et liste déroulante associé,
Mais avec un fichier cela serai mieux ,

bonne continuation
RE
voici un fichier pour faire mon test
la première feuille "prog" contient jour / nuit
la feuille 1 le planning , dans les cellules avec G "garde" je souhaite mettre en commentaire " jour ou nuit " et cela sans avoir à le saisir mais en passant par un menu déroulant qui rempli le commentaire , car par la suite j'aurais beaucoup d'infos a saisir
merci
 

Pièces jointes

  • TEST COMMENTAIRES.xlsx
    9.9 KB · Affichages: 8

Staple1600

XLDnaute Barbatruc
Bonjour @Nono1835, le fil

Si j'ai bien compris la question, un façon de faire ci-dessous
1) En créant un tableau structuré sur la feuille prog
(avec Insertion/Tableau)
TableauCom.png


2) Dans le code de la feuille Feuil2, copier le code VBA ci-dessous
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("B5:H7")) Is Nothing Then
Target.ClearComments
Target.AddComment
Commentaires = Application.VLookup(Target, [Tableau1], 2, 0)
Target.Comment.Text Text:=Commentaires
End If
End Sub
RESULTAT
Quand on choisit une valeur dans la liste déroulante, un commentaire est ajouté
ResulCOM.png
 

Nono1835

XLDnaute Occasionnel
Bonjour @Nono1835, le fil

Si j'ai bien compris la question, un façon de faire ci-dessous
1) En créant un tableau structuré sur la feuille prog
(avec Insertion/Tableau)
Regarde la pièce jointe 1170466

2) Dans le code de la feuille Feuil2, copier le code VBA ci-dessous
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("B5:H7")) Is Nothing Then
Target.ClearComments
Target.AddComment
Commentaires = Application.VLookup(Target, [Tableau1], 2, 0)
Target.Comment.Text Text:=Commentaires
End If
End Sub
RESULTAT
Quand on choisit une valeur dans la liste déroulante, un commentaire est ajouté
Regarde la pièce jointe 1170467
re
merci pour ta réponse , mais ce que je souhaite s'est lorsque il y a garde de saisi dans une cellule , lorsque je fais clic droit insérer un commentaire , j'ai le choix de sélectionner jour ou nuit .( en fait je voudrais des commentaires pré enregistrer pour eviter de les saisir) je me suis mal exprimé
désolé
merci encore
 

Staple1600

XLDnaute Barbatruc
Re

@Nono1835
C'est ce que fait mon exemple , non ?
Selon la valeur que l'on choisit dans la liste déroulante, le commentaire change automatiquement.

Tu as essayé de reproduire mon exemple sur ton PC ?
(sur la base de ton fichier exemple)

PS: Si on complete les valeurs dans Tableau1, la macro en prendra compte.
Pour mettre la formule ci-dessous dans le champ Source de Données/Validation
=INDIRECT("Tableau1[Libellés]")
 
Dernière édition:

Nono1835

XLDnaute Occasionnel
Re

@Nono1835
Regarde la pièce jointe 1170468
1) Ajout de valeurs dans le tableau des commentaires
2) La liste déroulante se met à jour automatiquement
3) Quand j'utilise la liste déroulante, le commentaire s'ajoute automatiquement avec prise en compte de la valeur ajoutée au point 1)
re
merci pour tes explication , mais je dois mal faire quelque chose , ca marche pas
 

Pièces jointes

  • TEST COMMENTAIRES.xlsx
    11.2 KB · Affichages: 1

Staple1600

XLDnaute Barbatruc
Re, Bonjour @p56

@Nono1835
Pour que cela fonctionne, il faut enregistrer le classeur au format *.xlsm
(pour conserver le code VBA)

Pour mettre le code VBA au bon endroit
Sur l'onglet Feuill, faire clic-droit puis choisir Visualiser le code
C'est là qu'il faut copier le code VBA

Pour Données/Validation, dans , Source, il faut mettre la formule indiquée dans le message#6
=INDIRECT("Tableau1[Libellés]")

(En respectant l'orthographe)
Dans mon exemple, mon tableau se nomme Tableau1 et sa première colonne Libellés
 

Nono1835

XLDnaute Occasionnel
Bonjour à tous,

Alors voici une proposition avec un peu de code (mais je ne sais pas si c'est ok sur Mac)
Regarde la pièce jointe 1170470
La coloration de la liste des commentaires prévus est optionnelle (c'est pour faire "joli")
La liste déroulante des commentaires prévus s'affiche au clic droit sur une cellule contenant une liste de validation.
P.
re
respect , magique , dommage qu'excel demande une grande maitrise des codes pour arriver a une chose qui parait si simple , du coup les codes sont saisis où?
 

Staple1600

XLDnaute Barbatruc
Re

@Nono1835
Tu as du zappé le message#10 ;)
Car s'y trouve l'info qui indique où est stocké le code VBA
(en partie -> pour les procédures évènementielles)

NB: Dans le fichier de p56, il y a en plus un module standard
Un moyen rapide de basculer d'Excel au projet VBA, c'est de faire : ALT+F11
(en tout cas sur Windows)
 
Dernière édition:

Discussions similaires

Réponses
8
Affichages
510

Membres actuellement en ligne

Statistiques des forums

Discussions
314 628
Messages
2 111 337
Membres
111 105
dernier inscrit
Joffrette