Vai al contenuto principale

Come fare clic per ingrandire o espandere l'immagine nel documento di Word?

Questo articolo parla di come ingrandire o espandere le immagini in un documento di Word con un clic del mouse.

Fare clic per ingrandire o espandere l'immagine con il codice VBA

Ridimensiona le immagini con Kutools per Word


Fare clic per ingrandire o espandere l'immagine con il codice VBA

Il seguente codice VBA può aiutare ad ingrandire le immagini in un documento di Word con un clic. Si prega di fare quanto segue.

1. Nel documento contenente immagini che ingrandirai con un clic, premi il tasto altro + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.

2. Nel Microsoft Visual Basic, Applications Edition finestra, fare clic inserire > Modulo di classe. Quindi copia sotto il codice VBA nella finestra Class.

Codice VBA 1: fare clic per ingrandire le immagini

Public WithEvents GApp As Word.Application
'Updated by ExtendOffice 20181129
Private Sub GApp_WindowSelectionChange(ByVal Sel As Selection)
    Dim xShape As InlineShape
    On Error Resume Next
    Set xShape = Sel.InlineShapes(1)
    xShape.Height = 200
    xShape.Width = 200
End Sub

Note:: Nel codice, il numero 200 è l'altezza e la larghezza specificate delle immagini ingrandite. Puoi modificare l'altezza e la larghezza di cui hai bisogno.

3. Clic inserire > Moduli, copia il codice sottostante nella finestra del modulo.

Codice VBA 2: fare clic per ingrandire le immagini

Dim cls As New Class1
'Updated by ExtendOffice 20181129
Sub register_Event_Handler()
    Set cls.GApp = Word.Application
End Sub

4. premi il F5 chiave per eseguire il codice e chiudere il file Microsoft Visual Basic, Applications Edition finestra.

Ora, quando si fa clic su un'immagine in questo file, l'immagine verrà ingrandita alla dimensione specifica desiderata.


Ridimensiona le immagini con Kutools per Word

Le Ridimensiona le immagini utilità di Kutools for Word può aiutarti a ridimensionare tutte le immagini di una percentuale specificata o di un'immagine selezionata. Per favore, prova.

Kutools for Word : Con oltre 100 utili componenti aggiuntivi di Word, libero di provare senza limitazioni 60 giorni.

Clicchi Kutools Plus > Ridimensiona, seleziona una percentuale dall'elenco a discesa. Vedi screenshot:

Quindi tutte le immagini nel documento corrente vengono ridimensionate in base a questa percentuale specifica.

Per ridimensionare tutte le immagini in base alle dimensioni dell'immagine selezionata, è necessario prima selezionare l'immagine e quindi fare clic su Kutools Plus > Ridimensiona > Ridimensiona le immagini con la selezione. Vedi screenshot:

Quindi tutte le immagini nel documento corrente vengono ridimensionate in base a quella selezionata.

Se vuoi avere una prova gratuita di questa utility, vai su scarica gratuitamente il software prima, quindi vai ad applicare l'operazione secondo i passaggi precedenti.


Office Tab - Navigazione a schede, modifica e gestione di più documenti in Word:

Office Tab porta l'interfaccia a schede come quella dei browser web come Google Chrome, le nuove versioni di Internet Explorer e Firefox in Microsoft Word. Esso volere essere uno strumento che fa risparmiare tempo e insostituibile nel tuo lavoro. Vedi sotto la demo:

Fai clic per la prova gratuita di Office Tab!

I migliori strumenti per la produttività in ufficio

Kutools for Word - Migliora la tua esperienza con le parole con Over 100 Caratteristiche notevoli!

🤖 Assistente AI di Kutools: Trasforma la tua scrittura con l'intelligenza artificiale - Genera contenuto  /  Riscrivere il testo  /  Riepilogare i documenti  /  Richiedi informazioni sulla base del documento, tutto all'interno di Word

📘 Padronanza dei documenti: Pagine divise  /  Unisci documenti  /  Esporta la selezione in vari formati (PDF/TXT/DOC/HTML...)  /  Converti in batch in PDF  /  Esporta pagine come immagini  /  Stampa più file contemporaneamente...

Modifica dei contenuti: Trova e sostituisci in batch su più file  /  Ridimensiona tutte le immagini  /  Trasporre righe e colonne della tabella  /  Converti tabella in testo...

🧹 Pulito senza sforzo: Spazza via Spazi extra  /  Interruzioni di sezione  /  Tutte le intestazioni  /  Caselle di testo  /  Collegamenti ipertestuali  / Per ulteriori strumenti di rimozione, vai al nostro Rimuovi gruppo...

Inserti creativi: Inserisci Mille separatori  /  Caselle di controllo  /  Pulsanti di scelta  /  QR Code  /  Codice a barre  /  Tabella della linea diagonale  /  Didascalia dell'equazione  /  Didascalia immagine  /  Didascalia  /  Immagini multiple  / Scopri di più nella Inserisci gruppo...

???? Selezioni di precisione: Individuare pagine specifiche  /  con tabelle  /  forme  /  paragrafi di intestazione  / Migliora la navigazione con Scopri di più Seleziona funzionalità...

Miglioramenti delle stelle: Naviga rapidamente verso qualsiasi luogo  /  inserire automaticamente testo ripetitivo  /  passare senza problemi da una finestra all'altra del documento  /  11 strumenti di conversione...

👉 Vuoi provare queste funzionalità? Kutools per Word offre a Prova gratuita 60-day, senza limitazioni! 🚀
 
Comments (5)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Yeah nice try, but it should really put the enlarged image in a temporary popup, instead of literally resizing the image!
This comment was minimized by the moderator on the site
OK...after clicking to expand, how do you get it to restore back to default size or click to default size?
This comment was minimized by the moderator on the site
It work in older world file, saved as .doc, but opened in MS 365.
This comment was minimized by the moderator on the site
Hi

The macro doesn't work as should. On MS Office 365 the resizing appear only for few mili sec.
This comment was minimized by the moderator on the site
Hi Thanks for the tip. I'm following the instructions on how to enlarge by using Macro, however I'm getting a error message "The type that was defined by user was ot defined" Any idea?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations