code ban đầu:
Sub Loc()
Range("A10:G9999").Clear
Range("I10
1118").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range _
("A1:G3"), CopyToRange:=Range("A10:G10"), Unique:=False
Range("A10
10").Autofilter
End Sub
m muốn thêm lệnh:
nếu ("A2:G3") = rỗng thì copy ("I10
1118") vào ("A10:G10")
thì phải làm như thế nào mọi người giúp m với
PS: cùng điều kiện lọc như nhau tại sao ("A1:G3") và ("A5:G7") lại cho ra kết quả lọc khác nhau?
A5 = IF(A2="","",A2)
file tải hợp âm:
https://1drv.ms/x/s!Al_2ZogbnXDjgmdjolXroF5IW1yF

