Sut i drosi'r holl ddelweddau cysylltiedig yn rhan annatod o ddogfen Word?
Pan anfonwch ddogfen Word sy'n cynnwys delweddau cysylltiedig ag eraill, bydd y delweddau ar goll ac yn cael eu harddangos yng nghyfrifiadur y derbynnydd fel y dangosir y llun isod. Sut i drosi'r holl ddelweddau cysylltiedig yn wreiddio ar unwaith cyn eu hanfon at eraill? Mae'r erthygl hon yn darparu dull VBA i ddelio ag ef.
Trosi delweddau cysylltiedig yn rhan annatod o god VBA
Trosi delweddau cysylltiedig yn rhan annatod o god VBA
Defnyddiwch y cod VBA isod i drosi'r holl ddelweddau cysylltiedig mewn dogfen i'w hymgorffori.
1. Mae agor y ddogfen Word yn cynnwys delweddau cysylltiedig y byddwch chi'n eu trosi i ddelweddau wedi'u hymgorffori. Pwyswch y Alt + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.
2. Yn y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr, cliciwch Mewnosod > Modiwl. Ac yna copïwch isod god VBA i mewn i'r Modiwlau ffenestr. Gweler y screenshot:
Cod VBA: Trosi pob delwedd gysylltiedig yn wreiddio ar unwaith
Sub convert_all_inline_shapes()
'Updated by Extendoffice 20180906
Dim xIShape As InlineShape
For Each xIShape In ActiveDocument.InlineShapes
With xIShape
If .Type = wdInlineShapeLinkedPicture Then
.LinkFormat.SavePictureWithDocument = True
.LinkFormat.BreakLink
End If
End With
Next
End Sub3. Gwasgwch y F5 allwedd i redeg y cod.
Yna mae'r holl ddelweddau cysylltiedig yn y ddogfen gyfredol yn cael eu trosi i rai wedi'u hymgorffori ar yr un pryd.
Offer Cynhyrchiant Swyddfa Gorau
Kutools am Word - Dyrchafu Eich Profiad Word gyda Dros 100 Nodweddion Rhyfeddol!
🤖 Nodweddion Kutools AI: Cynhyrchu Cynnwys / Ailysgrifennu Testun / Dogfen Holi ac Ateb / Cael Atebion Cyflym / Cyfieithu dogfennau / Dogfen Bwyleg (Fformat Cadw)...
📘 Meistrolaeth Dogfen: Tudalennau Hollti / Uno Dogfennau / Dewis Allforio mewn Fformatau Amrywiol (PDF/TXT/DOC/HTML...) / Trosi swp i PDF...
✏ Golygu Cynnwys: Darganfod Swp ac Amnewid ar draws Ffeiliau Lluosog / Newid Maint Pob Llun / Trawsosod Rhesi Bwrdd a Cholofnau / Trosi Tabl i Testun...
🧹 Ymdrech Glân: swap i ffwrdd Mannau Ychwanegol / Toriadau Adran / Blychau Testun / hypergysylltiadau / Am fwy o offer tynnu, ewch i'r Dileu grŵp...
➕ Mewnosodiadau Creadigol: mewnosod Mil o Wahanwyr / Blychau Gwirio / Botymau Radio / Cod QR / Cod Bar / Lluniau Lluosog / Darganfod mwy yn y Mewnosod grŵp...
🔍 Detholiadau Manwl: pinbwynt Tudalennau Penodol / Tablau / Siapiau / Pennawd Paragraffau / Gwella llywio gyda mwy dewiswch Nodweddion...
⭐ Gwelliannau Seren: Llywiwch i Unrhyw Leoliad / Awto-Mewnosod Testun Ailadroddus / Toglo Rhwng Windows Document / 11 Trosi offer...
Offer Cynhyrchiant Swyddfa Gorau
Kutools am Word - 100+ Offer ar gyfer Word
- 🤖 Nodweddion Kutools AI: cynhyrchu, Ailysgrifennu, Crynhowch, cyfieithu Dogfennau / Cael Atebion Cyflym / Dogfen Bwyleg (Fformat Cadw)
- 📘 Meistrolaeth Dogfen: Tudalennau Hollti / Uno Dogfennau / Trosi swp i PDF
- ✏ Golygu Cynnwys: Swp Dod o Hyd i ac Amnewid / Newid Maint Pob Llun
- 🧹 Ymdrech Glân: Tynnwch Fannau Ychwanegol / Dileu Toriadau Adran
- ➕ Mewnosodiadau Creadigol: Mewnosod Mil o Wahanwyr / Mewnosod Blychau Gwirio / Creu Codau QR