Conas tuairimí a thiontú go fonótaí nó fonótaí i Microsoft Word?
Údar: Siluvia Athraithe Deiridh: 2024-08-29
Má ghlactar leis go bhfuil iliomad tráchtanna i do dhoiciméad Word, conas is féidir leat na tráchtanna seo go léir a thiontú go fonótaí nó fonótaí ag an am céanna? Soláthraíonn an t-alt seo modhanna VBA chun é a bhaint amach.
Tiontaigh tráchtanna go fonótaí nó fonótaí le cód VBA
Tiontaigh tráchtanna go fonótaí nó fonótaí le cód VBA
Is féidir leis na cóid VBA thíos cabhrú leat gach trácht sa doiciméad reatha a thiontú go fonótaí nó fonótaí. Déan mar a leanas le do thoil.
1. Oscail an doiciméad tá tráchtanna a athróidh tú go fonótaí nó fonótaí, brúigh an Eile + F11 eochracha a oscailt Microsoft Visual Basic d’Fheidhmchláir fhuinneog.
2. Sa Microsoft Visual Basic d’Fheidhmchláir fuinneog, cliceáil Ionsáigh > Modúl. Ansin cóipeáil thíos cód VBA isteach i bhfuinneog an Mhodúil.
Cód VBA: Tiontaigh tráchtanna go fonótaí:
Sub ConvertCommentsToFootnotes()
Dim xComm As Comment
Dim xCommRange As Range
Dim xDoc As Document
Application.ScreenUpdating = False
Set xDoc = ActiveDocument
For Each xComm In xDoc.Comments
Set xCommRange = xComm.Range
xDoc.Footnotes.Add xComm.Scope, , xCommRange.Text
xComm.Delete
Next
Application.ScreenUpdating = True
End Sub
Cód VBA: Tiontaigh tráchtanna go fonótaí:
Sub ConvertCommentsToEndnotes()
Dim xComm As Comment
Dim xCommRange As Range
Dim xDoc As Document
Application.ScreenUpdating = False
Set xDoc = ActiveDocument
For Each xComm In xDoc.Comments
Set xCommRange = xComm.Range
xDoc.Endnotes.Add xComm.Scope, , xCommRange.Text
xComm.Delete
Next
Application.ScreenUpdating = True
End Sub
3. Brúigh an F5 eochair chun an cód a rith.
Ansin athraítear gach trácht sa doiciméad reatha go fonótaí nó fonótaí bunaithe ar an gcód VBA a chuir tú i bhfeidhm.
Earraí gaolmhara:
Déan Níos mó i Níos Lú Ama le Kutools Feabhsaithe AI le haghaidh Word
Ní hamháin sraith uirlisí é Kutools for Word - is réiteach cliste é atá deartha chun do tháirgiúlacht a threisiú. Le cumais AI-tiomáinte agus na gnéithe is bunriachtanach, cuidíonn Kutools leat níos mó a dhéanamh i níos lú ama:
- Gin ábhar a oireann go foirfe do do chuid riachtanas.
- Déan do chuid scríbhneoireachta a athrú le breis agus 20 stíl scríbhneoireachta, ag cinntiú go bhfuil sé gan smál.
- Déan achoimre ar do dhoiciméad i cliceáil amháin.
- Aistrigh d’inneachar go níos mó ná 40 teanga gan stró, ag cur le do rochtain ar fud an domhain.
- Faigh cabhair agus faisnéis láithreach faoi do dhoiciméad.
- Iarr ar phróiseáil doiciméad, agus má tá an uirlis ag Kutools, déanfaidh Cúntóir AI do thasc a fhorghníomhú láithreach ar do ordú, ag cur cumhacht iomlán Word ar do mhéara.
- Iarr ar aon cheist gan Word a fhágáil - comhtháite gan uaim, tá an Cúntóir AI i gcónaí laistigh de bhaint amach.
- Gin, athscríobh, achoimre, agus aistrigh inneachar le cad a tharlaíonn.
- Faigh cabhair agus faisnéis láithreach faoi do dhoiciméad.
- Iarr ar phróiseáil doiciméad, agus cuirfidh an Cúntóir AI an uirlis cheart i láthair agus déanfaidh sé an tasc, nó tabharfaidh sé treoir duit trí na céimeanna.
- Iarr ar aon cheist gan Word a fhágáil - comhtháite gan uaim, tá an Cúntóir AI i gcónaí laistigh de bhaint amach.
Foghlaim tuilleadh faoi Kutools le haghaidh Word Íosluchtaigh Anois
Uirlisí Táirgiúlachta Oifige is Fearr
Kutools le haghaidh Word - 100+ Uirlisí le haghaidh Word
