xin giúp đỡ code chỉ lọc được 1 lần (1 người xem)

[langtuchungtinh360]

như tiêu đề mình nêu. mọi người xem giúp mình code chạy tại sheet MTN, nội dung code ởModules NHap

Sub LocDuLIeuMTN()
With [Sheet12]
Xoa Sheet12.[A21:H81]
Sheet20.[A:H].AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=Range("trido"), CopyToRange:=Sheet12.[A21], Unique:=False
End With
End Sub

khi mình chạy thử thì chỉ chạy được 1 lần, còn lần thứ 2 thì dữ liệu trống.
trong khi code đó nằm trong Modules LocDuLieu / Sub LOCMTN()y chang như thế thì lạy chạy bình thường.
http://www.mediafire.com/download/mtcfuo5jlfqw593/Hồ_sơ_KCS.rar
https://www.fshare.vn/file/BYN35AM3AWDU

 

[ndu96081631]

như tiêu đề mình nêu. mọi người xem giúp mình code chạy tại sheet MTN, nội dung code ởModules NHap

Sub LocDuLIeuMTN()
With [Sheet12]
Xoa Sheet12.[A21:H81]
Sheet20.[A:H].AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=Range("trido"), CopyToRange:=Sheet12.[A21], Unique:=False
End With
End Sub

khi mình chạy thử thì chỉ chạy được 1 lần, còn lần thứ 2 thì dữ liệu trống.
trong khi code đó nằm trong Modules LocDuLieu / Sub LOCMTN()y chang như thế thì lạy chạy bình thường.
http://www.mediafire.com/download/mtcfuo5jlfqw593/Hồ_sơ_KCS.rar
https://www.fshare.vn/file/BYN35AM3AWDU

Bỏ AutoFilter cột A rồi chạy lại code thử xem

 

[langtuchungtinh360]

Bỏ AutoFilter cột A rồi chạy lại code thử xem

vậy sao nó ẩn mấy dòng không có dữ liệu được thầy. em muốn nó cập nhật dữ liệu mới rồi fix luôn.