Note: The other languages of the website are Google-translated. Back to English

 Làm thế nào để áp dụng một nút để xóa các ô cụ thể trong Excel?

Thông thường, bạn có thể giữ Ctrl để chọn nhiều ô cụ thể, sau đó xóa nội dung ô khi bạn cần. Nếu bạn luôn cần xóa các ô cụ thể này theo thời gian, bạn có thể tạo một nút xóa để xóa chúng chỉ bằng một cú nhấp chuột. Trong bài viết này, tôi sẽ nói về cách tạo một nút xóa tất cả để xóa một số nội dung ô cụ thể.

Áp dụng một nút để xóa nội dung ô cụ thể bằng mã VBA


mũi tên màu xanh bong bóng bên phải Áp dụng một nút để xóa nội dung ô cụ thể bằng mã VBA

Đầu tiên, bạn nên tạo một nút hình dạng, sau đó áp dụng mã, cuối cùng, buộc mã vào nút hình dạng. Vui lòng làm như sau:

1. Nhấp chuột Chèn > Hình dạng > Hình chữ nhật để chọn hình chữ nhật, sau đó kéo chuột để vẽ một nút hình chữ nhật ở bất kỳ vị trí nào của trang tính khi bạn cần, xem ảnh chụp màn hình:

nút doc xóa các ô 1

2. Sau đó nhập văn bản và định dạng nút hình dạng khi bạn cần, xem ảnh chụp màn hình:

nút doc xóa các ô 2

3. Và sau đó bạn nên chèn mã VBA, vui lòng nhấn giữ ALT + F11 phím để mở Microsoft Visual Basic cho các ứng dụng cửa sổ. Nhấp chuột Chèn > Mô-đunvà dán mã sau vào Mô-đun Cửa sổ.

Mã VBA: Xóa nội dung ô khỏi các ô cụ thể:

Sub Clearcells()
'Updateby Extendoffice
Range("A2", "A5").Clear
Range("C10", "D18").Clear
Range("B8", "B12").Clear
End Sub

Chú thích: Trong đoạn mã trên: A2, A5 cho biết nó sẽ xóa các ô trong phạm vi A2: A5, không chỉ hai ô riêng lẻ, bạn có thể thêm nhiều phạm vi, chẳng hạn như Phạm vi ("B8", "B12"). Xóa tập lệnh trong mã để xóa.

4. Sau đó, lưu và đóng cửa sổ mã, sau đó liên kết mã với nút hình dạng, bấm chuột phải vào nút và chọn Chỉ định Macro, Trong Chỉ định Macro hộp thoại, chọn Clearcells tên mã từ Tên macro hộp danh sách và nhấp vào OK để thoát khỏi hộp thoại này. Xem ảnh chụp màn hình:

nút doc xóa các ô 3

5. Và bây giờ, khi bạn nhấp vào Làm sạch tất cả , các ô cụ thể bạn đã xác định sẽ bị xóa ngay lập tức, xem ảnh chụp màn hình:

nút doc xóa các ô 4


Các công cụ năng suất văn phòng tốt nhất

