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

Come ridimensionare tutte / più immagini in Word?

Quando copiamo o importiamo immagini da Internet o da altri file, le dimensioni delle immagini possono essere diverse. Tutti sanno come ridimensionare le immagini una per una, ma se vogliamo ridimensionarle alla stessa dimensione tutte in una volta, come possiamo fare? Questo tutorial ti mostrerà diversi metodi per ridimensionare le immagini.

Ridimensiona manualmente le immagini in Word

Ridimensiona le immagini con VBA

Ridimensiona più immagini contemporaneamente con Kutools per Word


Ridimensiona manualmente le immagini in Word

1. Per mostrare i quadratini di ridimensionamento dell'immagine facendo clic sull'immagine;

2. Posiziona il cursore su uno dei quadratini di ridimensionamento dell'immagine.

3. Trascina il quadratino di ridimensionamento fino a quando la dimensione dell'immagine è adatta alle tue esigenze. Vedi screenshot:

doc aggiusta immagini 1

Note:: Con questo metodo, non è possibile ridimensionare più immagini contemporaneamente. È necessario ridimensionarli uno per uno finché tutte le immagini non vengono ridimensionate.


Ridimensiona le immagini con VBA

Con il seguente codice VBA, puoi ridimensionare le immagini alla dimensione ideale. Puoi farlo come segue :

In questo esempio, ridimensioniamo le dimensioni dell'immagine a 1.78 pollici di altezza e 3.17 pollici di larghezza.

1. Seleziona un'immagine di cui desideri modificare le dimensioni;

2. stampa Alt + F11 per aprire il Microsoft Visual Basic, Applications Edition finestra;

3. Clic Modulo da inserire scheda, copia e incolla il seguente codice VBA nel file Modulo finestra;

Codice VBA: ridimensiona un'immagine a una dimensione specifica:

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. Clicchi Correre pulsante o F5 chiave per eseguire il codice VBA e l'immagine selezionata è stata ridimensionata in base alle dimensioni desiderate.

Note:: Nel codice sopra,  In shp.Height = InchesToPoints (1.78) e shp.Width = InchesToPoints (3.17) sono l'altezza e la larghezza dell'immagine, è possibile modificare le dimensioni in base alle proprie esigenze.

Con questo codice VBA, non puoi ridimensionare tutte o più immagini contemporaneamente. Devi andare avanti e indietro tra il documento di Word e il file Microsoft Visual Basic, Applications Edition finestra per selezionare l'immagine e applicare il codice. È troppo tempo.


Ridimensiona le immagini con Kutools per Word

Con una lunga Kutools per Word 's Ridimensiona immagini utility, puoi sbarazzarti di quelle operazioni fastidiose e dispendiose in termini di tempo e ridimensionare rapidamente tutte le immagini dal tuo documento.

Kutools for Word : con più di 100 utili componenti aggiuntivi di Word, liberi di provare senza limitazioni in 60 giorni. 

1. Si prega di applicare questa utilità facendo clic su Kutools Plus > Ridimensiona. Vedi screenshot:

2. Se desideri ridimensionare tutte le immagini a una certa percentuale della loro dimensione originale, seleziona una delle sei percentuali dall'elenco a discesa. Ad esempio, se desideri ridimensionare tutte le immagini al 50% delle loro dimensioni originali, seleziona 50% di . Dopo aver cliccato 25% di , vedrai che tutte le immagini sono state ridimensionate al 50%. Vedi screenshot:

doc aggiusta immagini 3

Se si desidera regolare tutte le immagini alla stessa dimensione con una selezionata, selezionare un'immagine come dimensione del modello, quindi fare clic su Kutools Plus > Ridimensiona > Ridimensiona le immagini con la selezionee tutte le immagini verranno ridimensionate alla stessa dimensione in base a quella selezionata, vedi screenshot:

doc aggiusta immagini 4

Per informazioni più dettagliate su Kutools for Word'S Ridimensiona immagini utilità, fare clic su qui.

Fai clic per scaricare Kutools per Word e prova gratuita ora!


Demo: ridimensiona tutte le immagini contemporaneamente in Word

Kutools for Word: con più di 100 utili componenti aggiuntivi di Word, gratis da provare senza limitazioni per 60 giorni. Scarica e prova gratuita ora!


Strumenti di produttività Word consigliati

 

Kutools per Word: oltre 100 funzionalità avanzate per Word, risparmia il 50% del tempo

  • Le operazioni complicate e ripetute possono essere eseguite una sola volta in pochi secondi.
  • Inserisci più immagini tra le cartelle nel documento di Word contemporaneamente.
  • Unisci e combina più file di Word tra cartelle in uno con l'ordine desiderato.
  • Suddividi il documento corrente in documenti separati in base a titolo, interruzione di sezione o altri criteri.
  • Converti file tra Doc e Docx, Docx e PDF, raccolta di strumenti per conversioni e selezioni comuni e così via ...
Commenti (6)
Ancora nessuna valutazione. Puoi essere il primo a votare!
Questo commento è stato fatto dal moderatore sul sito
risparmia i tuoi soldi ed esegui questa macro: Credit to 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 Fine Sub
Questo commento è stato fatto dal moderatore sul sito
risparmia i tuoi soldi ed esegui questa macro: Credit to 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 Con End Sub Eccellente!!! Hai risparmiato i miei soldi e il mio tempo. Grazie mille!
Questo commento è stato fatto dal moderatore sul sito
Dove ho messo questo codice?
Questo commento è stato fatto dal moderatore sul sito
Qualcuno sa se in Windows 365 è disponibile una funzionalità segnaposto/contagocce/dimensione automatica dell'immagine? Non ho idea di dove cercare o trovare assistenza su questo poiché l'aiuto della chat di Microsoft era COSÌ inutile. Tutti i suggerimenti sarebbero molto apprezzati.
Questo commento è stato fatto dal moderatore sul sito
Ho bisogno di ridimensionare tutte le immagini in un documento di Word alla stessa larghezza ma non deformare le immagini. quindi ridimensionali alla stessa larghezza. È possibile attraverso una macro?
Questo commento è stato fatto dal moderatore sul sito
Se salvi il tuo documento come .docx, sarai in grado di aprirlo come archivio zip. Ci sarà una cartella multimediale con tutte le immagini (la mia aveva immagini PNG). È quindi possibile utilizzare programmi come IrfanView, XnViewMP, FastStone Viewer per eseguire trasformazioni batch come ridimensionare, ridurre la profondità del colore, ecc. Ricomprimere le immagini in zip e rinominarle in docx. Ad esempio, nel mio docx pieno di schermate dovevo ridurre il numero di colori a 8, il che è sufficiente per scopi di documentazione. Dopo l'elaborazione, il mio documento da 10 MB è diventato un documento da 1.8 MB, quindi i risparmi possono essere significativi. Salva sempre il tuo docx originale nel caso in cui desideri ripristinare le immagini dopo troppa degradazione/elaborazione, ecc.
Non ci sono ancora commenti pubblicati qui
Lasciate i vostri commenti
Pubblicazione come ospite
×
Valuta questo post:
0   Personaggi
Posizioni suggerite