Giúp gỡ rồi code này (1 người xem)

[tanlocsonyuser]

Help, Max trong vba

Mình viết code dưới đây nhưng khi chạy lại báo lỗi Runtime error 9: Subscript out of range

Set d = CreateObject("excel.Application")
Worksheets("BANG2").Cells(1, 2).Value = d.WorksheetFunction.max(IIf(Range("A4:$A100").Value = test, Range("F4:F100"), ""))

Mục đích của mình là tìm giá trị max theo biến test trong phạm vi từ F4:F100.

 

[susu16b]

Mình viết code dưới đây nhưng khi chạy lại báo lỗi Runtime error 9: Subscript out of range

Set d = CreateObject("excel.Application")
Worksheets("BANG2").Cells(1, 2).Value = d.WorksheetFunction.max(IIf(Range("A4:$A100").Value = test, Range("F4:F100"), ""))

Mục đích của mình là tìm giá trị max theo biến test trong phạm vi từ F4:F100.

Tiêu đề của bạn chung chung -> Sẽ bị khóa
Gỡ rối code bạn có thể hỏi ở đây:
http://www.giaiphapexcel.com/forum/showthread.php?85576-Chuyên-mục-xử-lý-gỡ-rối-code-VBA

 

[tanlocsonyuser]

Mình đã chỉnh tiêu đề lại.