Kutools cho Excel giải quyết hầu hết các vấn đề của bạn và tăng 80% năng suất của bạn

  • Tái sử dụng: Chèn nhanh công thức phức tạp, biểu đồ và bất cứ thứ gì bạn đã sử dụng trước đây; Mã hóa ô với mật khẩu; Tạo danh sách gửi thư và gửi email ...
  • Thanh siêu công thức (dễ dàng chỉnh sửa nhiều dòng văn bản và công thức); Bố cục đọc (dễ dàng đọc và chỉnh sửa số lượng ô lớn); Dán vào Dải ô đã Lọchữu ích. Cảm ơn !
  • Hợp nhất các ô / hàng / cột mà không làm mất dữ liệu; Nội dung phân chia ô; Kết hợp các hàng / cột trùng lặp... Ngăn chặn các ô trùng lặp; So sánh các dãyhữu ích. Cảm ơn !
  • Chọn trùng lặp hoặc duy nhất Hàng; Chọn hàng trống (tất cả các ô đều trống); Tìm siêu và Tìm mờ trong Nhiều Sổ làm việc; Chọn ngẫu nhiên ...
  • Bản sao chính xác Nhiều ô mà không thay đổi tham chiếu công thức; Tự động tạo tài liệu tham khảo sang Nhiều Trang tính; Chèn Bullets, Hộp kiểm và hơn thế nữa ...
  • Trích xuất văn bản, Thêm Văn bản, Xóa theo Vị trí, Xóa không gian; Tạo và In Tổng số phân trang; Chuyển đổi giữa nội dung ô và nhận xéthữu ích. Cảm ơn !
  • Siêu lọc (lưu và áp dụng các lược đồ lọc cho các trang tính khác); Sắp xếp nâng cao theo tháng / tuần / ngày, tần suất và hơn thế nữa; Bộ lọc đặc biệt bằng cách in đậm, in nghiêng ...
  • Kết hợp Workbook và WorkSheets; Hợp nhất các bảng dựa trên các cột chính; Chia dữ liệu thành nhiều trang tính; Chuyển đổi hàng loạt xls, xlsx và PDFhữu ích. Cảm ơn !
  • Hơn 300 tính năng mạnh mẽ. Hỗ trợ Office / Excel 2007-2021 và 365. Hỗ trợ tất cả các ngôn ngữ. Dễ dàng triển khai trong doanh nghiệp hoặc tổ chức của bạn. Đầy đủ tính năng Dùng thử miễn phí 30 ngày. Bảo đảm hoàn lại tiền trong 60 ngày.
tab kte 201905

Tab Office mang lại giao diện Tab cho Office và giúp công việc của bạn trở nên dễ dàng hơn nhiều

  • Cho phép chỉnh sửa và đọc theo thẻ trong Word, Excel, PowerPoint, Publisher, Access, Visio và Project.
  • Mở và tạo nhiều tài liệu trong các tab mới của cùng một cửa sổ, thay vì trong các cửa sổ mới.
  • Tăng 50% năng suất của bạn và giảm hàng trăm cú nhấp chuột cho bạn mỗi ngày!
officetab dưới cùng
Nhận xét (65)
Chưa có xếp hạng. Hãy là người đầu tiên xếp hạng!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
ĐƯA RA CÔNG THỨC ĐỂ TIẾT KIỆM VÀ RÕ RÀNG
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Thao tác này cũng xóa mọi định dạng của ô. Làm cách nào để làm điều này nếu tôi muốn giữ các công thức và định dạng suchace dưới dạng tô bóng hoặc đường viền
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
thay đổi lệnh từ "clear" thành "clearcontents" để chỉ xóa các đầu vào văn bản
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
những gì về màu sắc?
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
cảm ơn bạn!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Cảm ơn bạn rất nhiều vì thông tin này!!

Một mẹo khác: Tôi đã thêm một hộp văn bản. Để kết hợp hộp văn bản với hình dạng, tôi đã chọn hộp văn bản, nhấn giữ SHIFT, rồi chọn hình dạng. Với cả hai thứ đã chọn, tôi nhấp chuột phải và chọn NHÓM, rồi lại NHÓM.

Khi chúng được nhóm lại, bạn vẫn có thể thay đổi văn bản và định dạng khác.

