Estrarre commenti da celle Excel

Vediamo come estrarre un commento presente in una cella Excel e visualizzarlo come testo all’interno di un’altra cella. Dovendo lavorare tramite codice VBA apriamo la relativa finestra.

In Excel XP o 2003:
Menù Strumenti – Macro – Visual Basic Editor

In Excel 2007:
Bottone di Office – Pulsante Opzioni di Excel – Impostazioni generali – Opzione “Mostra scheda Sviluppo sulla barra multifunzione”
A questo punto ritornando nella finestra di Excel verrà visualizzata anche la Scheda Sviluppo nella quale troviamo il pulsante Visual Basic

Nella finestra Visual Basic inserire un nuovo modulo (menù Inserisci – Modulo)

Copiare nel modulo il codice riportato sotto:

Function GetCommentText(rCommentCell As Range)

Dim strGotIt As String

On Error Resume Next

strGotIt = WorksheetFunction.Clean _
(rCommentCell.Comment.Text)
GetCommentText = strGotIt

On Error GoTo 0

End Function

Posizionarsi quindi nella cella in cui si vuole venga inserito il commento presente in un’altra cella e digitare la seguente funzione:

=GetCommentText(A1)
Dove A1 è la cella contenete il commento

Se vogliamo rendere disponibile questa funzione in modo tale da trovarla all’avvio di ogni cartella di Excel possiamo creare un componente aggiuntivo come specificato qui.

technorati tags: Microsoft, Excel, Commenti, Estrarre

Related posts:

1. Come estrarre l’URL completo da un elenco di collegamenti ipertestuali presenti nelle celle di Excel
2. Estrarre una stringa di testo da una cella Excel
3. Visualizzare le funzioni contenute nelle celle di Excel
4. Sommare le celle in Excel in base alla formattazione
5. Sommare solo celle visibili in Excel