Cách xóa ảnh hàng loạt trong Excel chỉ bằng 1 click cực đơn giản

Hà Vân
Hà Vân
Nov 25 2022

Thông thường, khi các bạn muốn xóa ảnh trong Excel thì sẽ phải chọn vào nó rồi bấm nút Delete để xóa. Nhưng nếu có hàng trăm hình ảnh muốn xóa cùng lúc thì cách làm này sẽ rất mất thời gian. Các bạn hãy sử dụng cách xóa ảnh hàng loạt được hướng dẫn ngay sau đây.

Để xóa hàng loạt ảnh trong Excel, các bạn có thể dùng VBA để tạo ra một nút lệnh xóa ảnh như trong hình ảnh dưới đây. Khi đó, các bạn chỉ cần bấm nút lệnh là tất cả ảnh sẽ được xóa bỏ nhanh chóng.

Cách xóa ảnh hàng loạt trong Excel chỉ bằng 1 click cực đơn giản

Cách xóa ảnh hàng loạt trong Excel

Bước 1: Tải file mẫu thực hành

Chúng mình đã tạo ra một file mẫu về xóa ảnh hàng loạt trong Excel và gắn vào mục “Tài liệu đính kèm”. Các bạn bấm vào nút này ngay đầu bài viết thì sẽ được chuyển tới vị trí để tải file nhé.

Cách xóa ảnh hàng loạt trong Excel chỉ bằng 1 click cực đơn giản Cách xóa ảnh hàng loạt trong Excel chỉ bằng 1 click cực đơn giản

Sau khi tải về và mở file lên thì các bạn sẽ thấy file có 2 sheet như sau:

Cách xóa ảnh hàng loạt trong Excel chỉ bằng 1 click cực đơn giản

Chúng ta sẽ thao tác ở sheet ThucHanh các bạn nhé, còn sheet VBA_XoaAnh là kết quả mà chúng mình làm được sau khi dùng VBA để tạo nút lệnh xóa ảnh hàng loạt trong Excel.

Xem thêm: Làm sao để xóa nhiều dòng cùng một lúc trong Excel?

Bước 2: Mở cửa sổ VBA trong Excel

Để mở cửa sổ VBA trong Excel thì các bạn bấm vào thẻ Developer => chọn công cụ Visual Basic. Hoặc các bạn cũng có thể bấm tổ hợp phím tắt Excel là Alt + F11 thì cũng có thể mở được cửa sổ này. Chúng ta sẽ thực hiện thao tác này khi đang ở trên sheet VBA_XoaAnh các bạn nhé.

Cách xóa ảnh hàng loạt trong Excel chỉ bằng 1 click cực đơn giản

Có một số bạn chưa bật thẻ Developer lên thì sẽ không tìm thấy nó. Các bạn chỉ cần vào thẻ File => chọn mục Options => chọn mục Customize Ribbon trong bảng chọn Excel Options => tích vào ô Developer ở bên bảng Main Tabs rồi bấm OK là được. Sau khi thẻ Developer hiện lên rồi thì các bạn có thể thực hiện thao tác đã hướng dẫn phía trên.

Cách xóa ảnh hàng loạt trong Excel chỉ bằng 1 click cực đơn giản

Xem thêm: Hướng dẫn sử dụng VBA để tạo menu Excel liên kết nhiều chức năng

Bước 3: Thao tác trong cửa sổ VBA

Sau khi mở được cửa sổ này lên thì các bạn bấm vào mục Module => bấm vào Module 1 thì sẽ thấy có một đoạn macro VBA hiện ra như sau:

Cách xóa ảnh hàng loạt trong Excel chỉ bằng 1 click cực đơn giản

Các bạn hãy bôi đen toàn bộ đoạn Macro này, sau đó bấm Ctrl + C để sao chép. Bây giờ hãy quay lại cửa sổ làm việc của Excel rồi chuyển sang sheet ThucHanh. Bây giờ các bạn lại mở cửa sổ VBA lên => bấm chuột phải vào vùng trống bên dưới dòng VBA_File-thuc-hanh.xlsx => chọn Insert => chọn Module:

Cách xóa ảnh hàng loạt trong Excel chỉ bằng 1 click cực đơn giản

Sau khi Module được tạo ra thì các bạn bấm vào Module 1 => nhấp chuột phải và chọn Paste hoặc bấm Ctrl + V để dán đoạn code chúng ta đã sao chép khi nãy vào vùng màu trắng ở bên phải.

Cách xóa ảnh hàng loạt trong Excel chỉ bằng 1 click cực đơn giản

Bước 4: Tạo nút lệnh xóa ảnh

Các bạn quay trở lại sheet ThucHanh rồi vào thẻ Insert => chọn mục Shapes để vẽ ra nút lệnh:

Cách xóa ảnh hàng loạt trong Excel chỉ bằng 1 click cực đơn giản

Đừng quên chèn thêm văn bản để đặt tên cho nút lệnh rồi căn chỉnh cho cân đối.

Cách xóa ảnh hàng loạt trong Excel chỉ bằng 1 click cực đơn giản

