Note: The other languages of the website are Google-translated. Back to English

Hvordan ændres størrelsen på alle / flere billeder i Word?

Når vi kopierer eller importerer billeder fra internettet eller andre filer, kan størrelsen på billederne være forskellig. Alle ved, hvordan man ændrer størrelse på billeder en efter en, men hvis vi vil ændre størrelsen på dem i samme størrelse på én gang, hvordan kan vi gøre det? Denne vejledning viser dig flere metoder til at ændre størrelse på billeder.

Ændr størrelsen på billeder manuelt i Word

Ændr størrelsen på billeder med VBA

Ændr størrelsen på flere billeder på én gang med Kutools til Word


Ændr størrelsen på billeder manuelt i Word

1. For at vise billedets størrelsehåndtag ved at klikke på billedet;

2. Sæt markøren på et af billedets størrelsesgreb.

3. Træk i størrelseshåndtaget, indtil billedstørrelsen passer til dine behov. Se skærmbillede:

doc justere billeder 1

Bemærk: Med denne metode kan du ikke ændre størrelsen på flere billeder på én gang. Du skal ændre størrelsen på dem en efter en, indtil størrelsen på alle billeder ændres.


Ændr størrelsen på billeder med VBA

Med følgende VBA-kode kan du ændre størrelsen på billederne til din ideelle størrelse. Du kan få det gjort som følger :

I dette eksempel ændrer vi størrelsen på billedstørrelsen til 1.78 tommer højde og 3.17 tommer bredde.

1. Vælg et billede, du vil ændre størrelsen;

2. Trykke Alt + F11 at åbne Microsoft Visual Basic til applikationer vindue;

3. Klik Moduler fra indsatte fanen, kopier og indsæt følgende VBA-kode i Moduler vindue;

VBA-kode: Ændr størrelsen på et billede til en bestemt størrelse:

Sub ResizePics()
Dim shp As Word.Shape
Dim ishp As Word.InlineShape
If Word.Selection.Type <> wdSelectionInlineShape And _
Word.Selection.Type <> wdSelectionShape Then
Exit Sub
End If
If Word.Selection.Type = wdSelectionInlineShape Then
Set ishp = Word.Selection.Range.InlineShapes(1)
ishp.LockAspectRatio = False
ishp.Height = InchesToPoints(1.78)
ishp.Width = InchesToPoints(3.17)
Else
If Word.Selection.Type = wdSelectionShape Then
Set shp = Word.Selection.ShapeRange(1)
shp.LockAspectRatio = False
shp.Height = InchesToPoints(1.78)
shp.Width = InchesToPoints(3.17)
End If
End If
End Sub

4. Klik på Kør knappen eller F5 for at køre VBA-koden, og det valgte billede er blevet ændret til din behovsstørrelse.

Bemærk: I ovenstående kode,  I shp.Height = InchesToPoints (1.78) og shp.Width = InchesToPoints (3.17) er billedets højde og bredde, kan du ændre størrelsen for at imødekomme dit behov.

Med denne VBA-kode kan du heller ikke ændre størrelsen på hele eller flere billeder på én gang. Du skal gå frem og tilbage mellem Word-dokumentet og Microsoft Visual Basic til applikationer vindue for at vælge billedet og anvende koden. Det er for tidskrævende.


Ændr størrelsen på billeder med Kutools til Word

Med Kutools til Word 's Ændre størrelse på billeder værktøj, kan du slippe af med de irriterende og tidskrævende operationer og hurtigt ændre størrelsen på alle billeder fra dit dokument.

Kutools for Word : med mere end 100 praktiske Word-tilføjelsesprogrammer, gratis at prøve uden begrænsning på 60 dage. 

1. Anvend dette værktøj ved at klikke på Kutools Plus > Resize. Se skærmbillede:

2. Hvis du vil ændre størrelsen på alle billeder til en bestemt procentdel af deres oprindelige størrelse, skal du vælge en af ​​de seks procent på rullelisten. Hvis du f.eks. Vil ændre størrelsen på alle billederne til 50% af deres oprindelige størrelse, skal du vælge 50 %. Efter at have klikket 25 %, vil du se, at alle billeder er blevet dimensioneret til 50%. Se skærmbillede:

