KutoolsforOffice — Un'unica soluzione, cinque potenti strumenti.Ottenere di più con meno sforzo.

Come elencare tutti i commenti presenti nel foglio di lavoro corrente in un nuovo foglio o nella cartella di lavoro in Excel?

AutoreAssistenza tecnica Data di modifica

Se hai una cartella di lavoro con troppi commenti e desideri elencarli tutti in un Nuovo foglio di lavoro o nella cartella stessa per poterli revisionare, come puoi fare? I metodi seguenti ti consentono di elencare rapidamente tutti i commenti di un foglio di lavoro o dell'intera cartella in un Nuovo foglio di lavoro o nella cartella di lavoro in Excel.

Utilizza il codice VBA per elencare tutti i commenti presenti nel Foglio di lavoro corrente in un Nuovo foglio di lavoro

Utilizza Kutools per Excel per elencare tutti i commenti presenti nel Foglio di lavoro corrente in un Nuovo foglio di lavoro o nella cartella di lavoro


Utilizza il codice VBA per elencare tutti i commenti presenti nel Foglio di lavoro corrente in un Nuovo foglio di lavoro

Il seguente codice VBA elenca tutti i commenti presenti nel foglio di lavoro corrente in un nuovo foglio di lavoro. In questo nuovo foglio, vengono mostrati tutti i commenti dell’intera cartella di lavoro in un elenco che include nome del foglio, indirizzo della cella, contenuto del commento e nome della cella. Procedi come segue:

1. Fai clic su «Sviluppo» > «Visual Basic» per aprire la finestra di «Microsoft Visual Basic, Applications Edition». Quindi, seleziona «Inserisci» > «Modulo» e inserisci il seguente codice VBA nel modulo.

VBA: elenca tutti i commenti in un nuovo foglio di lavoro.

Sub ShowCommentsAllSheets()
'Update 20140508
Dim commrange As Range
Dim rng As Range
Dim ws As Worksheet
Dim newWs As Worksheet
Set newWs = Application.Worksheets.Add
newWs.Range("A1").Resize(1, 4).Value = Array("Sheet", "Address", "Value", "Comment")
Application.ScreenUpdating = False
On Error Resume Next
For Each ws In Application.ActiveWorkbook.Worksheets
    Set commrange = ws.Cells.SpecialCells(xlCellTypeComments)
    If Not commrange Is Nothing Then
        i = newWs.Cells(Rows.Count, 1).End(xlUp).Row
        For Each rng In commrange
            i = i + 1
            newWs.Cells(i, 1).Resize(1, 4).Value = Array(ws.Name, rng.Address, rng.Value, rng.Comment.Text)
        Next
    End If
    Set commrange = Nothing
Next
newWs.Cells.WrapText = False
Application.ScreenUpdating = True
End Sub

2. Quindi fai clic sul pulsante pulsante esegui codice VBA per eseguire il codice e otterrai un nuovo foglio di lavoro con tutti i commenti presenti nel foglio di lavoro corrente. Vedi screenshot:

tutti i commenti sono visualizzati nell'intera cartella di lavoro


Utilizza Kutools per Excel per elencare tutti i commenti presenti nel Foglio di lavoro corrente in un Nuovo foglio di lavoro o nella cartella di lavoro

Grazie alla funzione «Crea elenco commenti» di Kutools per Excel, puoi generare in un istante un elenco completo di tutti i commenti in un nuovo foglio di lavoro o in una nuova cartella di lavoro.

Kutools per Excel: oltre 300 pratici componenti aggiuntivi per Excel. Provalo gratuitamente e senza limitazioni per 30 giorni! Scaricalo ora.

1. Se hai installato Kutools per Excel, clicca su «Kutools» > «Altro» > «Crea elenco commenti».

2. Nella finestra di dialogo «Crea elenco commenti»:

  • Seleziona l’ambito da cui desideri visualizzare i commenti: puoi scegliere tra «Foglio di lavoro corrente» e «Tutti i fogli».
  • Quindi, specifica la posizione in cui desideri inserire l'elenco dei commenti: puoi scegliere di elencarli in una nuova cartella di lavoro o in un nuovo foglio. Vedi screenshot:

crea un elenco di commenti con Kutools

