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

Hoe kan ik alle / meerdere afbeeldingen in Word verkleinen?

Wanneer we afbeeldingen van internet of andere bestanden kopiëren of importeren, kan de grootte van de afbeeldingen variëren. Iedereen weet hoe we afbeeldingen een voor een moeten verkleinen, maar als we ze in één keer naar hetzelfde formaat willen verkleinen, hoe kunnen we dat dan doen? Deze tutorial laat je verschillende methoden zien om het formaat van afbeeldingen te wijzigen.

Wijzig de grootte van afbeeldingen handmatig in Word

Wijzig het formaat van afbeeldingen met VBA

Wijzig het formaat van meerdere afbeeldingen in één keer met Kutools voor Word


Wijzig de grootte van afbeeldingen handmatig in Word

1. Om de formaatgrepen van de afbeelding te tonen door op de afbeelding te klikken;

2. Plaats de cursor op een van de formaatgrepen van de afbeelding.

3. Versleep de formaatgreep totdat het afbeeldingsformaat geschikt is voor uw behoeften. Zie screenshot:

doc afbeeldingen aanpassen 1

Opmerking:: Met deze methode kunt u het formaat van meerdere afbeeldingen niet in één keer wijzigen. U moet ze een voor een vergroten of verkleinen totdat alle afbeeldingen zijn aangepast.


Wijzig het formaat van afbeeldingen met VBA

Met de volgende VBA-code kunt u het formaat van afbeeldingen wijzigen naar uw ideale formaat. U kunt het als volgt doen:

In dit voorbeeld wijzigen we de grootte van de afbeelding naar 1.78 inch hoogte en 3.17 inch breedte.

1. Selecteer een afbeelding waarvan u de grootte wilt wijzigen;

2. pers Alt + F11 om de te openen Microsoft Visual Basic voor toepassingen venster;

3. Klikken Module van Invoegen tab, kopieer en plak de volgende VBA-code in het Module venster;

VBA-code: verklein één afbeelding naar een specifieke grootte:

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 lopen knop of F5 toets om de VBA-code uit te voeren, en de geselecteerde afbeelding is aangepast aan uw gewenste grootte.

Opmerking:: In de bovenstaande code,  In shp.Height = InchesToPoints (1.78) en shp.Width = InchesToPoints (3.17) zijn de hoogte en breedte van de afbeelding, u kunt de grootte aanpassen aan uw behoefte.

Met deze VBA-code kunt u ook niet het formaat van alle of meerdere afbeeldingen tegelijk wijzigen. U moet heen en weer gaan tussen het Word-document en het Microsoft Visual Basic voor toepassingen venster om de afbeelding te selecteren en de code toe te passen. Dat kost te veel tijd.


Wijzig het formaat van afbeeldingen met Kutools voor Word

met Kutools voor Word 's Wijzig afbeeldingen hulpprogramma, kunt u die vervelende en tijdrovende handelingen uit de weg ruimen en snel het formaat van alle afbeeldingen in uw document wijzigen.

Kutools for Word : met meer dan 100 handige Word-invoegtoepassingen, gratis te proberen zonder beperking in 60 dagen. 

1. Pas dit hulpprogramma toe door op te klikken Kutools Plus > resize. Zie screenshot:

2. Als u het formaat van alle afbeeldingen wilt wijzigen tot een bepaald percentage van hun oorspronkelijke grootte, selecteert u een van de zes percentages uit de vervolgkeuzelijst. Als u bijvoorbeeld het formaat van alle afbeeldingen wilt wijzigen tot 50% van hun oorspronkelijke grootte, selecteert u 50%. Na het klikken 25%, je zult zien dat alle foto's op 50% zijn verkleind. Zie screenshot:

doc afbeeldingen aanpassen 3

Als u alle afbeeldingen op hetzelfde formaat wilt aanpassen met een geselecteerde afbeelding, selecteer dan een afbeelding als modelmaat en klik vervolgens op Kutools Plus > resize > Formaat van afbeeldingen wijzigen met selectie, en alle afbeeldingen zullen dezelfde grootte krijgen op basis van de geselecteerde, zie screenshot:

