Xin chỉ giúp cách thống kê điểm trong một cột bằng VBA (2 người xem)

[ngoclam1088]

Em muốn lập một hàm VBA để tự động đếm số điểm lớn hơn hoặc bằng 5 của Một vùng chọn (theo cột) nào đó để dùng cho nhiều file excel khác nhau.
Vậy kính mong các cao thủ chỉ giúp em với.

 

[nghiaphuc]

Em muốn lập một hàm VBA để tự động đếm số điểm lớn hơn hoặc bằng 5 của Một vùng chọn (theo cột) nào đó để dùng cho nhiều file excel khác nhau.
Vậy kính mong các cao thủ chỉ giúp em với.

Cần gì phải dùng đến VBA. Bạn cứ sử dụng hàm COUNTIF của Excel cũng được mà. Cú pháp: =COUNTIF(Vùng,">=5")

 

[kyo]

Nếu bạn muốn dùng VBA thì có thể sử dụng

Function Count5(vung As Range)
Dim c5 As Integer
Dim Cell As Range
c5 = 0
For Each Cell In vung
    If Cell.Value >= 5 Then c5 = c5 + 1
Next
Count5 = c5
End Function

Nhưng mình thấy xài hàm excel đi cho nó gọn.

 

[nghiaphuc]

Nếu bạn muốn dùng VBA thì có thể sử dụng

Function Count5(vung As Range)
Dim c5 As Integer
Dim Cell As Range
c5 = 0
For Each Cell In vung
    If Cell.Value >= 5 Then c5 = c5 + 1
Next
Count5 = c5
End Function

Nhưng mình thấy xài hàm excel đi cho nó gọn.

Đã lỡ xài VBA thì dùng WorksheetFunction.CountIf cho gọn cũng được kyo!

 

[ngoclam1088]

Hix. Vấn đề là mình không muốn dùng hàm counif một cách nhàm chán khi phải lập công thức lại trên các file khác nhau. Mình ý định dùn VBA để lập một add-in cho excel và khi đó mỗi khi mình mở file chạy cái macro đó là xuất kết quả đếm trên vùng mình chọn ngay đó mà. Bạn nào có thể giúp mình với.

 

[ngoclam1088]

Hì. Mình làm được rùi. Cảm ơn mọi người rất nhiều nhé