Skip to main content

How to click to enlarge or expand image in Word document?

This article is talking about how to enlarge or expand images in a Word document by a mouse click.

Click to enlarge or expand image with VBA code

Resize images with Kutools for Word


Click to enlarge or expand image with VBA code

The following VBA code can help to enlarge images in a Word document with a click. Please do as follows.

1. In the document contains images you will enlarge by a click, press the Alt + F11 keys to open the Microsoft Visual Basic for Applications window.

2. In the Microsoft Visual Basic for Applications window, click Insert > Class Module. Then copy below VBA code into the Class window.

VBA code 1: Click to enlarge images

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: In the code, number 200 is the specified height and width of the enlarged images. You can change the height and width as you need.

3. Click Insert > Module, copy below code into the Module window.

VBA code 2: Click to enlarge images

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

4. Press the F5 key to run the code and close the Microsoft Visual Basic for Applications window.

Now, when clicking an image in this file, the image will be enlarged to the specific size as you desired.


Resize images with Kutools for Word

The Resize images utility of Kutools for Word can help you to resize all images by a specified percentage or selected image. Please have a try.

Kutools for Word : With more than 100 handy Word add-ins, free to try with no limitation in 60 days.

Click Kutools Plus > Resize, select a percentage from the drop down list. See screenshot:

Then all images in current document are resized based on this specific percentage.

For resizing all images based on the selected picture’s size, you need to select the image first and then click Kutools Plus > Resize > Resize Images with Selection. See screenshot:

Then all images in current document are resized based on selected one.

If you want to have a free trial of this utility, please go to free download the software first, and then go to apply the operation according above steps.


Office Tab - Tabbed Browsing, Editing, and Managing of multiple Documents in Word:

Office Tab brings the tabbed interface as seen in web browsers such as Google Chrome, Internet Explorer new versions and Firefox to Microsoft Word. It will be a time-saving tool and irreplaceble in your work. See below demo:

Click for free trial of Office Tab!

Best Office Productivity Tools

Kutools for Word - Elevate Your Word Experience with Over 100 Remarkable Features!

🤖 Kutools AI Assistant: Transform your writing with AI - Generate Content  /  Rewrite Text  /  Summarize Documents  /  Inquire for Information based on Document, all within Word

📘 Document Mastery: Split Pages  /  Merge Documents  /  Export Selection in Various Formats (PDF/TXT/DOC/HTML...)  /  Batch Convert to PDF  /  Export Pages as Images  /  Print Multiple Files at once...

Contents Editing: Batch Find and Replace across Multiple Files  /  Resize All Pictures  /  Transpose Table Rows and Columns  /  Convert Table to Text...

🧹 Effortless Clean: Sweap away Extra Spaces  /  Section Breaks  /  All Headers  /  Text Boxes  /  Hyperlinks  /  For more removing tools, head to our Remove Group...

Creative Inserts: Insert Thousand Separators  /  Check Boxes  /  Radio Buttons  /  QR Code  /  Barcode  /  Diagonal Line Table  /  Equation Caption  /  Image Caption  /  Table Caption  /  Multiple Pictures  /  Discover more in the Insert Group...

🔍 Precision Selections: Pinpoint specific pages  /  tables  /  shapes  /  heading paragraphs  /  Enhance navigation with more Select features...

Star Enhancements: Navigate swiftly to any location  /  auto-insert repetitive text  /  seamlessly toggle between document windows  /  11 Conversion Tools...

👉 Want to try these features? Kutools for Word offers a 60-day free trial, with no limitations! 🚀
Free Download     Read More     Buy Now
 
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