Ինչպե՞ս փոխկապակցված բոլոր պատկերները վերափոխել Word փաստաթղթում տեղադրվածի:

Երբ Word փաստաթուղթ եք ուղարկում կապակցված պատկերներ ուրիշներին, պատկերները բացակայում են և ցուցադրվում են ստացողի համակարգչում, ինչպես ցույց է տրված նկարում: Ինչպե՞ս փոխարկել բոլոր կապակցված պատկերները միանգամից ներկառուցված ՝ նախքան ուրիշներին ուղարկելը: Այս հոդվածը տալիս է VBA մեթոդ ՝ դրանով զբաղվելու համար:

Կապված պատկերները փոխակերպեք VBA կոդով ներկառուցվածի

Կապված պատկերները փոխակերպեք VBA կոդով ներկառուցվածի

Խնդրում ենք կիրառել ստորև նշված VBA կոդը `փաստաթղթում առկա բոլոր կապակցված պատկերները փաստաթղթում ներկառուցված փոխարկելու համար:

1. Բացեք Word փաստաթուղթը պարունակում է կապված պատկերներ, որոնք կվերածեք ներկառուցված պատկերների: Սեղմեք ալտ + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.

2. Մեջ Microsoft Visual Basic հավելվածների համար պատուհանը, սեղմեք Տեղադրել > Մոդուլ. Եվ այնուհետև VBA կոդը ներքևում պատճենեք այն Մոդուլներ պատուհան Տեսեք,

VBA կոդ. Բոլոր կապակցված պատկերները միանգամից վերափոխեք ներկառուցվածի

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. Սեղմեք F5 ծածկագիրը գործելու համար:

Այնուհետև ընթացիկ փաստաթղթում առկա բոլոր կապակցված պատկերները միաժամանակ վերափոխվում են ներկառուցվածի:

Բառի արտադրողականության առաջարկվող գործիքներ