Tìm giá trị lớn nhất có điều kiện bằng VBA

[xuanphat.csdn]

Kính chào các anh chị trên diễn đàn!
Em mới tập tành VBA nên nhờ anh chị sửa giúp code tìm giá trị lớn nhất theo điều kiện được ko ạ. Ví dụ em có để trong file đính kèm. Mong các bác giúp đỡ. Thanks all

 

[viehoai]

Bạn xem đúng ý bạn chưa nhé

 

[xuanphat.csdn]

Bạn xem đúng ý bạn chưa nhé

Cám ơn anh đã bỏ thời gian giúp em. Hàm tự tạo của anh đúng vấn đề e đặt ra. Nhưng cho e hỏi, có thể dùng hàm max trong worksheetfunction lồng hàm IIF được ko ạ?. Nếu đc thì nhờ anh giúp cho đoạn code a nhé. Tks anh

 

[viehoai]

Cám ơn anh đã bỏ thời gian giúp em. Hàm tự tạo của anh đúng vấn đề e đặt ra. Nhưng cho e hỏi, có thể dùng hàm max trong worksheetfunction lồng hàm IIF được ko ạ?. Nếu đc thì nhờ anh giúp cho đoạn code a nhé. Tks anh

Mình nghĩ chắc cũng được, nếu vậy áp dụng hàm luôn. Nhưng mình thì biết dùng những hàm cơ bản thôi.

 

[tranhungdao12a3]

Sao bạn không chọn học cái đơn giản hơn:

 

[Phuocam]

có thể dùng hàm max trong worksheetfunction lồng hàm IIF được ko ạ?. Nếu đc thì nhờ anh giúp cho đoạn code a nhé. Tks anh

Hàm IIF không biết có xử lý mảng được không? Xài tạm cái này:

Function Maxif(ByVal Rng As Range, ByVal crt As Variant, mRng As Range) as Double

Dim Arr(), mArr()
Arr = Rng.Value
mArr = mRng.Value
For i = 1 To UBound(Arr)
   mArr(i, 1) = IIf(Arr(i, 1) = crt, mArr(i, 1), "")
Next
Maxif = Application.Max(mArr)
End Function

 

[SA_DQ]

Bài này có thể theo hướng DMAX() với bổ sung tện trường là được.

Ví dụ:

ĐK

Num

A

2​

Dùng hàm Max trong VBA để tìm giá trị lớn nhất theo điều kiện A vào ô K7

B

3​

ĐK

C

4​

C

7​

=DMAX(G4:H10,H4,J6:J7)

A

5​

B

6​

C

7​