Thống kê môn học theo học sinh.

[changngoc]

Chào anh chị,

Hiện mình đang lập một bảng: Cột 1 là tên các học sinh, các môn học được lập theo hàng ngang và mõi học sinh học môn nào thì được đánh dấu vào tương ứng.

Cuối cùng, mình muốn thống kê mõi học sinh sẽ học những môn nào để gửi đến từng học sinh cho nhanh và dễ theo dõi (xem chi tiết ở file đính kèm).
Mình dùng pivotTable mà không được.

Nhờ các AC hướng dẫn giúp.

Cảm ơn các AC

 

[Let'GâuGâu]

Chào anh chị,

Hiện mình đang lập một bảng: Cột 1 là tên các học sinh, các môn học được lập theo hàng ngang và mõi học sinh học môn nào thì được đánh dấu vào tương ứng.

Cuối cùng, mình muốn thống kê mõi học sinh sẽ học những môn nào để gửi đến từng học sinh cho nhanh và dễ theo dõi (xem chi tiết ở file đính kèm).
Mình dùng pivotTable mà không được.

Nhờ các AC hướng dẫn giúp.

Cảm ơn các AC

Nếu vba thì quá dể

Sub chuyenthanhcot()
Dim bang, kq(1 To 60000) As Variant, i, j, k As Long
bang = [b3:j7]
For i = 2 To UBound(bang)
    k = k + 1
    kq(k) = bang(i, 1)
    For j = 2 To UBound(bang, 2)
        If bang(i, j) = "x" Then
            k = k + 1
            kq(k) = bang(1, j)
        End If
    Next j
Next i

If k Then [B10].Resize(k) = Application.WorksheetFunction.Transpose(kq)
End Sub

công thức thì đúng là một sự thách thức

 

[changngoc]

Mình chưa hiểu ý bạn lắm.

Có ACE nào còn cách nào khác không, ví dụ như PivotTable, hoặc có giải pháp nào tốt hơn cũng được.

Thanks.