Jim souhaite insérer le texte trouvé dans la partie Commentaires des propriétés d’un classeur dans une cellule. Il ne s’agit pas d’un commentaire attaché à une cellule, mais du contenu du champ Commentaires dans les propriétés du classeur.

Si vous devez simplement copier les commentaires une seule fois, le faire manuellement peut être le meilleur choix. Vous pouvez afficher le champ Commentaires, sélectionner le contenu que vous souhaitez mettre dans votre feuille de calcul, puis appuyer sur Ctrl + C. Fermez les propriétés, sélectionnez la cellule souhaitée, puis appuyez sur Ctrl + V.

Si vous avez davantage besoin que l’inclusion soit dynamique, la seule façon d’ajouter ces commentaires à une cellule est d’utiliser une macro. Si vous souhaitez que le contenu apparaisse dans une cellule spécifique (telle que A1), vous pouvez simplement utiliser une seule ligne de code:

Range("A1")=ActiveWorkbook.BuiltinDocumentProperties("comments")

C’est ça; une seule ligne de code pour insérer les commentaires dans la cellule.

Vous pouvez en tirer parti, si vous le souhaitez, pour créer une fonction définie par l’utilisateur qui est utile pour placer les commentaires où vous le souhaitez.

Function putComments() As String     putComments=ActiveWorkbook.BuiltinDocumentProperties("comments")

End Function

Pour utiliser cette fonction définie par l’utilisateur, utilisez simplement ce qui suit dans une cellule:

=mySheetComment()

_Note: _

Si vous souhaitez savoir comment utiliser les macros décrites sur cette page (ou sur toute autre page des sites ExcelTips), j’ai préparé une page spéciale qui comprend des informations utiles.

lien: / excelribbon-ExcelTipsMacros [Cliquez ici pour ouvrir cette page spéciale dans un nouvel onglet de navigateur].

ExcelTips est votre source pour une formation Microsoft Excel rentable.

Cette astuce (6560) s’applique à Microsoft Excel 97, 2000, 2002 et 2003. Vous pouvez trouver une version de cette astuce pour l’interface ruban d’Excel (Excel 2007 et versions ultérieures) ici:

link: / excelribbon-Inserting_Workbook_Comments_Into_a_Cell [Insertion de commentaires de classeur dans une cellule].