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

Ինչպե՞ս փոխկապակցված բոլոր պատկերները վերափոխել 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 AI օգնականՓոխակերպեք ձեր գրածը AI-ի միջոցով - Ստեղծեք բովանդակություն  /  Վերաշարադրել տեքստը  /  Ամփոփել փաստաթղթերը  /  Հարցրեք տեղեկատվության համար Փաստաթղթի հիման վրա, բոլորը Word-ի շրջանակներում

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

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

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

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

🔍 Ճշգրիտ ընտրանքներ: Մատնանշել կոնկրետ էջեր  /  սեղաններ  /  ձեւավորում  /  վերնագրի պարբերություններ  / Ընդլայնել նավարկությունը ավելին Ընտրեք հատկանիշներ...

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

???? Ցանկանու՞մ եք փորձել այս հնարավորությունները: Kutools-ը Word-ի համար առաջարկում է ա 60 օր անվճար դատավարություն, առանց սահմանափակումների! 🚀
 
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