Giúp em cách Gộp nhiều sheet vào 1 sheet! (2 người xem)

[trinhcuongk]

Em có 1 file exls hộ em cách Gộp nhiều sheet vào 1 sheet!

 

[Ba Tê]

Em có 1 file exls hộ em cách Gộp nhiều sheet vào 1 sheet!

Gộp là sao.
Trong file bạn đã có 1 Sub TongHop rồi, chạy thử xem sao.

 

[trinhcuongk]

Gộp là sao.
Trong file bạn đã có 1 Sub TongHop rồi, chạy thử xem sao.

Em chạy nhưng cứ bị mất dòng. không đủ dữ liệu

 

[be_09]

Em chạy nhưng cứ bị mất dòng. không đủ dữ liệu

Bị mất cột chứ, sửa đoạn này lại.

Range("A2:N65536").ClearContents

và đoạn này.

Range("A2", [N65536].End(xlUp)).Copy _
ActWsh.Range("A" & ActWsh.[A65536].End(xlUp).Row + 1)

 

[trinhcuongk]

Bị mất cột chứ, sửa đoạn này lại.

Range("A2:N65536").ClearContents

và đoạn này.

Range("A2", [N65536].End(xlUp)).Copy _
ActWsh.Range("A" & ActWsh.[A65536].End(xlUp).Row + 1)

Hiii e làm bị mất dòng cơ anh hộ em xem lại với. Chẳng hạn sheet Ngam cach có 431 dòng nhưng khi chạy chỉ còn 429 dòng