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

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

Danas nije neobično imati mnogo slika umetnutih u Word dokument. Ipak, ponekad te slike treba postaviti u istoj veličini. I obično je umetnuta slika u stilu prelamanja "U skladu s tekstom", što znači da ih ne možemo odabrati sve 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 bi vam mogla biti od 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 gumb sa strelicom prema dolje u grupi "Veličina" pod karticom "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 slike" i "U odnosu na izvornu veličinu slike" u dijelu "Skala".
5. Na kraju kliknite "OK".
6. Zatim kliknite na drugu sliku i pritisnite “F4”. Vidjet ćete da je druga slika sada iste veličine kao i prethodna. “F4” ovdje može ponoviti posljednju radnju.

Metoda 2: Koristite VBA kodove

Općenito govoreći, metoda 1 već vam 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 uzeti pomoć VBA kodova kako biste završili zadatak jednom zauvijek.

1. Za početak kliknite karticu "Razvojni programer".
2. Zatim kliknite “Visual Basic” u grupi “Kôd” ili pritisnite “Alt+ F11” da otvorite VBA editor.
3. Zatim kliknite "Normalno".
4. Pritisnite "Umetni".
5. I odaberite "Modul".
6. Zatim dvaput kliknite na novi modul da biste otvorili 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 gumb "Pokreni".

Napomene:

1. Možete promijeniti vrijednosti u kodovima “objInlineShape.Height = 500” i “objInlineShape.Width = 500” jer trebate promijeniti visinu i širinu slika u stilu omatanja “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 omatanja “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 izbjegavanje umetanja 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 se nećete morati brinuti o gubitku važne datoteke.

Uvod za autora:

Vera Chen stručnjakinja je za oporavak podataka u DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući xlsx alat za popravak pogreške u podacima i pdf popraviti softverske proizvode. Za više informacija posjetite www.datanumen.com