Tao nút xóa nhiều vùng khác nhau của nhiều ô

[duynhat84]

Em tìm trên diễn đàn thấy cách tạo nút xóa nhiều vùng trong 1 sheet
nhờ Các Anh Chị giúp em phát triển thêm để xóa nhiều vùng khác nhau của nhiều sheet, em gửi File kèm theo.
Em xin cảm ơn nhiều


Cảm ơn đại ca MinhThien321 rất nhiều theo hướng dẫn bây giờ em có thể tuy biến thỏa mái.

 

[Hoàng Trọng Nghĩa]

Đơn giản thôi, chỉ cần làm như vầy, bạn tùy biến thoải mái:

Private Sub CommandButton1_Click()
  Sheets("Sheet1").Range("A1:A3,B2,B4,B6").ClearContents
  Sheets("Sheet2").Range("C1:C6").ClearContents
  Sheets("Sheet3").Range("E1,E3,E5,F2,F4,F6").ClearContents
End Sub