Để hủy nhóm, chỉ cần nhấp chuột phải vào nút mới của bạn và chọn NHÓM> UNGROUP.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Hoặc, chỉ cần nhấp chuột phải vào hình dạng cho phép bạn thay đổi định dạng và văn bản.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Thx cho mã này. Làm cách nào để xóa nội dung ô hoặc lý tưởng là lấp đầy nó bằng giá trị 0 trong một trang tính được bảo vệ chỉ với một vài ô có thể chỉnh sửa? Thx để được giúp đỡ trên ot.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Thay vì lệnh rõ ràng, một dòng ví dụ ở trên sẽ giống như sau:
Phạm vi ("A2: A5") = 0
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
bạn có thể làm cho nó hoạt động trên một số trang tính?
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Đây cũng là việc xóa biên giới, tôi có thể làm gì?
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
thay đổi clear thành clearcontents thì định dạng sẽ giữ nguyên sau khi xóa. chỉ văn bản sẽ biến mất, không có đường viền và màu, v.v.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Chào. Cách tốt nhất để tạo các nút riêng biệt để xóa nội dung của từng hàng riêng biệt là gì? Ví dụ: data capturer hài lòng với các đầu vào của mọi hàng khác, nhưng sau đó cần xóa hàng 3, hàng 6 và hàng 7. Cách hiệu quả nhất để tạo các nút để xóa theo cách này, tức là chỉ hàng?
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Xin chào, Đặt một nút ở đầu hàng 3,6,7. Gán marco tương tự như trên trên mỗi nút để chỉ xóa hàng cụ thể đó.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Tôi có một sổ làm việc với 11 tab, cộng với một tab ở đầu được đánh dấu là "Bắt đầu ở đây". Tôi muốn tạo một nút trong tab đó để xóa tối đa 9 ô riêng lẻ của nội dung hoặc nhập "0" vào trong mỗi tab này. Các ô tôi muốn xóa không nhất thiết phải nằm ở cùng một vị trí trên mỗi trang. Điều này có khả thi không và nó được thực hiện như thế nào? Tôi cho rằng điều này có thể được thực hiện trong VisualBasic, nhưng liệu có dễ dàng hơn cho một neophyte tạo nó bằng cách sử dụng Macro không?
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Tôi có cùng một câu hỏi
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Sử dụng cái này làm mẫu tập lệnh:
Sub Clearcells ()
'Cập nhật bởi Extendoffice 20161008
Phạm vi ("b11: d22"). ClearContents 'dòng này đề cập đến trang có nút macro.
Phạm vi ("'Mục nhập Điểm Đánh giá'! D2: AA2"). ClearContents 'dòng này đề cập đến một tab và phạm vi khác.
End Sub


Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
chỉ đơn giản là tôi đã làm tương tự trong trang tính, nó hoạt động khi tôi bảo vệ trang tính, nó hiển thị lỗi 1004, bất kỳ đề xuất nào trong trường hợp này?
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Xin chào, Radheshyam,
Để chạy mã trên trong trang tính bảo vệ, vui lòng áp dụng mã dưới đây: (Lưu ý: thay đổi văn bản "mật khẩu" thành mật khẩu bảo vệ trang tính của bạn)
Sub ClearcellsAsProtect ()
Làm mờ xWS dưới dạng trang tính
Làm mờ xPsw dưới dạng chuỗi
Đặt xWS = ActiveSheet
xPsw = "mật khẩu"
On Error Resume Next
xWS.Unprotect Mật khẩu: = xPsw
Phạm vi ("A2", "A5"). Rõ ràng
Phạm vi ("C10", "D18"). Rõ ràng
Phạm vi ("B8", "B12"). Xóa
xWS.Protect Password: = xPsw
End Sub

Hãy cố gắng, hy vọng nó có thể giúp bạn!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Chào,

Tôi sử dụng mã nào nếu tôi chỉ cần xóa một ô duy nhất thay vì một dải ô?
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Xin chào, Jennifer,
Để xóa chỉ một ô, bạn chỉ cần thay đổi mã VBA như sau: (Lưu ý: thay đổi ô A2 thành ô bạn muốn xóa)

Sub Clearcells ()
Phạm vi ("A2"). Rõ ràng
End Sub

Hãy cố gắng, hy vọng nó có thể giúp bạn!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Có cách nào để tôi giữ danh sách xác thực dữ liệu giảm xuống trên các ô không. Ví dụ: danh sách của tôi thả bao gồm Có hoặc Không và tôi muốn đặt lại các ô thành trống nhưng giữ xác thực dữ liệu của tôi ở chế độ nền
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
bạn có thể sử dụng = clear.