Bước 5: Gán Macro vào nút lệnh đã tạo

Các bạn nhấp chuột phải vào hình khối của nút lệnh rồi chọn mục Assign Macro:

Cách xóa ảnh hàng loạt trong Excel chỉ bằng 1 click cực đơn giản

Chọn Macro Name là DeletePic - tên của Macro mà chúng ta đã sử dụng ở phía trên rồi bấm OK.

Bây giờ khi cần xóa ảnh thì các bạn chỉ cần bấm vào nút lệnh Xóa Ảnh là được. Việc xóa ảnh hàng loạt trong Excel bẳng VBA này sẽ không ảnh hưởng đến các hàng, cột hay nội dung khác trong vùng dữ liệu được chọn.

Để hình dung rõ hơn 5 bước này thì các bạn xem video dưới đây:

Xem thêm: Tổng hợp các code VBA Excel thao tác với Workbook chỉ trong nháy mắt

Cách đọc hiểu đoạn code xóa ảnh hàng loạt trong Excel

Các bước sử dụng ngay trên file mẫu của chúng mình thì đơn giản nhưng các bạn cần đọc hiểu được đoạn code thì mới có thể tự viết và sử dụng trên file của các bạn. Trước hết, các bạn xem đoạn code mẫu như sau:

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

Dòng code

Ý nghĩa dòng code

Public Sub DeletePic()

Đây là tên của Macro, có nghĩa là dùng để xóa ảnh. Các bạn có thể sửa tên DeletePic này thành tên khác tùy thích nhé.

Dim xPicRg As Range

Dim xPic As Picture

Dim xRg As Range

Application.ScreenUpdating = False

Là các biến được gán vào đoạn code. Đây chỉ là các tên biến, các bạn không cần thay đổi nó cũng được nhé.

Set xRg = ActiveSheet.Range("B2:B100")

Dùng để thiết lập vùng muốn xóa ảnh, ở đây chúng mình đang tạo chức năng xóa ảnh trên vùng từ ô B2 đến ô B100. Phần vùng dữ liệu cần xóa B2:B100 này các bạn

For Each xPic In ActiveSheet.Pictures

Set xPicRg = ActiveSheet.Range(xPic.TopLeftCell.Address & ":" & xPic.BottomRightCell.Address)

If Not Intersect(xRg, xPicRg) Is Nothing Then xPic.Delete

Next

Application.ScreenUpdating = True

Đây là các câu lệnh dùng để thực hiện thao tác xóa ảnh hàng loạt, các bạn có thể sử dụng ngay không cần thay đổi.

Nhìn chung, trong cả đoạn code mẫu mà chúng mình cung cấp thì các bạn có thể sử dụng ngay mà chỉ cần thay đổi vùng chứa ảnh muốn xóa.

Xem thêm: Cách sử dụng chức năng Record Macro để tự học VBA cực kỳ đơn giản

Kết luận

Như vậy, chúng mình đã hướng dẫn xong các bước để xóa ảnh hàng loạt trong Excel cho các bạn. Nếu các bạn thầy cách làm này hữu ích thì hãy chia sẻ với mọi người nhé. Qua đây, các bạn cũng có thể thấy được những thao tác phức tạp, mất thời gian trong Excel có thể được xử lý nhanh gọn khi dùng code VBA.

Tài liệu kèm theo bài viết

5/5 - (1 bình chọn)

5/5 - (1 bình chọn)

Bài viết liên quan

Cách ứng dụng hàm INT và MOD cho lễ tân và các công việc khác

Cách ứng dụng hàm INT và MOD cho lễ tân và các công việc khác

Hướng dẫn cách tách địa chỉ ra khỏi chuỗi

Hướng dẫn cách tách địa chỉ ra khỏi chuỗi

CÁCH TÍNH ĐIỂM TRUNG BÌNH VÀ XẾP LOẠI TRONG EXCEL (KÈM BÀI TẬP)

CÁCH TÍNH ĐIỂM TRUNG BÌNH VÀ XẾP LOẠI TRONG EXCEL (KÈM BÀI TẬP)

Hướng dẫn kiểm tra giá trị trùng lặp cực đơn giản trên Excel 2010, 2013, 2016, 2019

Hướng dẫn kiểm tra giá trị trùng lặp cực đơn giản trên Excel 2010, 2013, 2016, 2019

Cách cộng, trừ ngày tháng năm trong Excel để tính số ngày siêu nhanh cho kế toán

Cách cộng, trừ ngày tháng năm trong Excel để tính số ngày siêu nhanh cho kế toán

Hướng dẫn 4 cách bôi đen trong Excel đơn giản và nhanh chóng

Hướng dẫn 4 cách bôi đen trong Excel đơn giản và nhanh chóng

@ 2020 - Bản quyền của Công ty cổ phần công nghệ giáo dục Gitiho Việt Nam
Giấy chứng nhận Đăng ký doanh nghiệp số: 0109077145, cấp bởi Sở kế hoạch và đầu tư TP. Hà Nội