Namig: drugi jeziki so prevedeni v Google. Lahko obiščete English različico te povezave.
Vpiši se
x
or
x
x
Registracija
x

or

Kako spremeniti ime avtorja za komentar v programu Word

Ta članek govori o spremembi privzetega imena avtorja za komentarje ali spreminjanju obstoječega imena avtorja v dokumentu v novo. Prosimo, poskusite spodaj našteti dva načina.

Spremenite ime avtorja komentarjev za prihodnjo uporabo

Spremenite ime avtorja obstoječe pripombe dokumenta


Spremenite ime avtorja komentarjev za prihodnjo uporabo

Če želite spremeniti ime avtorja komentarja za prihodnjo uporabo, spremenite okno User Name in Word Options.

1. V odprtem Wordovem dokumentu kliknite file > možnosti. v Wordove možnosti okno, poskrbite, da boste locirali v splošno zavihek, spremenite ime v uporabniško ime polje spodaj prikazano spodaj, in končno kliknite na OK gumb.

Zdaj ste spremenili privzeto uporabniško ime za komentarje v dokumentu Word.


Spremenite ime avtorja obstoječe pripombe dokumenta

Če ste prejeli dokument z veliko komentarji in želite spremeniti imena avtorjev vseh komentarjev na določeno osebo, vam bo naslednja koda VBA naredila uslugo.

1. Izberite obseg vsebuje komentarje ali izberite celoten dokument, s katerim boste imena avtorjev spremenili s pritiskom na Ctrl + A tipke, pritisnite druga + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.

2. V odprtju Microsoft Visual Basic za aplikacije okno, kliknite Vstavi > Moduli. Nato kopirajte spodnjo kodo VBA v okno Modul.

VBA koda: spremenite ime avtorja dokumenta obstoječih komentarjev

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. Pritisnite F5 ključ za zagon kode. V odprtju Komentarji Ime avtorja v pogovornem oknu vnesite novo ime avtorja v polje z besedilom in kliknite OK gumb.

4. V naslednjem odprtju Začetki komentarjev pogovorno okno, vnesite začetnice, kot jih potrebujete, in kliknite na OK gumb.

Potem se vsa imena avtorjev v izbranem obsegu spremenijo v navedeno kot takoj, kot je prikazano spodaj.



Priporočena orodja za produktivnost Worda

Kutools for Word - več kot 100 napredne funkcije Za Microsoft Word shranite svoj čas 50%

  • Zapletene in ponavljajoče se operacije lahko opravite enkratno obdelavo v sekundah.
  • V dokument Worda vstavite več slik v mapah.
  • Združite in združite več datotek Word v mapah v eno z želenim naročilom.
  • Razdelite trenutni dokument v ločene dokumente v skladu z naslovom 1, odlomkom odseka ali drugimi merili.
  • Pretvorite datoteke med Doc in Docx, Docx in PDF, zbirko orodij za običajne konverzije in izbiro, in tako naprej...
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    JaCo · 3 months ago
    The VBA script worked perfectly to change the name of the author to my company name. Thank you!
  • To post as a guest, your comment is unpublished.
    vahit · 4 months ago
    Yardımı oldu, teşekkürler.