ví dụ:

Phạm vi ("A2", "A5") = Rõ ràng
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Nó không hoạt động trên các ô đã hợp nhất. :(
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
thay thế .Clear bằng = ""
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Đối với các ô đã hợp nhất, bạn có nghĩa là có định dạng ví dụ là Phạm vi ("A25", "B25", "C25") = ""?
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Thử cái này,

Ví dụ: Các ô được hợp nhất là cột A và B. Bạn muốn xóa các hàng từ 2 đến 5. Nó sẽ giống như bên dưới.

Sub Clearcells ()
Phạm vi ("A2: B2", "A5: B5"). ClearContents
End Sub
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Làm thế nào để thực hiện trên Google Trang tính?
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Nó bỏ qua mọi thứ bao gồm các đường viền và định dạng Ô, tôi chỉ muốn xóa Dữ liệu.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Xin chào, Karam,
Để chỉ xóa dữ liệu và giữ nguyên định dạng ô, vui lòng áp dụng mã dưới đây:

Sub Clearcells ()
Phạm vi ("A2", "A5"). ClearContents
Phạm vi ("C10", "D18"). ClearContents
Phạm vi ("B8", "B12"). ClearContents
End Sub

Hãy cố gắng, hy vọng nó có thể giúp bạn!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Cảm ơn bạn skyyang
Bây giờ nó hoạt động bình thường
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
cảm ơn bạn
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Định dạng này dường như không hoạt động với tôi, tiếp tục cho tôi "lỗi biên dịch: Dự kiến: kết thúc của câu lệnh"
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Cảm ơn skyyang rất nhiều. Đó chính xác là những gì tôi đang tìm kiếm, để xóa nội dung nhưng KHÔNG phải định dạng. Cảm ơn một lần nữa.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Cám ơn vì cái này. Có cách nào để đặt nhiều hơn một nút rõ ràng trên một trang tính không? Thanks!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
nó không hoạt động
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
khi tôi nhấn nút lệnh xóa, nó cũng xóa các ô liên tục và tôi đã có một công thức trong đó và tôi không muốn xóa các ô đó
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Vui lòng cung cấp cho marco để biết rõ nếu nội dung ô ít hơn 4 số kỹ thuật số. Thanks
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Xin chào! Hoạt động tốt cho tôi với mã này như bạn đã đề cập:

Sub Clearcells ()
Phạm vi ("A2", "A5"). ClearContents
Phạm vi ("C10", "D18"). ClearContents
Phạm vi ("B8", "B12"). ClearContents
End Sub

Tuy nhiên, tôi muốn giữ số "0" hoặc tỷ lệ "0" cho các ô nhất định. Ngoài ra, hãy giữ lại màu đã chọn trước đó. Reson cho điều này là tôi sử dụng những ô này làm ô đầu vào và muốn sử dụng cái mông để xóa các ô đầu vào certin.


Cảm ơn trước!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
tôi đang cố gắng xóa các ô nhất định trên một số tab. Làm thế nào tôi có thể thực hiện điều này? Tôi đã xây dựng một danh sách kiểm tra dài khoảng 100 câu hỏi trên một số tab và rất khó để quay lại và xóa phản hồi khỏi mỗi ô.
Không có bình luận nào được đăng ở đây
Tải thêm
Để lại ý kiến ​​của bạn
Đăng với tư cách khách
×
Đánh giá bài viết này:
0   Nhân vật
Các vị trí được đề xuất

Kết nối với chúng tôi

Bản quyền © 2009 - www.extendoffice.com. | Đã đăng ký Bản quyền. cung cấp bởi ExtendOffice. | BẢN ĐỒ CHI NHÁNH
Microsoft và logo Office là các nhãn hiệu hoặc nhãn hiệu đã đăng ký của Microsoft Corporation tại Hoa Kỳ và / hoặc các quốc gia khác.
Được bảo vệ bởi Sectigo SSL