3. Quindi fai clic sul pulsante «Crea». Verrà aggiunto un Nuovo foglio di lavoro che elenca tutti i commenti del foglio attivo con i relativi attributi, come nome del foglio, riferimenti di cella, riga e colonna. Vedi screenshot:

crea un elenco di commenti con Kutools per ottenere il risultato

Per ulteriori informazioni sulla funzione «Crea elenco commenti», visita la descrizione della funzionalità Crea elenco commenti.


Articoli correlati:

Migliori Strumenti per la Produttività in Office

🤖KUTOOLS AI Assistente: Rivoluziona Analisi dei dati in base a:Esecuzione Intelligente   |  Genera Codice|  Crea formule personalizzate  |  Analizza Dati e Genera Grafici|  Richiama Funzioni avanzate
Funzionalità Popolari:Trova, Evidenzia o Contrassegna Duplicati   |  Elimina righe vuote   |  Combinare Colonne o Celle senza Perdere Dati   |   Arrotondamento senza usare la formula...
Super RICERCA.VERT:VLookup con Criteri Multipli  |  VLookup con Valori Multipli  |   VLookup tra Fogli Multipli   |   Corrispondenza approssimativa....
Elenco a discesa avanzato:Crea Rapidamente un Elenco a Discesa   |  Elenco a Discesa Dipendente   |  Elenco a Discesa con Selezione Multipla....
Gestione Colonne:Aggiungi un Numero Specifico di Colonne|Sposta Colonne|Attiva/Disattiva lo Stato di Visibilità delle Colonne Nascoste|Confronta Intervalli e Colonne...
Funzionalità in Evidenza:Attenzione della griglia   |  Visualizzazione Design   |Barra delle formule avanzata   | Gestione Cartelle di Lavoro e Fogli   |  Biblioteca di risorse(Testo Automatico)|  Selettore di Date   |  Unisci fogli di lavoro  |  Crittografa/Decrittografa celle   | Invia Email da Lista   |  Super Filtri   |   Filtro speciale(Filtra celle con testo in grassetto/corsivo/barrato...) ...
Principali Set di Strumenti 15:12 Strumentiper il Testo(Aggiungi testo,Elimina Caratteri Specifici, ...)|   50+Tipidi Grafico(Diagramma di Gantt, ...)|   40+ Formule Pratiche(Calcola l'età in base alla data di nascita, ...)|   19 Strumentidi Inserimento(Inserisci Codice QR,Inserisci Immagine dal Percorso, ...)|   12 Strumentidi Conversione(Converti in parole,Conversione del tasso di cambio, ...)|   7 StrumentiUnisci e Dividi(Unione avanzata righe,Dividi celle, ...)|... e molto altro
Usa Kutools nella tua lingua preferita – supporta inglese, spagnolo, tedesco, francese, cinese e 40+ altre!

Potenzia le tue competenze in Excel con Kutools per Excel e sperimenta un’efficienza mai vista prima.Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e Risparmia tempo.Clicca qui per ottenere la funzionalità di cui hai più bisogno...


Office Tab Porta l'interfaccia a schede in Office e rende il tuo lavoro molto più semplice

  • Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Apri e crea più documenti in nuove schede all’interno della stessa finestra, invece che in finestre separate.
  • Aumenta la tua produttività del 50 % e risparmia centinaia di clic del mouse ogni giorno!

Tutti i componenti aggiuntivi di Kutools in un unico programma di installazione.

Kutools for Office è la suite che include componenti aggiuntivi per Excel, Word, Outlook e PowerPoint, oltre a Office Tab Pro: la soluzione ideale per i team che lavorano su diverse app di Office.

ExcelWordOutlookTabsPowerPoint
  • Suite completa— componenti aggiuntivi per Excel, Word, Outlook e PowerPoint + Office Tab Pro
  • Un unico programma di installazione, una sola licenza— configurazione in pochi minuti (pronto per MSI)
  • Funziona meglio insieme— produttività ottimizzata tra le app di Office
  • Prova gratuita di 30 giorni con tutte le funzionalità— nessuna registrazione, nessuna carta di credito
  • Miglior rapporto qualità-prezzo— risparmia rispetto all’acquisto dei singoli componenti aggiuntivi