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 Sub

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