Cách tự viết code (lập trình) hàm vlookup trong vba excel

Tại sao phải biết cách viết code hàm vlookup trong vba excel?

Nếu biết được cách lập trình hàm vlookup trong vba excel bạn có lợi gì ?

* Giúp bạn ứng dụng excel công việc một cách hiệu quả.
* Hiểu bản chất mà các lập trình viên của Microsoft tích hợp hàm vào Excel như thế nào.
* Tự xây dựng một hàm để phục công việc.

Xem video về cách tự xây dựng (code - lập trình) hàm vlookup

-------

Sau đây là đoạn code hàm vlookup trong vba excel

Function vlookup_NTS(oTim As Range, vungTim As Range, viTri_CotTim As Integer, viTri_CotTraVeKetQua As Integer) As String
giatriTim = oTim.Value
arrDuLieuVungCho = vungTim

Dim tongdong As Integer
Dim tongcot As Integer

tongdong = UBound(arrDuLieuVungCho, 1) ' 1 quy dih lay tong so dong
tongcot = UBound(arrDuLieuVungCho, 2) ' 2 quy dih lay tong so cot

Dim ketQuaTraVe As String

    For iDong = 1 To tongdong
        For iCot = 1 To tongcot
            giatri_O = arrDuLieuVungCho(iDong, iCot) ' gia tri o trong vong lap
            If iCot = viTri_CotTim And giatri_O = giatriTim Then
                ketQuaTraVe = arrDuLieuVungCho(iDong, viTri_CotTraVeKetQua)
                vlookup_NTS = ketQuaTraVe
                Exit Function
            End If
        Next iCot
    Next iDong

   If ketQuaTraVe = "" Then
    vlookup_NTS = "Not found !"
   End If
End Function

Mục liên quan:

0935999617