Come esportare commenti da Excel a Word?
Per gli utenti di Excel, l'inserimento di commenti nelle celle è un'attività comune, a volte è necessario copiare e incollare questi commenti in un documento di Word per qualche scopo. Certo, puoi copiare e incollare i commenti su Word uno per uno, ma questo è un lavoro noioso e che richiede tempo. C'è un modo per esportare tutti i commenti da Excel a Word contemporaneamente?
Esporta commenti dal foglio di lavoro corrente a Word con codice VBA
Esporta commenti dal foglio di lavoro corrente a Word con codice VBA
Sfortunatamente, Excel non fornisce la funzionalità per copiare e incollare tutti i commenti in Word contemporaneamente. Tuttavia, con il seguente codice VBA, puoi esportare rapidamente tutti i commenti del foglio di lavoro attivo nel documento di Word.
1. Tieni premuto il ALT + F11 chiavi per aprire il Finestra di Microsoft Visual Basic, Applications Edition.
2. Clic inserire > Modulie incolla il codice seguente nel file Finestra del modulo.
Codice VBA: esporta i commenti dal foglio di lavoro corrente a Word
Sub CopyCommentsToWord()
'Update 20140325
Dim xComment As Comment
Dim wApp As Object
On Error Resume Next
Set wApp = GetObject(, "Word.Application")
If Err.Number <> 0 Then
Err.Clear
Set wApp = CreateObject("Word.Application")
End If
wApp.Visible = True
wApp.Documents.Add DocumentType:=0
For Each xComment In Application.ActiveSheet.Comments
wApp.Selection.TypeText xComment.Parent.Address & vbTab & xComment.Text
wApp.Selection.TypeParagraph
Next
Set wApp = Nothing
End Sub
3. Quindi premere F5 chiave per eseguire questo codice e tutti i commenti nel foglio di lavoro attivo sono stati esportati in un nuovo documento di Word con il suo indirizzo di cella. Vedi screenshot:
Articoli correlati:
Come inserire rapidamente un commento in più celle in Excel?
Come modificare la forma della casella dei commenti in Excel?
Come modificare tutti i formati di commento nelle celle in Excel?
Come modificare il nome dell'autore di tutti i commenti in Excel?
I migliori strumenti per la produttività in ufficio
Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo. Fai clic qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro
- 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 della stessa finestra, piuttosto che in nuove finestre.
- Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!