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
Informatics, ski racer, loves travels, Finland, Norway, mountains, squash, photography, Drones and RC Helicopter
RSS - Articoli
grazie ! ho risolto un bel problema- avevo centinaia di commenti di cella da trasform in testo e import in Access… ! perfetto –
Grazie, ottima soluzione, interessante per applicazioni spot
grazie. mi hai salvato da un enorme caos…
grazie. devi campare cent’anni si dice al mio paese.
complimenti
grazissimo!!
indicazioni chiare e semplici! complimenti
mi funziona solo con le note… non con i commenti, perchè?