inserer un commentaire

[bert37]

Bonjour,

Je souhaiterai insérer un commentaire en utilisant un texte qui se trouve dans une autre cellulle.

Exemple : si je pointe ma souris sur le petit triangle rouge commentaire en A1, je voudrais voir apparaitre le texte qui se trouve en Z10.

Merci pour vos retours

 

[porcinet82]

Re : inserer un commentaire

Salut,

Regarde ici et la, tu devrais trouver ton bonheur.
Si tu as des questions, n'hesite pas a refaire signe.

@+

 

[bert37]

Re : inserer un commentaire

Merci¨Porcinet,

effectivement j'ai besoin d'un coup de main supplémentaire.

ci joint un exemple, merci de me créer la macro afin que je comprenne mieux,
je débute en VBA, je me sens plus à l'aise avec les formules

 

[porcinet82]

Re : inserer un commentaire

re,

Voici une macro legerement remaniée qui se trouvait dans le premier lien que je t'avais proposé.

Sub AjouteCommentaire()
Dim c As Range
'on efface les commentaires de la colonne C
Columns("C:C").ClearComments
'pour toutes les cellules de la plage C2:C dernière cellule remplit de la colonne C
For Each c In Range("I8", Range("I65536").End(xlUp))
    'pour la cellule se trouvant sur la meme ligne (le 0 du offset)
        'et 2 colonnes avant (le -2 du offset) la cellule de la colonne C
    With Cells(c.Row, 3)
        If c.Value <> "" Then
            'on ajoute un commentaire avec le texte
            .AddComment (c.Value & Chr(10) & c.Offset(0, 1).Value & Chr(10) & c.Offset(0, 2).Value)
            'on met a visible le commentaire
            .Comment.Visible = True
            'on selectionne la fenetre du commentaire
            .Comment.Shape.Select
            'on ajuste automatiquement la taille de la fentre du commentaire
            Selection.AutoSize = True
            'on met a non visible le commentaire
            .Comment.Visible = False
        End If
    End With
Next c
End Sub

Pour utiliser ce code, il te suffit de faire Alt+F11, d'insérer un module et de le coller dedans.
Ensuite, tu peux rajouter un bouton ou un shape et y affecter une macro.

@+

 

[BOISGONTIER]

Re : inserer un commentaire

Bonjour,

Commentaire dynamique: si la cellule source est modifiée, le commentaire est modifié.

JB
Formation Excel VBA JB

 

[bert37]

Re : inserer un commentaire

Merci à Porcinet 82 et à Boigontier
tout fonctionne à présent
à bientôt
bert37