Em có 2 hàm giùm để xóa và copy lại mà nó dài quá. Mấy a/c giúp đỡ em rút ngắn lại với.
Em có tới 33 sheet lận.
1/ Dùng để xóa số liệu các sheet:
Sub Clears()
Worksheets(2).Range("B7:C61,B79:C133,B151:C205,B223:C277,B295:C349,B367:C421,B439:C493").ClearContents...