doc afbeeldingen aanpassen 4

Voor meer gedetailleerde informatie over Kutools for Word's Wijzig afbeeldingen hulpprogramma, klikt u op hier.

Klik om Kutools voor Word en nu gratis uit te proberen!


Demo: wijzig het formaat van alle afbeeldingen tegelijk in Word

Kutools for Word: met meer dan 100 handige Word-invoegtoepassingen, gratis te proberen zonder beperking in 60 dagen. Download en probeer nu gratis!


Aanbevolen Word-productiviteitstools

 

Kutools voor Word - meer dan 100 geavanceerde functies voor Word, bespaar 50% tijd

  • Ingewikkelde en herhaalde bewerkingen kunnen een eenmalige verwerking in seconden worden uitgevoerd.
  • Voeg meerdere afbeeldingen in verschillende mappen tegelijk in een Word-document in.
  • Voeg meerdere Word-bestanden in mappen samen en combineer ze tot één met de door u gewenste volgorde.
  • Splits het huidige document in afzonderlijke documenten op basis van koptekst, sectie-einde of andere criteria.
  • Converteer bestanden tussen Doc en Docx, Docx en PDF, verzameling tools voor algemene conversies en selectie, enzovoort ...
Comments (6)
Nog geen beoordelingen. Beoordeel als eerste!
Deze opmerking is gemaakt door de moderator op de site
bespaar je geld en voer deze macro uit: Met dank aan Dave Sub resizeimages() Dim i As Long With ActiveDocument For i = 1 To .InlineShapes.Count With .InlineShapes(i) .ScaleHeight = 60 .ScaleWidth = 60 End With Next i End With Einde sub
E
Deze opmerking is gemaakt door de moderator op de site
bespaar je geld en voer deze macro uit: Met dank aan Dave Sub resizeimages() Dim i As Long With ActiveDocument For i = 1 To .InlineShapes.C ount With .InlineShapes(i ) .ScaleHeight = 60 .ScaleWidth = 60 End With Next i End Met End Sub Uitmuntend!!! Je hebt mijn geld en mijn tijd bespaard. Heel erg bedankt!
Roze
Deze opmerking is gemaakt door de moderator op de site
Waar plaats ik deze code?
Luiz
Deze opmerking is gemaakt door de moderator op de site
Weet iemand of er een functie voor tijdelijke aanduiding voor afbeeldingen/dropper/automatische grootte beschikbaar is in Windows 365? Geen idee waar je hier hulp bij moet zoeken of vinden, aangezien de chathulp van Microsoft ZO nutteloos was. Om het even welke uiteinden zouden zeer gewaardeerd worden.
Nik
Deze opmerking is gemaakt door de moderator op de site
Ik moet alle afbeeldingen in een Word-document verkleinen tot dezelfde breedte, maar de afbeeldingen niet vervormen. dus schaal ze op dezelfde breedte. Is dit mogelijk via een macro?
Michael
Deze opmerking is gemaakt door de moderator op de site
Als u uw document opslaat als .docx, kunt u het openen als zip-archief. Er zal een mediamap zijn met alle afbeeldingen (de mijne had PNG-afbeeldingen). U kunt dan programma's zoals IrfanView, XnViewMP, FastStone Viewer gebruiken om batchtransformaties uit te voeren, zoals formaat wijzigen, kleurdiepte verminderen, enz. Verpak uw afbeeldingen weer in zip en hernoem het naar docx. In mijn docx vol schermafbeeldingen moest ik bijvoorbeeld het aantal kleuren terugbrengen tot 8, wat voldoende is voor documentatiedoeleinden. Na het verwerken van mijn document van 10 MB werd het document van 1.8 MB, dus de besparingen kunnen aanzienlijk zijn. Bewaar altijd uw originele docx voor het geval u foto's wilt herstellen na te veel degradatie/verwerking etc.
bravomail
Er zijn nog geen reacties geplaatst
Laat uw commentaar
Posten als gast
×
Beoordeel dit bericht:
0  Personages
Voorgestelde locaties