Làm thế nào để xóa tất cả các hình ảnh trong một phạm vi ô?

Nếu có nhiều hình ảnh được nhập vào trang tính của bạn, bây giờ, bạn muốn xóa một số hình ảnh trong số đó trong một phạm vi xác định, bạn phải giải quyết nhanh như thế nào?

Xóa tất cả ảnh trong một phạm vi ô cụ thể bằng mã VBA

Xóa tất cả ảnh trong trang tính hoặc toàn bộ sổ làm việc với Kutools cho Excel

---

Xóa tất cả ảnh trong một phạm vi ô cụ thể bằng mã VBA

Đây là một mã VBA đơn giản có thể giúp bạn xóa các hình ảnh trong phạm vi đã chọn mà không xóa từng ảnh một, vui lòng thực hiện như sau:

1. Giữ ALT + F11 phím để mở Microsoft Visual Basic cho các ứng dụng cửa sổ.

2. Nhấp chuột Chèn > mô-đun, và dán mã sau vào Mô-đun Cửa sổ.

Mã VBA: xóa tất cả ảnh trong một phạm vi ô đã chọn:

Sub DeletePic()
    Dim xPicRg As Range
    Dim xPic As Picture
    Dim xRg As Range
    Application.ScreenUpdating = False
    Set xRg = Range("A5:B8")
    For Each xPic In ActiveSheet.Pictures
        Set xPicRg = Range(xPic.TopLeftCell.Address & ":" & xPic.BottomRightCell.Address)
        If Not Intersect(xRg, xPicRg) Is Nothing Then xPic.Delete
    Next
    Application.ScreenUpdating = True
End Sub

Chú thích: Trong đoạn mã trên, A5: B8 là phạm vi mà bạn muốn xóa ảnh, vui lòng thay đổi nó theo nhu cầu của bạn.

3. Sau đó nhấn F5 để chạy mã này và các ảnh trong phạm vi đã chọn đã bị xóa ngay lập tức, xem ảnh chụp màn hình:

---

Xóa tất cả ảnh trong trang tính hoặc toàn bộ sổ làm việc với Kutools cho Excel

Nếu bạn cần xóa tất cả hình ảnh khỏi trang tính hoặc sổ làm việc, Kutools cho Excel 's Xóa Hình minh họa & Đối tượng tiện ích có thể giúp bạn một việc.

Kutools cho Excel : với hơn 300 bổ trợ Excel tiện dụng, dùng thử miễn phí không giới hạn trong 30 ngày.

Đi tới Tải xuống Dùng thử miễn phí 30 ngàyMua PayPal / MyC Commerce

Sau khi cài đặt Kutools cho Excel, vui lòng làm như sau:

1. Nhấp chuột Kutools > Xóa bỏ > Xóa Hình minh họa & Đối tượng, xem ảnh chụp màn hình:

2. Trong Xóa Hình minh họa & Đối tượng hộp thoại, kiểm tra Những bức ảnh từ Xóa bỏ và sau đó chọn phạm vi mà bạn muốn xóa ảnh trong nhìn vào , xem ảnh chụp màn hình:

3. Sau đó nhấn vào Ok và tất cả ảnh sẽ bị xóa khỏi trang tính hoặc toàn bộ sổ làm việc như bạn đã chọn.

Nhấp để Tải xuống Kutools cho Excel và dùng thử miễn phí ngay!