Đây là bộ dữ liệu mẫu.

Bước 1 – Tạo Module VBA xóa ô trong Excel
- Tab Developer > nhấp Visual Basic.
Hoặc nhấn ALT + F11 mở cửa sổ Microsoft Visual Basic for Applications.

- Trong Insert, chọn Module.

Bước 2 – Chèn code VBA vào Module
- Trong cửa sổ Module, nhập mã VBA sau.
Code xóa nội dung ô giữ định dạng:
Sub Clear_Cell_With_Button() Dim rng As Range Set rng = Application.InputBox(Prompt:="Select the Range of Cell", Title:="Exceldemy", Type:=8) rng.Select Selection.ClearContents End Sub 
Code xóa ô bao gồm định dạng
Sub Clear_Cell_With_Button_including_Format() Dim rng As Range Set rng = Application.InputBox(Prompt:="Select the Range of Cell", Title:="Exceldemy", Type:=8) rng.Select Selection.Clear End Sub 
Code xóa ô (Delete)
Sub Delete_Cell_With_Button() Dim rng As Range Set rng = Application.InputBox(Prompt:="Select the Range of Cell", Title:="Exceldemy", Type:=8) rng.Select Selection.Delete End Sub 
Đọc thêm: Excel VBA xóa nội dung phạm vi
Khác biệt giữa Clear, Delete, ClearContents trong VBA Excel
Lệnh ClearContents chỉ xóa giá trị ô, giữ định dạng. Lệnh Clear xóa cả giá trị và định dạng, để ô trống. Lệnh Delete xóa ô và dịch các ô dưới lên.
Bước 3 – Tạo nút bấm xóa ô trong Excel
- Tab Developer.
- Nhấp Insert > chọn Button.

- Vẽ khung nút tại vị trí mong muốn.

- Cửa sổ Assign macro mở.
- Chọn macro vừa tạo.
- Nhấp OK.

- Nút macro xuất hiện. Right-click nút > đổi tên thành “Chỉ xóa nội dung”.

- Tạo thêm 2 nút cho 2 code còn lại tên “Xóa ô kèm định dạng” và “Xóa ô (Delete)”.

Bước 4 – Chạy Macro VBA xóa ô bằng nút bấm
- Nhấp “Chỉ xóa nội dung” xóa giá trị ô được chọn.

- Cửa sổ hiện. Chọn phạm vi > OK.

- Giá trị ô bị xóa nhưng định dạng giữ nguyên.

- Nhấp “Xóa ô kèm định dạng” xóa giá trị và bỏ định dạng.
- Chọn phạm vi cần xóa > OK.

Các ô được xóa sạch.

- Nhấp “Xóa ô (Delete)” và chọn phạm vi.

Ô được xóa và các ô dưới dịch lên.

Đọc thêm: Cách xóa nội dung sheet bằng VBA Excel
Tải file thực hành
Tải file thực hành tại đây:
Bài viết liên quan
- Cách xóa nội dung không xóa công thức dùng VBA trong Excel
- Excel VBA xóa nội dung Named Range
- Excel VBA xóa và dịch trái ô hoặc cột
- Excel VBA: Xóa nội dung nếu ô chứa giá trị cụ thể
Nhận miễn phí bài tập Excel nâng cao có lời giải!