Trợ giúp: VBA_Lấy các đầu việc trong bảng PTVT và điều tiến độ trong Sheet Project (1 người xem)

[quyenpv]

Xin chào anh chị!
Hiện em có nhu cầu lấy các đầu việc từ Sheet PTVT đưa sang Sheet Project, số lượng đầu việc có thể thêm nhiều các hạng mục từ Sheet PTVT. Mong anh chị giúp đỡ code VBA thỏa mãn các điều kiện sau:
1. Đưa các đầu việc sang Sheet Project
2. Tại Sheet Project khi lấy được các đầu việc sang tự động Copy định dạng từ cột N đến cột BO xuống bằng đúng các đầu việc được lấy từ Sheet PTVT sang
Mục đích của em là sau khi lấy dữ liệu từ phần mềm dự toán em có thể điều tiến độ theo dõi được ạ
Cám ơn anh chị đã xem, mong anh chị giúp đỡ

 

[be_09]

Xin chào anh chị!
Hiện em có nhu cầu lấy các đầu việc từ Sheet PTVT đưa sang Sheet Project, số lượng đầu việc có thể thêm nhiều các hạng mục từ Sheet PTVT. Mong anh chị giúp đỡ code VBA thỏa mãn các điều kiện sau:
1. Đưa các đầu việc sang Sheet Project
2. Tại Sheet Project khi lấy được các đầu việc sang tự động Copy định dạng từ cột N đến cột BO xuống bằng đúng các đầu việc được lấy từ Sheet PTVT sang
Mục đích của em là sau khi lấy dữ liệu từ phần mềm dự toán em có thể điều tiến độ theo dõi được ạ
Cám ơn anh chị đã xem, mong anh chị giúp đỡ

Anh chưa hiểu hết nội dung cần nên chỉ làm tra có 4 cột (dùng tạm code tốc độ hơi chậm).
Nhập dữ liệu vào sheet PTVT xong, sang sheet Project nhấn nút TRA CÔNG VIỆC để xem kết quả.

 

[quyenpv]

Thanks a Be 09!
Em cũng vừa mới tìm ra giải pháp xong
Em quét toàn bộ Sheet PTVT với điều kiện ar(i, 1) <> "" sau đó đưa vào mảng và xuất sang Sheet Project, có bao nhiêu giá trị em đưa vào 1 biến và kéo Fill xuống
Cám ơn anh chị đã ghé qua Topic

 

[be_09]

Cảm ơn a Be 09!
Em cũng vừa mới tìm ra giải pháp xong
Em quét toàn bộ Sheet PTVT với điều kiện ar(i, 1) <> "" sau đó đưa vào mảng và xuất sang Sheet Project, có bao nhiêu giá trị em đưa vào 1 biến và kéo Fill xuống
Cám ơn anh chị đã ghé qua Topic

Còn 1 cách khác là:

For Tung_cot

Nhưng chưa hiểu ý em thế nào nên chưa làm (có nghĩa là tra bất kỳ cột nào theo điều kiện).