Check hộ e đoạn code sau !

[hungpecc1]

Function Ham_match(a, b As Range, m As Integer) As Double
' tìm vi tri a trong cot thu m cua mang b
vitria = WorksheetFunction.Match(a, b.Offset(0, m - 1).Resize(, 1), 0)

End Function

sao khi gõ lênh vào cel : ham_match(1,A:F,1) thì không chay ?


Thanks các pác

 

[dhn46]

Sửa lại 1 chút nha bạn:

Function Ham_match(a, b As Range, m As Integer) As Double' 
tìm vi tri a trong cot thu m cua mang b
vitria = WorksheetFunction.Match(a, b.Offset(0, m - 1).Resize(, 1), 0)
Ham_match = vitria
End Function

 

[hungpecc1]

thanks pác nhé nhiều