How to resize multiple images at once in Ms Word

How to resize multiple images at once in Ms Word

ThinkEasyTV

6 лет назад

148,991 Просмотров

Ссылки и html тэги не поддерживаются


Комментарии:

@ThinkEasyTV
@ThinkEasyTV - 16.04.2020 14:16

*********DON'T FORGET TO SUBSCRIBE FOR MORE UPDATES! *******
How to Resize all Multiple Images/pictures at once in MS Word using VBA code?

Ответить
@mehmetunay
@mehmetunay - 16.10.2023 19:58

WORKED THANKS

Ответить
@gk-jf7us
@gk-jf7us - 18.09.2023 21:59

Thanks a ton !!! U saved my hours

Ответить
@karenmarr7266
@karenmarr7266 - 10.07.2023 20:59

This is brilliant! Thanks so much; I've used these instructions over and over again and saved myself a LOT of time! Thanks.

Ответить
@alexis-sd6pm
@alexis-sd6pm - 04.06.2023 20:32

Wow amazed

Ответить
@AP-vv5ci
@AP-vv5ci - 23.05.2023 12:55

fantastic, you just my 2 hours work finish in 2 minutes. Thank you for sharing this knowledge of yours with us. Really appreciate a lot. Can we also do formatting of the image using this method? Please share the code if possible

Ответить
@sweettomato2023
@sweettomato2023 - 24.04.2023 16:36

thank you very much. love from philippines

Ответить
@lifetolive5149
@lifetolive5149 - 21.03.2023 19:21

better

Ответить
@mirzasheraz6939
@mirzasheraz6939 - 19.02.2023 18:20

Please help me to find code for how to add gap between all images and how to select all images.

Ответить
@adarshjain2467
@adarshjain2467 - 18.02.2023 18:36

thanks a lot 🙂

Ответить
@juniteesports2605
@juniteesports2605 - 07.02.2023 16:22

How about code to disable the lock ratio in picture? Please help

Ответить
@karenmarr7266
@karenmarr7266 - 07.02.2023 01:16

Can I save this module, so it's there in MS Word anytime I want to use it? Thanks very much!!

Ответить
@khanlodhi8601
@khanlodhi8601 - 29.12.2022 15:09

You are amazing, Thank You so much, this really saves lot of time, I was looking for an application as I have to make reports supported by images, Thanks a lot :)

Ответить
@anilagrawal7468
@anilagrawal7468 - 05.11.2022 07:21

Super Like

Ответить
@jwshepard6
@jwshepard6 - 28.10.2022 18:34

Fucking annoying

Ответить
@realworld1626
@realworld1626 - 05.10.2022 19:48

How to change the default photo size
When we insert photo in Ms word it's size is very big , it covers all the page
How to change the default settings so when we insert a photo it's Size automatically insert small
So it will Never cover all the page

Ответить
@adityaanand2613
@adityaanand2613 - 26.09.2022 10:54

Thanks a lot ❤❤

Ответить
@micksleeplate4191
@micksleeplate4191 - 29.08.2022 19:52

really good content

Ответить
@nijin5481
@nijin5481 - 07.08.2022 18:49

Thanks ❣️
Its really helpful 💯

Ответить
@taibeh75
@taibeh75 - 30.07.2022 07:43

Amazing! thanks a lot :) but how can I change the width only with keeping ratio, if possible? Can anyone help please? :x

Ответить
@ShaivVaishnav
@ShaivVaishnav - 23.05.2022 09:54

चरण स्पर्श श्री गुरू माता जी आप महान हो ❤️🙏

Ответить
@sulavmondal7060
@sulavmondal7060 - 22.05.2022 10:31

Thank you.. saved a lot of time and energy

Ответить
@vaksugod3793
@vaksugod3793 - 19.05.2022 19:18

This was very helpful thank you saved me alot of tedious work

Ответить
@gaburieru2615
@gaburieru2615 - 18.05.2022 23:22

Thank you. such a time saver this is!

Ответить
@Simone-zb2bk
@Simone-zb2bk - 12.05.2022 00:08

thank you so fucking much

Ответить
@foxynight1688
@foxynight1688 - 07.04.2022 13:04

i think you should add one more line on your code: the Lock aspect ratio
============================================================
Sub resize()
Dim x As Long
With ActiveDocument
For x = 1 To .InlineShapes.Count
With .InlineShapes(x)
.LockAspectRatio = msoFalse
.Height = InchesToPoints(11)
.Width = InchesToPoints(8)
End With
Next x
End With
End Sub

