Conas ainm an údair a athrú le haghaidh tráchtaireachta i Word
Tá an t-alt seo ag caint ar ainm an údair réamhshocraithe a athrú le haghaidh tuairimí, nó ainm an údair atá ann cheana a athrú i ndoiciméad go ceann nua. Bain triail as an dá mhodh thíos le do thoil.
Athraigh ainm údair na dtuairimí le húsáid sa todhchaí
Athraigh ainm údair an doiciméid atá sna tuairimí atá ann cheana
Athraigh ainm údair na dtuairimí le húsáid sa todhchaí
Más mian leat ainm údair an trácht a athrú le húsáid sa todhchaí, athraigh an fhuinneog Ainm Úsáideora i Word Options le do thoil.
1. I ndoiciméad Word oscailte, cliceáil Comhad > Roghanna. Sa an Roghanna Word fuinneog, déan cinnte go bhfuil tú ag lonnú sa Go ginearálta cluaisín, athraigh an t-ainm sa Ainm Úsáideora bosca mar a thaispeántar thíos an scáileán, agus cliceáil ar deireadh OK cnaipe.
Anois tá an t-ainm úsáideora réamhshocraithe athraithe agat le haghaidh tuairimí i ndoiciméad Word.
Athraigh ainm údair an doiciméid atá sna tuairimí atá ann cheana
Má tá doiciméad faighte agat le go leor tuairimí, agus gur mhaith leat ainmneacha údair na dtuairimí go léir a athrú go ceann áirithe, déanfaidh an cód VBA seo a leanas bhfabhar duit.
1. Roghnaigh an raon ina bhfuil tráchtanna nó roghnaigh an doiciméad iomlán athróidh tú ainmneacha na n-údar trí bhrú ar an Ctrl + A eochracha, brúigh an Eile + F11 eochracha a oscailt Microsoft Visual Basic d’Fheidhmchláir fhuinneog.
2. San oscailt Microsoft Visual Basic d’Fheidhmchláir fuinneog, cliceáil Ionsáigh > Modúil. Ansin cóipeáil thíos cód VBA isteach i bhfuinneog an Mhodúil.
Cód VBA: Athraigh ainm údair an doiciméid atá ann cheana féin
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. Brúigh an F5 eochair chun an cód a rith. San oscailt Nótaí Ainm an Údair bosca dialóige, cuir ainm an údair nua isteach sa bhosca téacs agus cliceáil ar an OK cnaipe.
4. Sa chéad oscailt eile Túslitreacha tosaigh bosca dialóige, iontráil na ceannlitreacha de réir mar is gá duit agus cliceáil ar an OK cnaipe.
Ansin athraítear ainmneacha údair na dtuairimí uile sa raon roghnaithe go dtí an ceann sonraithe díreach mar atá thíos an pictiúr a thaispeántar.
Uirlisí Táirgiúlachta Oifige is Fearr
Kutools le haghaidh Word - Elevate Your Word Experience with Over 100 Gnéithe Suntasacha!
🤖 Cúntóir Kutools AI: athraigh do chuid scríbhinn le AI - Gin Ábhar / Athscríobh Téacs / Déan achoimre ar Dhoiciméid / Fiosraigh le haghaidh Faisnéise bunaithe ar Doiciméad, ar fad laistigh de Word
📘 Máistreacht Doiciméad: Leathanaigh Scoilte / Cumaisc Doiciméid / Roghnú Easpórtála i bhFormáidí Éagsúla (PDF/TXT/DOC/HTML...) / Baisc a thiontú go PDF / Easpórtáil Leathanaigh mar Íomhánna / Priontáil Comhaid Il ag an am céanna...
✏ Eagarthóireacht na nÁbhar: Faigh Baisc agus Ionadaigh thar Chomhaid Il / Athraigh Méid Gach Pictiúr / Trasnaigh Rónna Tábla agus Colúin / Tiontaigh Tábla go Téacs...
🧹 Effortless Glan: Sguab as Spásanna Breise / Sosanna Alt / Gach Ceanntásca / Boscaí Téacs / Hipearnasc / Le haghaidh tuilleadh uirlisí a bhaint, ceann chuig ár Bain Grúpa...
➕ Ionsáigh Cruthaitheach: cuir isteach Míle Deighilteoir / Boscaí Seiceála / Cnaipí Raidió / Cód QR / barcode / Tábla Líne Trasnánach / Fotheideal Cothromóid / Fotheideal Íomhá / Fotheideal Tábla / Pictiúir Il / Faigh amach níos mó sa Cuir isteach Grúpa...
🔍 Roghanna Beachtais: Pionta leathanaigh ar leith / táblaí / cruthanna / míreanna ceannteideal / Feabhsaigh an loingseoireacht le níos mó Roghnaigh gnéithe...
⭐ Feabhsuithe Réalta: Déan nascleanúint go tapa chuig aon láthair / cuir isteach téacs athchleachtach go huathoibríoch / scoránaigh gan uaim idir fuinneoga doiciméad / 11 Uirlisí Tiontaithe...