Copy dữ liệu không bị ẩn từ sheet này sang sheet khác

[tham216]

Em chào mọi người ạ.
Em đang có 1 file excel đầu tiên sẽ lọc dữ liệu theo các mốc thời gian 9:30 ; 11:00 ; 13:00 ; 14:00 ; 15:00 ; 17:00 sau đó copy những dữ liệu này sang sheet data.
Mọi người giúp em với ạ.

 

[thaoduyen555]

Tô chọn các cột, dòng cần sao chép > Nhấn F5 > Chọn Special > Tích chọn Visible cell onlys > Nhấn OK > Thực hiện copy và paste kết quả nhé

 

[HUONGHCKT]

Em chào mọi người ạ.
Em đang có 1 file excel đầu tiên sẽ lọc dữ liệu theo các mốc thời gian 9:30 ; 11:00 ; 13:00 ; 14:00 ; 15:00 ; 17:00 sau đó copy những dữ liệu này sang sheet data.
Mọi người giúp em với ạ.

File giả định đâu? người giúp giúp bạn bằng cách lâp file giả định cho bạn à? Một ý tưởng cần xem xét lại.
Hay đưa file giả định nên và mô tả kỹ bằng 1 vài dòng kết quả mong muốn, thì mới có bài giải.

 

[tham216]

File giả định đâu? người giúp giúp bạn bằng cách lâp file giả định cho bạn à? Một ý tưởng cần xem xét lại.
Hay đưa file giả định nên và mô tả kỹ bằng 1 vài dòng kết quả mong muốn, thì mới có bài giải.

Mình quên mất đính kèm file.
đây là file giả định của mình

 

[Hoàng Tuấn 868]

Mình quên mất đính kèm file.
đây là file giả định của mình

Đây là code giả định cho file của bạn.
Sub Gia_dinh()
Dim giadinh as long
Dim ...
End sub

 

[VetMini]

Sử dụng Advanced Filter. Chọn copy qua sheet khác thì nó sẽ làm luôn.

 

[tham216]

Đây là code giả định cho file của bạn.
Sub Gia_dinh()
Dim giadinh as long
Dim ...
End sub

Mình chưa hiểu ý bạn cho lắm, bạn nói rõ cho mình được không

 

[Hoàng Tuấn 868]

Mình chưa hiểu ý bạn cho lắm, bạn nói rõ cho mình được không

Tức là từ tuần trước đến giờ mà vẫn không thấy file của bạn xuất hiện, giờ nếu có chắc cũng chẳng ai ngó đến nữa.

 

[tham216]

Tức là từ tuần trước đến giờ mà vẫn không thấy file của bạn xuất hiện, giờ nếu có chắc cũng chẳng ai ngó đến nữa.

Mình có đính kèm file nhưng k hiểu tại sao nó lại không lên đc.
Dù gì cũng cảm ơn bạn đã quan tâm, mình làm được rồi.

 

[SGTaoLao]

Đây là code bạn cần.
Copy dữ liệu bỏ qua dòng ẩn.
Tự áp dụng nhé.

    sheet1.Range("").SpecialCells(xlVisible).Copy