Come modificare il nome dell'autore per il commento in Word
Questo articolo parla della modifica del nome dell'autore predefinito per i commenti o della modifica del nome dell'autore esistente in un documento con uno nuovo. Prova i due metodi seguenti.
Modifica il nome dell'autore dei commenti per un uso futuro
Modifica il nome dell'autore dei commenti esistenti di un documento
Modifica il nome dell'autore dei commenti per un uso futuro
Se desideri modificare il nome dell'autore del commento per un utilizzo futuro, modifica il nome utente nella finestra Opzioni di Word.
1. In un documento Word aperto, fare clic su Compila il > Opzioni. Nel Opzioni di Word finestra, assicurati di trovarti nel file Generale scheda, modificare il nome nel file nome utente casella come mostrato nell'immagine sottostante e infine fare clic su OK pulsante.
Ora hai cambiato il nome utente predefinito per i commenti nel documento di Word.
Modifica il nome dell'autore dei commenti esistenti di un documento
Se hai ricevuto un documento con molti commenti e desideri modificare i nomi degli autori di tutti i commenti in uno specifico, il seguente codice VBA ti farà un favore.
1. Selezionare l'intervallo che contiene i commenti o selezionare l'intero documento per modificare i nomi degli autori premendo il tasto Ctrl + A , premere i tasti altro + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.
2. In apertura Microsoft Visual Basic, Applications Edition finestra, fare clic inserire > Moduli. Quindi copia sotto il codice VBA nella finestra del modulo.
Codice VBA: modifica il nome dell'autore del documento dei commenti esistenti
Sub ChangeCommentAuthor()
'Updated by EntendOffice 20181112
Dim I As Long
Dim xNewName As String
Dim xShortName As String
If Selection.Comments.Count = 0 Then
MsgBox "No comments in your selection!", vbInformation, "KuTools for Word"
Exit Sub
End If
xNewName = InputBox("New author name?", "KuTools for Word")
xShortName = InputBox("New author initials?", "KuTools for Word")
If xNewName = "" Or xShortName = "" Then
MsgBox "The author name/initials can’t be empty.", vbInformation, "Kutools for Word"
Exit Sub
End If
With Selection
For I = 1 To .Comments.Count
.Comments(I).Author = xNewName
.Comments(I).Initial = xShortName
Next I
End With
End Sub
3. premi il F5 chiave per eseguire il codice. In apertura Commenti Nome dell'autore finestra di dialogo, immettere il nuovo nome dell'autore nella casella di testo e fare clic su OK pulsante.
4. Nella prossima apertura Iniziali dei commenti finestra di dialogo, inserisci le iniziali di cui hai bisogno e fai clic su OK pulsante.
Quindi i nomi degli autori di tutti i commenti nell'intervallo selezionato vengono modificati in quello specificato immediatamente come mostrato nell'immagine sottostante.
I migliori strumenti per la produttività in ufficio
Kutools for Word - Migliora la tua esperienza con le parole con Over 100 Caratteristiche notevoli!
🤖 Assistente AI di Kutools: Trasforma la tua scrittura con l'intelligenza artificiale - Genera contenuto / Riscrivere il testo / Riepilogare i documenti / Richiedi informazioni sulla base del documento, tutto all'interno di Word
📘 Padronanza dei documenti: Pagine divise / Unisci documenti / Esporta la selezione in vari formati (PDF/TXT/DOC/HTML...) / Converti in batch in PDF / Esporta pagine come immagini / Stampa più file contemporaneamente...
✏ Modifica dei contenuti: Trova e sostituisci in batch su più file / Ridimensiona tutte le immagini / Trasporre righe e colonne della tabella / Converti tabella in testo...
🧹 Pulito senza sforzo: Spazza via Spazi extra / Interruzioni di sezione / Tutte le intestazioni / Caselle di testo / Collegamenti ipertestuali / Per ulteriori strumenti di rimozione, vai al nostro Rimuovi gruppo...
➕ Inserti creativi: Inserisci Mille separatori / Caselle di controllo / Pulsanti di scelta / QR Code / Codice a barre / Tabella della linea diagonale / Didascalia dell'equazione / Didascalia immagine / Didascalia / Immagini multiple / Scopri di più nella Inserisci gruppo...
???? Selezioni di precisione: Individuare pagine specifiche / con tabelle / forme / paragrafi di intestazione / Migliora la navigazione con Scopri di più Seleziona funzionalità...
⭐ Miglioramenti delle stelle: Naviga rapidamente verso qualsiasi luogo / inserire automaticamente testo ripetitivo / passare senza problemi da una finestra all'altra del documento / 11 strumenti di conversione...