[VBA] Cần hỗ trợ copy dữ liệu từ nhiều sheet vào trong cùng 1 sheet bằng code VBA

[mnhmeo003]

Xin chào các anh, chị và admin, em đang có một case cần sử dụng code vba nhưng do chưa thành thạo mong anh, chị và admin giúp đỡ ạ.
Hiện tại em cần tạo một nút trong sheet "General", khi nhấn vào nút thì:
- Các dòng dữ liệu trong sheet "General" từ dòng phía dưới row "Name/Location/Revenue/Date" đến trên row "Total" sẽ bị xóa.
- Các dòng dữ liệu trong các sheet còn lại từ dòng phía dưới row "Name/Location/Revenue/Date" đến trên row "Total" sẽ được copy tuần tự và thêm mới vào trong sheet "General" nằm ở dưới row "Name/Location/Revenue/Date" và trên row "Total".
Về case này là nhằm mục đích thêm các dòng dữ liệu tự động từ các sheet riêng biệt vào trong cùng 1 sheet để quản lý và mỗi lần có dữ liệu mới sẽ nhấn button để thêm mới dữ liệu từ các sheet khác vào trong sheet "General".
Mong anh, chị và admin xem giúp em với ạ.
Em chân thành cảm ơn và chúc mọi người một ngày làm việc vui vẻ ạ

 

[PacificPR]

Xin chào các anh, chị và admin, em đang có một case cần sử dụng code vba nhưng do chưa thành thạo mong anh, chị và admin giúp đỡ ạ.
Hiện tại em cần tạo một nút trong sheet "General", khi nhấn vào nút thì:
- Các dòng dữ liệu trong sheet "General" từ dòng phía dưới row "Name/Location/Revenue/Date" đến trên row "Total" sẽ bị xóa.
- Các dòng dữ liệu trong các sheet còn lại từ dòng phía dưới row "Name/Location/Revenue/Date" đến trên row "Total" sẽ được copy tuần tự và thêm mới vào trong sheet "General" nằm ở dưới row "Name/Location/Revenue/Date" và trên row "Total".
Về case này là nhằm mục đích thêm các dòng dữ liệu tự động từ các sheet riêng biệt vào trong cùng 1 sheet để quản lý và mỗi lần có dữ liệu mới sẽ nhấn button để thêm mới dữ liệu từ các sheet khác vào trong sheet "General".
Mong anh, chị và admin xem giúp em với ạ.
Em chân thành cảm ơn và chúc mọi người một ngày làm việc vui vẻ ạ

Bạn tham khảo thử

 

[mnhmeo003]

Bạn tham khảo thử

Thank anh, code này hoạt động rất tốt ạ. Em xin hỏi anh thêm phần nữa ạ.
Giả sử em có thêm 6 sheet "Report" phía sau sheet "Quảng Ninh", nhưng mà em ko cần lấy dữ liệu từ sheet đó mà chỉ cần lấy từ sheet "HCM" tới "Quảng Ninh" thôi. Không biết anh có thể hỗ trợ em thềm phần này được ko ạ. Em xin cảm ơn ạ

 

[kokano90]

Thank anh, code này hoạt động rất tốt ạ. Em xin hỏi anh thêm phần nữa ạ.
Giả sử em có thêm 6 sheet "Report" phía sau sheet "Quảng Ninh", nhưng mà em ko cần lấy dữ liệu từ sheet đó mà chỉ cần lấy từ sheet "HCM" tới "Quảng Ninh" thôi. Không biết anh có thể hỗ trợ em thềm phần này được ko ạ. Em xin cảm ơn ạ

Bạn thử test file này coi đúng ý không. Tên sheet không viết có dấu nhé

 

[mnhmeo003]

Bạn thử test file này coi đúng ý không. Tên sheet không viết có dấu nhé

Dạ cảm ơn anh ạ

 

[kokano90]

Dạ cảm ơn anh ạ

Mai mốt có thêm cái mới thì bạn tự sửa code lấy. Tại trong code có chỉ định là lấy những sheet từ HCM đến QUANG NINH

 

[mnhmeo003]

Mai mốt có thêm cái mới thì bạn tự sửa code lấy. Tại trong code có chỉ định là lấy những sheet từ HCM đến QUANG NINH

Dạ cảm ơn anh đã hướng dẫn, trong quá trình làm case của em có một số phát sinh, không biết anh có thể chỉ cho em một số chỗ ko.
- Thay vì mình phải xóa hết dữ liệu ở sheet "General" sau đó dán lại các dữ liệu cũ và mới từ các sheet khác. Vậy mình có thể kiểm tra các dữ liệu nào đã tồn tại ở sheet "General" giống với các sheet còn lại thì không cần xóa mà chỉ thêm mới các dữ liệu chưa có được không anh.

 

[kokano90]

Thay vì mình phải xóa hết dữ liệu ở sheet "General" sau đó dán lại các dữ liệu cũ và mới từ các sheet khác. Vậy mình có thể kiểm tra các dữ liệu nào đã tồn tại ở sheet "General" giống với các sheet còn lại thì không cần xóa mà chỉ thêm mới các dữ liệu chưa có được không anh.

cái đó để mục đích gì

 

[mnhmeo003]

cái đó để mục đích gì

Dạ, là trong sheet "General" ngoài các cột dữ liệu giống với các sheet còn lại thì sẽ còn các cột dữ liệu riêng của nó nữa, không có trong các sheet còn lại. Mà mình xóa hết dữ liệu sau đó thêm lại cả cũ và mới thì các dòng dữ liệu cũ không có trong các sheet khác sẽ nằm lộn xộn.

 

[tettet147258]

Bạn tham khảo thử

hi bạn. mình cần viết 1 quản lý khách hàng. bạn nhận thì cho mình sdt liên hệ nhé

 

[SA_DQ]

hi bạn. mình cần viết 1 quản lý khách hàng. bạn nhận thì cho mình sdt liên hệ nhé

Số của bạn í là 9090909090