minhngoc90qn_lekhiet
Thành viên mới
- Tham gia
- 27/12/09
- Bài viết
- 3
- Được thích
- 1
Bạn Right click vào nhãn sheet TheKho và dán code này vào:Tại thẻ kho tạo macro rút trích có điều kiện theo mã hàng từ Sheet trung gian sang - Yêu cầu: macro phân loại theo mã hàng và các dòng dư mình đã ngoặc tự mất đi các pro giúp e với ạ. E cảm ơn rất nhiều ạ
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$F$5" Then Exit Sub
Rows("9:40").Hidden = False
[A10:D39].ClearContents
Sheets("TrungGian").[A2:N1000].AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=[F4:F5], CopyToRange:=[A9:D9], Unique:=True
Range([A40].End(xlUp).Offset(1), [A39]).EntireRow.Hidden = True
End Sub