Word-kommenteissa näkyvän tekijän nimen muuttaminen
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.
- Avaa Word-asiakirja ja napsauta "Tiedosto" > "Asetukset".
- Siirry "Word Options" -ikkunassa "Yleiset"-välilehteen.
- Vaihda nimi "Käyttäjänimi" -ruudussa.
- Napsauta "OK" tallentaaksesi muutoksen.
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.
- Valitse alue, joka sisältää muutettavat kommentit, tai paina "Ctrl + A" valitaksesi koko asiakirjan.
- Paina "Alt + F11" avataksesi Microsoft Visual Basic for Applications -ikkunan.
- 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
- Paina "F5" suorittaaksesi makron. Kirjoita näkyviin tulevaan valintaikkunaan uuden tekijän nimi ja napsauta "OK".
- Kirjoita seuraavaan valintaikkunaan uudet nimikirjaimet ja napsauta "OK".
Kaikkien valitun alueen kommenttien kirjoittajien nimet on nyt päivitetty.

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...

Parhaat toimiston tuottavuustyökalut
Kutools for Word - Yli 100 Wordin työkalua
- 🤖 Kutools AI -ominaisuudet: AI-avustaja / Reaaliaikainen avustaja / Super puolalainen / Super käännös / AI editointi / AI Proofread
- 📘 Asiakirjan hallinta: Jaa sivut / Yhdistä asiakirjat / Erämuunnos PDF-muotoon
- ✏ Sisältö Editointi: Erä Etsi ja korvaa / Muuta kaikkien kuvien kokoa
- 🧹 Vaivaton puhdistus: Poista ylimääräiset välilyönnit / Poista osion katkokset
- ➕ Luovat lisäosat: Aseta Tuhat erottimet / Lisää valintaruudut / Luo QR-koodeja