Come si convertono i commenti in note a piè di pagina o note finali in Microsoft Word?
AutoreSiluvia•Data di modifica
Supponiamo che il documento di Word contenga più commenti: come convertirli tutti contemporaneamente in note a piè di pagina o note finali? Questo articolo presenta metodi VBA per raggiungere questo obiettivo.
Convertire i commenti in note a piè di pagina o note finali con codice VBA
I seguenti codici VBA consentono di convertire rapidamente tutti i commenti nel documento corrente in note a piè di pagina o note finali. Procedere come segue.
1. Apri il documento contenente i commenti da convertire in note a piè di pagina o note finali, quindi premi i tasti Alt+F11 per aprire la finestra di Microsoft Visual Basic for Applications.
2. Nella finestra di Microsoft Visual Basic for Applications, fai clic su Inserisci > Modulo. Poi copia il seguente codice VBA nella finestra del modulo.
Codice VBA: convertire i commenti in note a piè di pagina:
Sub ConvertCommentsToFootnotes()
Dim xComm As Comment
Dim xCommRange As Range
Dim xDoc As Document
Application.ScreenUpdating = False
Set xDoc = ActiveDocument
For Each xComm In xDoc.Comments
Set xCommRange = xComm.Range
xDoc.Footnotes.Add xComm.Scope, , xCommRange.Text
xComm.Delete
Next
Application.ScreenUpdating = True
End Sub
Codice VBA: convertire i commenti in note finali:
Sub ConvertCommentsToEndnotes()
Dim xComm As Comment
Dim xCommRange As Range
Dim xDoc As Document
Application.ScreenUpdating = False
Set xDoc = ActiveDocument
For Each xComm In xDoc.Comments
Set xCommRange = xComm.Range
xDoc.Endnotes.Add xComm.Scope, , xCommRange.Text
xComm.Delete
Next
Application.ScreenUpdating = True
End Sub
3. Premere il tasto F5 per eseguire il codice.
Tutti i commenti presenti nel documento corrente vengono immediatamente trasformati in note a piè di pagina o note finali, in base al codice VBA applicato.
Fai di più in meno tempo con Kutools per Word potenziato dall’IA
Kutools per Word non è solo una raccolta di strumenti: è una soluzione intelligente pensata per potenziare la tua produttività. Grazie alle funzionalità basate sull’intelligenza artificiale e agli strumenti essenziali, Kutools ti permette di fare di più in meno tempo:
Riassumi, riscrivi, componi e traduci contenuti in un istante.
Correggi il testo in tempo reale con suggerimenti su grammatica, punteggiatura e stile mentre scrivi.
Riformula e traduci i contenuti, mantenendo invariati layout, stile e struttura.
Traduci i tuoi contenuti in oltre 40 lingue con facilità, raggiungendo un pubblico globale.
Ottieni assistenza immediata e informazioni intelligenti basate sul tuo Documento Corrente.
Chiedi come completare un’attività – ad esempio rimuovere un’interruzione di sezione – e l’intelligenza artificiale ti guiderà passo passo o lo farà al posto tuo.
Oscura in pochi secondi informazioni sensibili o riservate per garantirti la massima privacy.
Tutti gli strumenti funzionano alla perfezione direttamente in Word, sempre a portata di mano.
Crea, migliora, traduci, riassumi e proteggi i tuoi documenti in tutta semplicità.
Migliora grammatica, chiarezza e tono mentre scrivi, in tempo reale.
Riformula e traduci i contenuti senza apportare alcuna modifica al layout o alla formattazione.
Chiedi come completare un’attività – ad esempio rimuovere un’interruzione di sezione – e l’intelligenza artificiale ti guiderà passo passo o lo farà al posto tuo.
Tutti gli strumenti funzionano perfettamente in Word, sempre a portata di mano.
✨ Kutools for Office – Un’installazione, cinque strumenti potenti!
Include Office Tab Pro·Kutools per Excel·Kutools per Outlook·Kutools per Word·Kutools for PowerPoint
📦 Ottieni tutti gli 5 strumenti in un’unica suite | 🔗 Integrazione perfetta con Microsoft Office | ⚡ Risparmia tempo e aumenta immediatamente la produttività
