Hàm Countif trong VBA

[khoahung1202]

Các anh chị cho em hỏi với là: làm thế nào để sử dụng hàm countif trong VBA giữa nhiều sheet khác nhau ạ,và làm thế nào để mình gán giá trị vừa tìm được bằng hàm countif cho 1 ô trong vba ạ.Em ko biết nói tình huống cụ thể của em như thế nào để anh chị hình dung nên em chỉ hỏi cách sử dụng các hàm thôi ạ.Mong nhận được sự giúp đỡ của anh chị và đừng la em vì đây là lần đầu tiên em đăng bài lên 01 diễn đàn ạ.Em cảm ơn ạ.

 

[Hoàng Nhật Phương]

Các anh chị cho em hỏi với là: làm thế nào để sử dụng hàm countif trong VBA giữa nhiều sheet khác nhau ạ,và làm thế nào để mình gán giá trị vừa tìm được bằng hàm countif cho 1 ô trong vba ạ.Em ko biết nói tình huống cụ thể của em như thế nào để anh chị hình dung nên em chỉ hỏi cách sử dụng các hàm thôi ạ.Mong nhận được sự giúp đỡ của anh chị và đừng la em vì đây là lần đầu tiên em đăng bài lên 01 diễn đàn ạ.Em cảm ơn ạ.

Chào Bạn,Bạn có thể đính kèm thêm file và nêu cụ thể hơn countif từ đâu vào đâu được không?

 

[befaint]

được không?

Không nhé. Vì mới đăng bài nên chưa biết làm.

 

[VetMini]

a = array("sheet1", "A1:A10", "sheet2", "B1:B10", "sheet3",...) ' mỗi sheet là một range khác nhau?
For i = LBound(a) To UBound(a) Step 2
tong = tong + application.countif(worksheets(a(i)).range(a(i+1)), "điều kiện")
Next i
[Ô cần gán vào].Value = tong

 

[khoahung1202]

Các anh chị cho em hỏi với là: làm thế nào để sử dụng hàm countif trong VBA giữa nhiều sheet khác nhau ạ,và làm thế nào để mình gán giá trị vừa tìm được bằng hàm countif cho 1 ô trong vba ạ.Em ko biết nói tình huống cụ thể của em như thế nào để anh chị hình dung nên em chỉ hỏi cách sử dụng các hàm thôi ạ.Mong nhận được sự giúp đỡ c

Dạ em gửi ạ,cụ thể là trong sheet NTVLDV tại ô O9 em cần dữ liệu countif từ sheet DMNTVTDV để code ẩn hiện dòng ở chỗ B12 đến B18 hiện ẩn tùy thuộc vào dữ liệu em nhập vào sheet DMNTVTDV ạ.Các anh chị giúp em với ạ.

Bài đã được tự động gộp: 15/6/21

a = array("sheet1", "A1:A10", "sheet2", "B1:B10", "sheet3",...) ' mỗi sheet là một range khác nhau?
For i = LBound(a) To UBound(a) Step 2
tong = tong + application.countif(worksheets(a(i)).range(a(i+1)), "điều kiện")
Next i
[Ô cần gán vào].Value = tong

Dạ em cảm ơn ạ!Mà cho em hỏi là mình có cần khai báo biến a là gì ko ạ.

 

[VetMini]

Dim a As ekobt

 

[khoahung1202]

Dim a As ekobt

dạ em cảm ơn ạ!!

Bài đã được tự động gộp: 15/6/21

Không nhé. Vì mới đăng bài nên chưa biết làm.

hihi,anh vui tính ghê