Làm cách nào để thay đổi kích thước tất cả / nhiều hình ảnh trong Word?

Khi chúng tôi sao chép hoặc nhập hình ảnh từ Internet hoặc các tệp khác, kích thước của hình ảnh có thể khác nhau. Mọi người đều biết cách thay đổi kích thước của từng bức ảnh, nhưng nếu chúng ta muốn thay đổi kích thước chúng thành cùng một kích thước cùng một lúc, chúng ta có thể làm thế nào? Hướng dẫn này sẽ chỉ cho bạn một số phương pháp thay đổi kích thước hình ảnh.

Thay đổi kích thước hình ảnh theo cách thủ công trong Word

Thay đổi kích thước hình ảnh bằng VBA

Thay đổi kích thước nhiều hình ảnh cùng một lúc với Kutools cho Word

Thay đổi kích thước hình ảnh theo cách thủ công trong Word

1. Để hiển thị các chốt định cỡ của hình ảnh bằng cách nhấp vào hình ảnh;

2. Đặt con trỏ trên một trong các chốt định cỡ của ảnh.

3. Kéo tay cầm định cỡ cho đến khi cỡ ảnh phù hợp với nhu cầu của bạn. Xem ảnh chụp màn hình:

Chú thích: Với phương pháp này, bạn không thể thay đổi kích thước nhiều ảnh cùng một lúc. Bạn cần thay đổi kích thước từng ảnh một cho đến khi tất cả các ảnh đều được thay đổi kích thước.

Thay đổi kích thước hình ảnh bằng VBA

Với mã VBA sau, bạn có thể thay đổi kích thước ảnh thành kích thước lý tưởng của mình. Bạn có thể thực hiện nó như sau ：

Trong ví dụ này, chúng tôi thay đổi kích thước hình ảnh thành chiều cao 1.78 inch và chiều rộng 3.17 inch.

1. Vui lòng chọn một hình ảnh bạn muốn thay đổi kích thước;

2. nhấn Alt + F11 để mở Microsoft Visual Basic cho các ứng dụng cửa sổ;

3. Nhấp chuột Mô-đun từ Chèn , sao chép và dán mã VBA sau vào Mô-đun cửa sổ;

Mã VBA: Thay đổi kích thước một hình ảnh thành kích thước cụ thể:

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. Nhấp chuột chạy nút hoặc F5 để chạy mã VBA và hình ảnh được chọn đã được thay đổi kích thước theo kích thước bạn cần.

Chú thích: Trong đoạn mã trên,  Trong shp.Height = InchesToPoints (1.78) và shp.Width = InchesToPoints (3.17) là chiều cao và chiều rộng của hình ảnh, bạn có thể thay đổi kích thước để đáp ứng nhu cầu của bạn.

Với mã VBA này, bạn cũng không thể thay đổi kích thước tất cả hoặc nhiều ảnh cùng một lúc. Bạn cần phải quay lại giữa tài liệu Word và Microsoft Visual Basic cho các ứng dụng cửa sổ để chọn hình ảnh và áp dụng mã. Như vậy là quá tốn thời gian.

Thay đổi kích thước hình ảnh với Kutools cho Word

Với Kutools cho Word 's Thay đổi kích thước hình ảnh tiện ích, bạn có thể loại bỏ những thao tác phiền phức và tốn thời gian, đồng thời nhanh chóng thay đổi kích thước tất cả hình ảnh từ tài liệu của bạn.

1. Vui lòng áp dụng tiện ích này bằng cách nhấp vào Kutools Plus > Thay đổi kích thước. Xem ảnh chụp màn hình:

2. Nếu bạn muốn thay đổi kích thước tất cả các hình ảnh thành một tỷ lệ nhất định so với kích thước ban đầu của chúng, vui lòng chọn một trong sáu phần trăm từ danh sách thả xuống. Ví dụ: nếu bạn muốn thay đổi kích thước tất cả các hình ảnh thành 50% kích thước ban đầu của chúng, vui lòng chọn 50%. Sau khi nhấp 25%, bạn sẽ thấy tất cả các hình ảnh đã được tăng kích thước đến 50%. Xem ảnh chụp màn hình:

Nếu bạn muốn điều chỉnh tất cả hình ảnh về cùng kích thước với hình ảnh đã chọn, vui lòng chọn hình ảnh làm kích thước mô hình, sau đó nhấp vào Kutools Plus > Thay đổi kích thước > Thay đổi kích thước hình ảnh với lựa chọnvà tất cả hình ảnh sẽ được thay đổi kích thước theo cùng một kích thước dựa trên hình đã chọn, xem ảnh chụp màn hình:

Để biết thêm thông tin về Kutools cho Word'S Thay đổi kích thước hình ảnh tiện ích, vui lòng nhấp vào ở đây.

Nhấp để tải xuống Kutools cho Word và dùng thử miễn phí ngay bây giờ!

Demo: Thay đổi kích thước tất cả các hình ảnh cùng một lúc trong Word

---

Công cụ năng suất Word được đề xuất

 

Kutools cho Word - Hơn 100 tính năng nâng cao cho Word, tiết kiệm 50% thời gian của bạn

• Các hoạt động phức tạp và lặp đi lặp lại có thể được thực hiện xử lý một lần trong vài giây.
• Chèn nhiều hình ảnh trên các thư mục vào tài liệu Word cùng một lúc.
• Hợp nhất và kết hợp nhiều tệp Word trên các thư mục thành một với thứ tự mong muốn của bạn.
• Chia tài liệu hiện tại thành các tài liệu riêng biệt theo tiêu đề, ngắt phần hoặc các tiêu chí khác.
• Chuyển đổi tệp giữa Doc và Docx, Docx và PDF, bộ sưu tập các công cụ để chuyển đổi và lựa chọn phổ biến, v.v.

Tìm hiểu thêm Tải xuống Ngay Mua