tôi có một bảng điểm dữ liệu và một ô list để chọn điểm ở ngoài bảng dữ liệu, tôi muốn khi chọn điểm ở ô list thì dữ liệu trong bảng chỉ hiện danh sách những học sinh thỏa mãn điểm ở ô list. Mong mọi người giúp đỡ. Xin cám ơn.
option explicit
private sub worksheet_change(byval target as range)
if not intersect(target, [d1]) is nothing then _
filter
end sub
sub filter()
dim sh as worksheet
set sh = sheets("bd")
sh.range("a1:b37").advancedfilter action:=xlfiltercopy, criteriarange:=sh.range( _
"f1:g2"), copytorange:=range("a2:b2"), unique:=false
end sub