Giúp Xóa Dữ liệu cột 1 Cách Tự Động

Liên hệ QC

Gagas

Thành viên mới
Tham gia
1/5/20
Bài viết
16
Được thích
4
E có file đơn hàng tải từ wed về hằng ngày để coppy vào file quản lý riêng ... nhưng file wed lại có rất nhiều cột không cần thiết , mấy bác giúp e code để tự động xóa hết dữ liệu trong cột màu xanh, mỗi khi coppy dữ liệu vào, để cột đó thành cột trống, được không ạ ! E cảm ơn nhiều ạ
 

File đính kèm

  • File Khách Hàng.xlsx
    132.7 KB · Đọc: 10
E có file đơn hàng tải từ wed về hằng ngày để coppy vào file quản lý riêng ... nhưng file wed lại có rất nhiều cột không cần thiết , mấy bác giúp e code để tự động xóa hết dữ liệu trong cột màu xanh, mỗi khi coppy dữ liệu vào, để cột đó thành cột trống, được không ạ ! E cảm ơn nhiều ạ
Bạn muốn xóa thế nào nhỉ?
1. Xóa mỗi khi mở file? hoặc
2. Xóa mỗi khi bạn copy vào file? hoặc
3. Xóa khi bạn nhấn nút "Xóa"?
 
Upvote 0
Bạn muốn xóa thế nào nhỉ?
1. Xóa mỗi khi mở file? hoặc
2. Xóa mỗi khi bạn copy vào file? hoặc
3. Xóa khi bạn nhấn nút "Xóa"?
Xoá mỗi khi mình coppy vào á bạn(2) , xem như vô hiệu cột tô màu ... Vì mình coppy 1 file khác giống zi từ wed vào mà có những cột đó không cần thiết
Cảm ơn bạn
Bài đã được tự động gộp:

Xoá mỗi khi mình coppy vào á bạn(2) , xem như vô hiệu cột tô màu ... Vì mình coppy 1 file khác giống zi từ wed vào mà có những cột đó không cần thiết
Cảm ơn bạn
Là làm cho Cột tô màu auto bị trống dữ liệu, chỉ còn là cột thứ tự thôi ạ
 
Upvote 0
Xoá mỗi khi mình coppy vào á bạn(2) , xem như vô hiệu cột tô màu ... Vì mình coppy 1 file khác giống zi từ wed vào mà có những cột đó không cần thiết
Cảm ơn bạn
Bài đã được tự động gộp:


Là làm cho Cột tô màu auto bị trống dữ liệu, chỉ còn là cột thứ tự thôi ạ
Thử thế này xem được không, nhấn F1 để xóa nhé
 

File đính kèm

  • File Khách Hàng.xlsb
    107.6 KB · Đọc: 27
Upvote 0
Thử thế này xem được không, nhấn F1 để xóa nhé
Dạ Anh ơi.. cho e phiền a thêm tí ạ ... lúc nảy dow về trên máy nét thì oke .... về máy nhà thì nhấn F1 nó hiện ra khung help mà không chạy lệnh xóa ạ ! Cảm ơn anh
 

File đính kèm

  • Untitled.png
    Untitled.png
    223.2 KB · Đọc: 14
Upvote 0
Dạ Anh ơi.. cho e phiền a thêm tí ạ ... lúc nảy dow về trên máy nét thì oke .... về máy nhà thì nhấn F1 nó hiện ra khung help mà không chạy lệnh xóa ạ ! Cảm ơn anh
Bạn tắt file mở lại đc không bạn? nếu k đc thử file này,mình add nút xoá ngoài.

Chúc bạn thành công.
 

File đính kèm

  • File Khách Hàng.xlsb
    92.8 KB · Đọc: 11
Upvote 0
Dạ Anh ơi.. cho e phiền a thêm tí ạ ... lúc nảy dow về trên máy nét thì oke .... về máy nhà thì nhấn F1 nó hiện ra khung help mà không chạy lệnh xóa ạ ! Cảm ơn anh
file lần đầu mở yêu cầu enable macro, bạn enable xong lưu lại, đóng file rồi mở lại là được
 
Upvote 0
Bạn tắt file mở lại đc không bạn? nếu k đc thử file này,mình add nút xoá ngoài.

Chúc bạn thành công.
Dạ Nút Xóa Ngoài chỉ xóa dc Dữ Liệu Từ dòng 846 trở lên thôi ạ ! hic ....
Bài đã được tự động gộp:

file lần đầu mở yêu cầu enable macro, bạn enable xong lưu lại, đóng file rồi mở lại là được
Dạ nó hiện Enble 2 lần lun ạ ... e click vào 2 kái .. xong save lại, thoát ra ... vào nhấn F1 không chạy lệnh ạ ! :)
 

File đính kèm

  • Untitledâ.png
    Untitledâ.png
    105.4 KB · Đọc: 8
  • macro1.png
    macro1.png
    160.2 KB · Đọc: 5
  • macro2.png
    macro2.png
    148.4 KB · Đọc: 5
Upvote 0
Dạ Nút Xóa Ngoài chỉ xóa dc Dữ Liệu Từ dòng 846 trở lên thôi ạ ! hic ....
Bài đã được tự động gộp:


Dạ nó hiện Enble 2 lần lun ạ ... e click vào 2 kái .. xong save lại, thoát ra ... vào nhấn F1 không chạy lệnh ạ ! :)

Sub ClearData()
i = Range("A99999").End(xlUp).Row
Range("F2:F" & i).ClearContents
Range("H2:S" & i).ClearContents
End Sub

Toàn bộ cột màu xanh đã đc xóa,code trên xem cần xóa cột nào add thêm vào nha.
 
Upvote 0
Sub ClearData()
i = Range("A99999").End(xlUp).Row
Range("F2:F" & i).ClearContents
Range("H2:S" & i).ClearContents
End Sub

Toàn bộ cột màu xanh đã đc xóa,code trên xem cần xóa cột nào add thêm vào nha.
DẠ Ngại quá , e không biết sài VBA ạ ! Anh làm giúp e hộ kái file luôn đc không ạ , phím tắt hay Nút gì cũng được hết ạ .... khuya rồi còn làm phiền 2 Anh , e ngại quá
 

File đính kèm

  • File Khách Hàng.xlsx
    132.7 KB · Đọc: 3
Upvote 0
Ok bạn,mai giúp bạn nhé,h mình k có ngồi máy.
Dạ oke Anh ... nay e phiền 2 Anh nhiều Quá ! Cảm ơn 2 anh nhiều , chúc 2 anh ngủ ngon ạ !
Bài đã được tự động gộp:

file lần đầu mở yêu cầu enable macro, bạn enable xong lưu lại, đóng file rồi mở lại là được
Cảm ơn anh đã hỗ trợ em ạ , tiếc là e ngu quá ! chúc anh buổi tối ấm áp ạ
 
Upvote 0
Dạ oke Anh ... nay e phiền 2 Anh nhiều Quá ! Cảm ơn 2 anh nhiều , chúc 2 anh ngủ ngon ạ !
Bài đã được tự động gộp:


Cảm ơn anh đã hỗ trợ em ạ , tiếc là e ngu quá ! chúc anh buổi tối ấm áp ạ
E MÒ RA ĐƯỢC RỒI Ạ ! CHO E CẢM ƠN 2 ANH LẦN NỬA NHÉ ! E PHIỀN 2 ANH NHIỀU RỒI ....
 
Upvote 0
Web KT

Bài viết mới nhất

Back
Top Bottom