Cần giúp về lọc danh sách ở sheet (2 người xem)

[phamxuanyen]

Làm cách nào để khi em chọn lớp 10C2 thì tự động lấy bên " danh sach tong hop" nhập qua danh sách lớp là lớp 10C2. xin quí pro giúp em.
Tương ứng sẽ nhập cột nữ qua bên danh sách lớp luôn

 

[hoangminhtien]

Bạn xem trong file đính kèm nhé!

 

[MinhNguyệt]

Làm cách nào để khi em chọn lớp 10C2 thì tự động lấy bên " danh sach tong hop" nhập qua danh sách lớp là lớp 10C2. xin quí pro giúp em.
Tương ứng sẽ nhập cột nữ qua bên danh sách lớp luôn

Chép đoạn code này vào trong modul của sheet danh sach lop

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Cells.Address = "$C$2" Then
        Loc
    End If
End Sub

 
Sub Loc()
    Sheet1.Range("A5:C54").ClearContents
    n = Sheet2.Range("A65000").End(xlUp).Row
    For i = 4 To n
        If Sheet2.Range("A" & i) = Sheet1.Range("C2") Then
            j = Sheet1.Range("A65000").End(xlUp).Row + 1
            With Sheet1
                .Range("A" & j) = Sheet2.Range("B" & i)
                .Range("B" & j) = Sheet2.Range("C" & i)
                .Range("C" & j) = Sheet2.Range("D" & i)
            End With
        End If
    Next
End Sub

Xem file đính kèm

P/S : Có thể dùng AutoFilter mà lọc
Thân

 

[SA_DQ]

Cái ni lẹ làng hơn nè, mại zô

Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
 If Not Intersect(Target, [C2]) Is Nothing Then
   Dim Sh As Worksheet, Rng As Range, eRw As Long
   
   Set Sh = Sheet2:
   eRw = Sh.[A3].CurrentRegion.Rows.Count
   Set Rng = Sh.Range("A3:D" & eRw)
   Rng.AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Sh.[F1].Resize(2), _
      CopyToRange:=Sh.Range("H3:I3"), Unique:=False
   Sh.[h3].CurrentRegion.Offset(1).Copy Destination:=[B5]
 End If
End Sub

 

[Hai Lúa Miền Tây]

Làm cách nào để khi em chọn lớp 10C2 thì tự động lấy bên " danh sach tong hop" nhập qua danh sách lớp là lớp 10C2. xin quí pro giúp em.
Tương ứng sẽ nhập cột nữ qua bên danh sách lớp luôn

Thêm 1 cách cho bạn tham khảo, khỏi dùng hàm, VBA.
Đó là PivotTable, bạn xem file nhé.

 

[phamxuanyen]

Bạn xem trong file đính kèm nhé!

anh oi sao danh sách trích bỏ đi 5 người đầu tiên. xem lại dùm em cái

 

[Excel Công Cụ Tuyệt Vời Của Bạn]

anh oi sao danh sách trích bỏ đi 5 người đầu tiên. xem lại dùm em cái

Mình thấy có đầy đủ mà bạn, kiểm tra lại xem

 

[phamxuanyen]

Bạn xem trong file đính kèm nhé!

Trong file đính kèm em không hiểu chỗ =IF(OR(OFFSET('Danh sach tong hop'!C$1,SMALL(dong,ROWS($1:1))-1,0)="",B4=""),"",OFFSET('Danh sach tong hop'!C$1,SMALL(dong,ROWS($1:1))-1,0))
em không hiểu chỗ dòng, rows cách làm như thế nào. XIn anh giúp em.

 

[dhn46]

Bạn bấm tổ hợp phím Ctrl + F3 hoặc Insert > Name > Define để có thông tin về các name
Ôi trời ạ hỏi năm 2010 tới cuối năm 2012 mới thắc mắc...híc