Բաց թողնել հիմնական բովանդակությունը

Ինչպե՞ս փոխկապակցված բոլոր պատկերները վերափոխել 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 ծածկագիրը գործելու համար:

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

Գրասենյակի արտադրողականության լավագույն գործիքները

Kutools բառի համար - Բարձրացրեք ձեր բառի փորձը Over-ի հետ 100 Ուշագրավ առանձնահատկություններ!

Սուզվեք ստորև նշված ընդգծված հատկանիշների մեջ կամ սեղմեք այստեղ՝ ուսումնասիրելու Kutools-ի ամբողջական հզորությունը Word-ի համար.

📘 Փաստաթղթերի տիրապետում: Էջերի բաժանում  /  Միաձուլեք փաստաթղթերը  /  Արտահանել ընտրություն տարբեր ձևաչափերով (PDF/TXT/DOC/XLSX)  /  Խմբաքանակի փոխակերպում PDF-ի  /  Արտահանել էջերը որպես պատկերներ  /  Միանգամից մի քանի ֆայլ տպեք ...

Բովանդակության խմբագրում: Խմբաքանակի որոնում և փոխարինում Բազմաթիվ Ֆայլերի միջով   /  Չափափոխել բոլոր նկարները   /  Փոխադրել աղյուսակի տողերը և սյունակները  /  Աղյուսակը տեքստի վերափոխել ...

🧹 Անհեշտ մաքրությունՀեռացրու Լրացուցիչ տարածքներ  /  Բաժնի ընդմիջումներ  /   Բոլոր վերնագրերը  /  Տեքստային տուփեր  /  Hyperlinks  /  Հեռացման լրացուցիչ գործիքների համար այցելեք մեր Հեռացնել խումբը

Ստեղծագործական ներդիրներ: Տեղադրել Հազար բաժանիչներ  /  Նշեք վանդակները  /  Ռադիո կոճակներ  /  QR Code  /  Շտրիխ կոդ  /  Անկյունագծային աղյուսակ  /  Հավասարության վերնագիր  /  Նկարի վերնագիր  /  Աղյուսակի վերնագիր  /  Բազմաթիվ նկարներ  /  Բացահայտեք ավելին մեր Insert Group-ում

🔍 Ճշգրիտ ընտրանքներ: Նշեք կոնկրետ էջեր  /  սեղաններ  /  ձեւավորում  /  վերնագրի պարբերություններ  /  Հեշտությամբ նավարկեք՝ օգտագործելով մեր Ընտրել խումբը

Աստղերի բարելավումներ: Արագ նավարկեք ցանկացած վայր  /  կրկնվող տեքստի ավտոմատ տեղադրում  /  անխափան անցում փաստաթղթի պատուհանների միջև  /  11 Փոխակերպման գործիքներ ...

Փոխակերպեք ձեր Word-ի առաջադրանքները Kutools-ով: 👉 Ներբեռնեք հիմա 30-օրյա փորձաշրջանով 🚀.

 
Comments (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Thanks, exactly what I was looking for.Chris.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations