Nhờ giúp đỡ code VBA lọc theo điều kiện và xóa dòng lỗi

Liên hệ QC

baggiotung

Thành viên mới
Tham gia
16/10/09
Bài viết
32
Được thích
7
Vì post sai khu vực nên mình posh lại nhờ các anh chị trong góc lập trình giúp:
Mình có file tổng hợp trên 200 cột và 1000 dòng. Mình xin giúp đỡ code vba với các diều kiện sau:
  • Code vba1:Mình có sheet dữ liệu gốc. muốn lọc và copy sheet này qua 1 file khác (hoặc sheet khác) với 3 nội dung sau:
    • đã ẩn đi hàng ở cột "loại hình duy tu" theo giá trị được chọn ở ô C5.
    • Ẩn đi các cột có giá trị =0 từ cột M5 đến cột BB5
    • Chỉ lọc các cột có màu xanh lá cây ở dòng thứ 9 (không phải cố định mà mình tô màu theo các ô cần để lọc)
  • Code vba2: Mình muốn xóa 1 dòng dư (dòng thứ 17) mà không làm thay đổi số thứ tự ở cột B. (thao tác tay là xóa dữ liệu từ c17 đến bb17 và move tất cả dữ liệu ở dưới lên 1 dòng).
  • Code vba3: mở rộng ra code vba2 với xóa hết các hạng mục được chọn ở ô c5
Xin chân thành cảm ơn diễn đàn
 

File đính kèm

  • file THVT2020 (1).xlsm
    85.9 KB · Đọc: 8
Vì post sai khu vực nên mình posh lại nhờ các anh chị trong góc lập trình giúp:
Mình có file tổng hợp trên 200 cột và 1000 dòng. Mình xin giúp đỡ code vba với các diều kiện sau:
  • Code vba1:Mình có sheet dữ liệu gốc. muốn lọc và copy sheet này qua 1 file khác (hoặc sheet khác) với 3 nội dung sau:
    • đã ẩn đi hàng ở cột "loại hình duy tu" theo giá trị được chọn ở ô C5.
    • Ẩn đi các cột có giá trị =0 từ cột M5 đến cột BB5
    • Chỉ lọc các cột có màu xanh lá cây ở dòng thứ 9 (không phải cố định mà mình tô màu theo các ô cần để lọc)
  • Code vba2: Mình muốn xóa 1 dòng dư (dòng thứ 17) mà không làm thay đổi số thứ tự ở cột B. (thao tác tay là xóa dữ liệu từ c17 đến bb17 và move tất cả dữ liệu ở dưới lên 1 dòng).
  • Code vba3: mở rộng ra code vba2 với xóa hết các hạng mục được chọn ở ô c5
Xin chân thành cảm ơn diễn đàn
Xem File củ chuối này thử xem, cần lưu ý khi dùng:
1/ Trong ổ D tạo 1 Folder có tên là THEO DOI VAT TU rồi cho File THVT2020 vào.
2/ Mở File rồi vào B5 sheet du_lieu_goc chọn 1 loại Duy tu rồi nhấn nút tại J1, nó sẽ lưu tên File theo B5 và lưu File cùng Folder với File THVT2020.
3/ Khi lưu tên File mà trùng tên thì nó hiện thông báo và hỏi Do you want to replace it? Bạn nhấn Yes để ghi đè lên.
4/ Theo yêu cầu "2" tôi đã thay hàm khác vào.
 

File đính kèm

  • file THVT2020.xlsm
    76.8 KB · Đọc: 7
Lần chỉnh sửa cuối:
Upvote 0
Xem File củ chuối này thử xem, cần lưu ý khi dùng:
1/ Trong ổ D tạo 1 Folder có tên là THEO DOI VAT TU rồi cho File THVT2020 vào.
2/ Mở File rồi vào B5 sheet du_lieu_goc chọn 1 loại Duy tu rồi nhấn nút tại J1, nó sẽ lưu tên File theo B5 và lưu File cùng Folder với File THVT2020.
3/ Khi lưu tên File mà trùng tên thì nó hiện thông báo và hỏi Do you want to replace it? Bạn nhấn Yes để ghi đè lên.
4/ Theo yêu cầu "2" tôi đã thay hàm khác vào.
Cám ơn bạn nhiều nhé, không thấy hàm khác trong file bạn gởi theo yêu cầu 2.
 
Lần chỉnh sửa cuối:
Upvote 0
Bạn nêu yêu cầu 2 (cột B) là không đúng, theo File của bạn thì số thứ tự phải là cột A chứ, xem hàm tại A10 của sheet du_lieu_goc.
ý là hàm đánh thứ tự mình ko cần vì mình làm đc, chỉ cần code xóa hàng và di chuyển dữ liệu lên như yêu cầu 2 và 3 thôi . Bạn giúp tiếp nhé. cảm ơn
 
Upvote 0
ý là hàm đánh thứ tự mình ko cần vì mình làm đc, chỉ cần code xóa hàng và di chuyển dữ liệu lên như yêu cầu 2 và 3 thôi . Bạn giúp tiếp nhé. cảm ơn
Bài 2 đã đáp ứng yêu cầu của bạn, bạn muốn xóa gì thì tự xóa nó đâu có ảnh hưởng gì đến code.
 
Upvote 0
Web KT

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

Back
Top Bottom