2 metode za brzu promjenu veličine slika u vašem Word dokumentu

U ovom članku ćemo vam pokazati kako brzo promijeniti veličinu više slika u Word dokumentu kako biste ispunili određene zahtjeve.

Danas nije neobično imati mnogo slika umetnutih u Word dokument. Ipak, ponekad ove slike treba postaviti u istoj veličini. I normalno, umetnuta slika je u stilu prelamanja “U skladu sa tekstom”, što znači da ih ne možemo sve odabrati u isto vrijeme. Stoga podešavanje veličine slike može biti dugotrajno čak i kada ih ima samo nekoliko.

Slijede 2 brza načina koja vam mogu pomoći.

Metoda 1: Koristite “F4”

1. Prvo i najvažnije, dvaput kliknite na sliku da biste ušli u način uređivanja.
2. Drugo, kliknite na dugme sa strelicom nadole u grupi „Veličina“ na kartici „Format“ da biste otvorili dijaloški okvir „Izgled“.
3. U otvorenom dijaloškom okviru, prvo promijenite visinu i širinu prema potrebi.
4. Zatim poništite okvire “Zaključaj omjer širine i visine” i “Relativno na originalnu veličinu slike” u dijelu “Scale”.
5. Na kraju, kliknite na “OK”.
6. Zatim kliknite na drugu sliku i pritisnite “F4”. Vidjet ćete da je druga slika sada u istoj veličini kao i prethodna. “F4” ovdje može ponoviti posljednju radnju.

Metod 2: Koristite VBA kodove

Uopšteno govoreći, metoda 1 vam već može uštedjeti mnogo vremena. Međutim, u slučaju da vam je dosadno i dosadno kliknuti na sliku i pritisnuti tipku “F4”, možete iskoristiti pomoć VBA kodova da završite zadatak jednom za svagda.

1. Za početak, kliknite na karticu "Programer".
2. Zatim kliknite na "Visual Basic" u grupi "Kod" ili pritisnite "Alt+ F11" da otvorite VBA editor.
3. Zatim kliknite na "Normalno".
4. Kliknite na “Insert”.
5. I odaberite “Module”.
6. Zatim dvaput kliknite na novi modul da otvorite područje za uređivanje.
7. Tamo zalijepite sljedeće kodove:

Sub SetupAllPictureSize()
  Dim objInlineShape As InlineShape
  Dim objShape As Shape
    
  For Each objInlineShape In ActiveDocument.InlineShapes
    objInlineShape.Height = 500
    objInlineShape.Width = 500
  Next objInlineShape

  For Each objShape In ActiveDocument.Shapes
    objShape.Height = 500
    objShape.Width = 500
  Next objShape
End Sub

8. Na kraju, pritisnite dugme "Run".

Napomene:

1. Možete promijeniti vrijednosti u kodovima “objInlineShape.Height = 500” i “objInlineShape.Width = 500” jer trebate promijeniti visinu i širinu slika u stilu prelamanja “U skladu s tekstom”.
2. Možete promijeniti vrijednosti u kodovima “objShape.Height = 500” i “objShape.Width = 500” da biste promijenili visinu i širinu slika koje nisu u stilu prelamanja “U skladu s tekstom”.

Riješite probleme s dokumentima

Word dokument koji sadrži previše slika ne samo da može usporiti brzinu obrade već i uzrokovati oštećenje dokumenta. Jedan od načina je da izbjegnete umetanje previše slika u Word datoteku kako se ne biste susreli s takvim problemom. Drugi način je, međutim, dobiti a docx alat za rješavanje problema unaprijed, tako da nećete morati da brinete o gubitku važne datoteke.

Uvod za autora:

Vera Chen je stručnjak za oporavak podataka DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući xlsx alat za popravku grešaka u podacima i pdf popravak softverskih proizvoda. Za više informacija posjetite www.datanumen.com