doc justere billeder 3

Hvis du vil justere alle billeder til samme størrelse med en valgt, skal du vælge et billede som modelstørrelse og derefter klikke på Kutools Plus > Resize > Ændr størrelse på billeder med markering, og alle billeder bliver ændret i samme størrelse baseret på den valgte, se skærmbillede:

doc justere billeder 4

For mere detaljeret information om Kutools for Word's Ændre størrelse på billeder værktøj, skal du klikke her.

Klik for at downloade Kutools til Word og gratis prøveversion nu!


Demo: Ændr størrelsen på alle billeder på én gang i Word

Kutools for Word: med mere end 100 praktiske Word-tilføjelsesprogrammer, gratis at prøve uden begrænsning på 60 dage. Download og gratis prøveversion nu!


Anbefalede Word-produktivitetsværktøjer

 

Kutools til Word - Mere end 100 avancerede funktioner til Word, spar din 50% tid

  • Komplicerede og gentagne operationer kan udføres engangsbehandling på få sekunder.
  • Indsæt flere billeder på tværs af mapper i Word-dokumentet på én gang.
  • Flet og kombiner flere Word-filer på tværs af mapper i en med den ønskede rækkefølge.
  • Opdel det aktuelle dokument i separate dokumenter efter overskrift, sektionsskift eller andre kriterier.
  • Konverter filer mellem Doc og Docx, Docx og PDF, samling af værktøjer til almindelige konverteringer og markering osv. ...
Sorter kommentarer efter
Kommentarer (6)
Ingen vurderinger endnu. Vær den første til at bedømme!
Denne kommentar blev minimeret af moderatoren på webstedet
spar dine penge og kør denne makro: Kredit til Dave Sub resizeimages() Dim i As Long With ActiveDocument For i = 1 Til .InlineShapes.Count With .InlineShapes(i) .ScaleHeight = 60 .ScaleWidth = 60 End With Next i End With Slut Sub
E
Denne kommentar blev minimeret af moderatoren på webstedet
spar dine penge og kør denne makro: Kredit til Dave Sub resizeimages() Dim i As Long With ActiveDocument For i = 1 Til .InlineShapes.Tæl med .InlineShapes(i) .ScaleHeight = 60 .ScaleWidth = 60 End With Next i End Med End Sub Fremragende!!! Du sparede mine penge og min tid. Mange tak!
Rosa
Denne kommentar blev minimeret af moderatoren på webstedet
Hvor har jeg lagt denne kode?
Luiz
Denne kommentar blev minimeret af moderatoren på webstedet
Er der nogen, der ved, om en billedpladsholder/dropper/automatisk størrelsesfunktion er tilgængelig i Windows 365? Ingen anelse om, hvor man skal lede eller finde hjælp til dette, da Microsofts chathjælp var SÅ lidet nyttig. Ethvert tip ville blive meget værdsat.
Nik
Denne kommentar blev minimeret af moderatoren på webstedet
Jeg skal ændre størrelsen på alle billeder i et word-dokument til den samme bredde, men ikke deformere billederne. så skaler dem til samme bredde. Er dette muligt gennem en makro?
Michael
Denne kommentar blev minimeret af moderatoren på webstedet
Hvis du gemmer dit dokument som .docx, så vil du være i stand til at åbne det som zip-arkiv. Der vil være mediemappe med alle billeder (min havde PNG-billeder). Du kan derefter bruge programmer som IrfanView, XnViewMP, FastStone Viewer til at udføre batch-transformationer som at ændre størrelse, reducere farvedybden osv. Pak dine billeder tilbage i zip og omdøb det til docx. For eksempel, i min docx fuld af skærmbilleder, var jeg nødt til at reducere antallet af farver til 8, hvilket er nok til dokumentationsformål. Efter at have behandlet mit 10MB doc blev 1.8MB doc, så besparelser kan være betydelige. Gem altid din originale docx, hvis du vil gendanne billeder efter for meget nedbrydning/behandling osv.
bravomail
Der er endnu ingen kommentarer her
Efterlad dine kommentarer
Sender som gæst
×
Bedøm dette indlæg:
0  Tegn
Foreslåede steder