chào Team Gitihoviệc lấy dữ liệu từ sheet này sang sheet khác trong cùng 1 workbook(wb)

Chào bạn, bạn xem chương 5 bài 110 nhé

Chào bạn bạn có thể mô tả rõ hơn giúp gitiho được không?

chào Team Gitiho!!!!

vấn đề trên đã dược giải quyết 

tôi còn 1 vấn đề cần Team hỗ trợ

code và hình như sau:

sub sgsgsgs()

  If Int(Worksheets("Record").Range("h1")) <> Int(Now()) Then

  MsgBox "ok "

else

    Exit Sub

 If Int(Worksheets("Record").Range("h11")) <> Int(Now()) Then

  MsgBox "ok "

else

    Exit Sub

  'End If

.......................

end sub

cột "H" này có n ô như vậy và mỗi ô đã được Marge & center từ 10 ô nhỏ

việc viết code đến hết sẽ rất dài và bị giới hạn

vậy có cách nào tạo 1 Function hoặc tạo 1 biến vòng lặp có bước nhảy Step = n đến dòng cuối được không ạ

xin hướng dẫn

Chào bạn phần này là nguyên tắc của dữ liệu là không có gộp ô, việc gộp ô chỉ thực hiện khi làm báo cáo để đẹp thôi bạn nhé.