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

Ինչպե՞ս կտտացնել ՝ Word փաստաթղթում պատկերը մեծացնելու կամ ընդլայնելու համար:

Այս հոդվածում խոսվում է այն մասին, թե ինչպես մեծացնել կամ ընդլայնել պատկերները Word փաստաթղթում մկնիկի կտտոցով:

Կտտացրեք պատկերը մեծացնելու կամ ընդլայնելու համար VBA կոդով

Փոխեք պատկերները Kutools- ի համար Word- ի համար


Կտտացրեք պատկերը մեծացնելու կամ ընդլայնելու համար VBA կոդով

Հաջորդ VBA կոդը կարող է օգնել կտտացնելով մեծացնել պատկերները Word փաստաթղթում: Խնդրում եմ արեք հետևյալ կերպ.

1. Փաստաթղթում պարունակվող պատկերները կտտոցով մեծացնող կտտոցով կտտացրեք ալտ + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.

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

VBA կոդ 1. Կտտացրեք պատկերները մեծացնելու համար

Public WithEvents GApp As Word.Application
'Updated by ExtendOffice 20181129
Private Sub GApp_WindowSelectionChange(ByVal Sel As Selection)
    Dim xShape As InlineShape
    On Error Resume Next
    Set xShape = Sel.InlineShapes(1)
    xShape.Height = 200
    xShape.Width = 200
End Sub

ՆշումԿոդում 200 թիվը ընդլայնված պատկերների նշված բարձրությունն ու լայնությունն է: Կարող եք փոխել բարձրությունն ու լայնությունը ՝ ըստ ձեզ:

3: սեղմեք Տեղադրել > Մոդուլներ, պատճենեք ներքևի կոդը Մոդուլի պատուհանում:

VBA կոդ 2. Կտտացրեք պատկերները մեծացնելու համար

Dim cls As New Class1
'Updated by ExtendOffice 20181129
Sub register_Event_Handler()
    Set cls.GApp = Word.Application
End Sub

4. Սեղմեք F5 ծածկագիրը գործարկելու և փակելու բանալին Microsoft Visual Basic հավելվածների համար պատուհան.

Այժմ, այս ֆայլի նկարը կտտացնելիս, պատկերն ընդլայնվելու է ըստ ձեր ուզած չափի:


Փոխեք պատկերները Kutools- ի համար Word- ի համար

The Պատկերները չափափոխել օգտակարությունը Kutools բառի համար կարող է օգնել ձեզ բոլոր պատկերները չափափոխել նշված տոկոսով կամ ընտրված պատկերով: Խնդրում ենք փորձել:

Kutools բառի համար ՝ ավելի քան 100 հարմար բառերի հավելումներով, անվճար փորձելու առանց սահմանափակման 60 օր.

Սեղմել Kutools Plus > Փոփոխել, բացվող ցուցակից ընտրեք տոկոս: Տեսեք,

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

Ընտրված նկարի չափի հիման վրա բոլոր պատկերները չափափոխելու համար հարկավոր է նախ ընտրել պատկերը, ապա կտտացնել Kutools Plus > Փոփոխել > Պատկերները չափափոխեք ընտրությամբ, Տեսեք,

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

Եթե ​​ցանկանում եք անվճար օգտվել այս օգտակար ծառայությունից, գնացեք այստեղ անվճար ներբեռնել ծրագրաշարը նախ և ապա անցեք գործողությունը կիրառելու համար ՝ համաձայն վերը նշված քայլերի:


Գրասենյակային ներդիր - Word- ում բազմաթիվ փաստաթղթերի ներդիրներով զննում, խմբագրում և կառավարում.

Office Tab- ը Microsoft Word- ին է բերում ներդիրներով ներդիրը, ինչպես դա երեւում է վեբ զննարկիչներում, ինչպիսիք են Google Chrome- ը, Internet Explorer- ի նոր տարբերակները և Firefox- ը: Այն կամք եղեք ժամանակի խնայող գործիք և անփոխարինելի ձեր աշխատանքում: Տե՛ս ստորև ցուցադրումը.

Կտտացրեք Office Tab- ի անվճար փորձարկման համար:

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

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

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

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

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

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

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

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

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

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

 
Comments (5)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Yeah nice try, but it should really put the enlarged image in a temporary popup, instead of literally resizing the image!
This comment was minimized by the moderator on the site
OK...after clicking to expand, how do you get it to restore back to default size or click to default size?
This comment was minimized by the moderator on the site
It work in older world file, saved as .doc, but opened in MS 365.
This comment was minimized by the moderator on the site
Hi

The macro doesn't work as should. On MS Office 365 the resizing appear only for few mili sec.
This comment was minimized by the moderator on the site
Hi Thanks for the tip. I'm following the instructions on how to enlarge by using Macro, however I'm getting a error message "The type that was defined by user was ot defined" Any idea?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations