Pääsisältö

Word-kommenteissa näkyvän tekijän nimen muuttaminen

Kirjailija: Siluvia Viimeksi muokattu: 2025-04-07

Tässä artikkelissa kerrotaan, kuinka voit muuttaa Wordin kommenteissa käytettävän oletusarvoisen tekijän nimen sekä päivittää dokumentin olemassa olevien kommenttien tekijän nimen. Voit tehdä tämän joko Wordin sisäänrakennetuilla asetuksilla tai VBA-makrolla.

Vaihda oletusarvoinen kirjoittajan nimi uusille kommenteille

Muuta olemassa olevien kommenttien kirjoittajan nimeä dokumentissa


Vaihda oletusarvoinen kirjoittajan nimi uusille kommenteille

Jos haluat uusissa kommenteissa näkyvän eri kirjoittajan nimen, sinun on vaihdettava käyttäjänimi Wordin asetusten asetuksissa.

  1. Avaa Word-asiakirja ja napsauta "Tiedosto" > "Asetukset".
  2. Siirry "Word Options" -ikkunassa "Yleiset"-välilehteen.
  3. Vaihda nimi "Käyttäjänimi" -ruudussa.
  4. Napsauta "OK" tallentaaksesi muutoksen.
    Käyttäjänimi-ruutu Wordin asetuksissa

Nyt jokainen lisäämäsi uusi kommentti näyttää päivitetyn käyttäjänimen.


Muuta olemassa olevien kommenttien kirjoittajan nimeä dokumentissa

Jos sinulla on asiakirja, jossa on paljon kommentteja ja sinun on päivitettävä tekijöiden nimet kerralla, voit tehdä tämän nopeasti VBA-makron avulla.

  1. Valitse alue, joka sisältää muutettavat kommentit, tai paina "Ctrl + A" valitaksesi koko asiakirjan.
  2. Paina "Alt + F11" avataksesi Microsoft Visual Basic for Applications -ikkunan.
  3. Napsauta VBA-editorissa "Lisää" > "Moduuli". Liitä sitten seuraava VBA-koodi moduuliikkunaan:
    Sub ChangeCommentAuthor()
    'Updated by ExtendOffice 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
  4. Paina "F5" suorittaaksesi makron. Kirjoita näkyviin tulevaan valintaikkunaan uuden tekijän nimi ja napsauta "OK".
    Kommentit Tekijän nimi -valintaikkuna
  5. Kirjoita seuraavaan valintaikkunaan uudet nimikirjaimet ja napsauta "OK".
    Kommenttien nimikirjaimet -valintaikkuna

Kaikkien valitun alueen kommenttien kirjoittajien nimet on nyt päivitetty.

Kommenttien kirjoittajien nimet on muutettu

Parhaat toimiston tuottavuustyökalut

Kutools for Word - Paranna sanakokemustasi Overilla 100 Merkittäviä ominaisuuksia!

🤖 Kutools AI -ominaisuudet: AI-avustaja / Reaaliaikainen avustaja / Super Polish (säilytettävä muoto) / Super Translate (säilytä muoto) / AI editointi / AI Proofread...

📘 Asiakirjan hallinta: Jaa sivut / Yhdistä asiakirjat / Vie valikoima eri muodoissa (PDF/TXT/DOC/HTML...) / Erämuunnos PDF-muotoon...

Sisältö Editointi: Eräetsi ja korvaa useita tiedostoja / Muuta kaikkien kuvien kokoa / Transponoi taulukon rivit ja sarakkeet / Muunna taulukko tekstiksi...

🧹 Vaivaton puhdistus: Pyyhkäise pois Ylimääräiset tilat / Leikkaukset / Tekstilaatikot / Hyperlinkit / Jos haluat lisää irrotustyökaluja, siirry kohtaan poista ryhmä...

Luovat lisäosat: Aseta Tuhat erottimet / Valintaruudut / Radiopainikkeet / QR koodi / Viivakoodi / Useita kuvia / Tutustu lisää osoitteessa liite ryhmä...

🔍 Tarkkuusvalinnat: Tarkka kohta Tietyt sivut / taulukot / Muodot / Otsikko Kappaleet / Paranna navigointia lisää valita piirteet...

Tähtien parannukset: Siirry mihin tahansa sijaintiin / Lisää toistuvaa tekstiä automaattisesti / Vaihda asiakirjaikkunoiden välillä / 11 Muuntaminen Työkalut...

Kutools- ja Kutools Plus -välilehdet Word Ribbonissa
???? Haluatko kokeilla näitä ominaisuuksia? Lataa Kutools for Word nyt! 🚀
 

Parhaat toimiston tuottavuustyökalut

Kutools for Word - Yli 100 Wordin työkalua