Ответить
@katewinslet7069
@katewinslet7069 - 23.03.2022 01:32

This save my day for deadlines🥺

Ответить
@ABDULRASHEEDINDIA
@ABDULRASHEEDINDIA - 21.03.2022 12:40

Thanx brother 👍

Ответить
@nadergamalrihan9054
@nadergamalrihan9054 - 17.12.2021 22:12

Amazing, thanks a lot

Ответить
@syazwanijamaluddin1489
@syazwanijamaluddin1489 - 22.09.2021 11:17

how to reset

Ответить
@susy4511
@susy4511 - 13.09.2021 23:17

hank u so much! this really helped me, but i wonder something, is there any way that i can move all pictures at the same time? like when i resize them they are all together with not much space in between, is there any way that i can make some space for each picture but in a batch? because moving one by one it will take me years, like if i want an inch of space or something for picture, do you know how to?, like using this type of automatically actions?

Ответить
@watashifaw
@watashifaw - 15.07.2021 17:44

thankyou so much for this, helps a lot!

Ответить
@tranquil4497
@tranquil4497 - 29.06.2021 19:04

Stupid and lengthy process. There's an already option of size when you right click on the picture and can press F4 every pic will automatically become same size. Don't follow these codes. They are hackers and enter yiur system wjen u copy their code

Ответить
@brijincherian6461
@brijincherian6461 - 30.05.2021 12:27

Thank you so much!!!👍

Ответить
@ramkich2314
@ramkich2314 - 23.05.2021 15:45

Please make a video like this to crop multiple images

Ответить
@transportlogisticsservice2905
@transportlogisticsservice2905 - 19.05.2021 06:43

thanks mam

Ответить
@PriyashaSharma
@PriyashaSharma - 13.02.2021 15:36

Amazing!!❤️

Ответить
@christmassplendor7441
@christmassplendor7441 - 23.01.2021 19:12

Hello...Thanks for this!
BTW I tried it then all images had blank pages after them? And I can’t select multiple images for the lay out- any tips?

Ответить
@henriquetraeselengelmann9419
@henriquetraeselengelmann9419 - 20.01.2021 23:12

Hey dude, that really helped a lot, but I was wondering how could I place a If command to set specific heights and width to imagens with specific sizes. Let me try to show you how it could work, maybe.

Sub resize()

Dim x As Long

With ActiveDocument


For x = 1 To .InlineShapes.Count
With .InlineShapes(x)

"if .Height = 10
then .Height = InchesToPoints(5)
if .Height = 8
then .Height = InchesToPoints(4)
end if
end if"

End With

Next x
End With
End Sub

how could I make it work?

Ответить
@JeweelM
@JeweelM - 18.01.2021 19:10

how if I want them all to rotate right?

Ответить
@venkatramisetti6961
@venkatramisetti6961 - 14.01.2021 07:11

Hello
When I am inserting all images at a time through insert tab In my laptop I am getting image on image even though I dragged it it moved to it placed again.
My question is can we set default size and image after a image …which easy to move to any place very easily? let me share screenshot please give your mail id plz

Ответить
@BOSZJUNGGA
@BOSZJUNGGA - 28.12.2020 17:18

Thank you !!

Ответить
@cupidlucid
@cupidlucid - 29.11.2020 14:55

Is there anyway to handle all tables in a long document? Please guide.

Ответить
@jamiek1714
@jamiek1714 - 21.11.2020 06:53

Thank you very much my friend.
This really works!
I did have a hard time understanding some of the words though.
May God bless you and guide you.

Ответить
@Rin_Chawngthu
@Rin_Chawngthu - 22.09.2020 21:05

which version of ms word is this?

Ответить
@ronakkk2717
@ronakkk2717 - 10.09.2020 18:00

Thank youu

Ответить
@acegikmoqsvwyz7
@acegikmoqsvwyz7 - 04.08.2020 05:55

Thank you - Saved me a lot of time.

Ответить
@danialliaqat9795
@danialliaqat9795 - 23.06.2020 17:03

Did not work for me, only resized first image

Ответить
@ajikoikal1
@ajikoikal1 - 12.06.2020 11:59

I have a question, how to resize all images in a particular page instead of the whole document

Ответить
@viganmarevci754
@viganmarevci754 - 08.06.2020 15:08

Thank you so much! This was great!

Ответить