Hozzászólás: .xlam-ban vlookup használata

Szia!

Kipróbáltam, nekem így működik:

Public Function kikeres(id) As Variant
Dim tabla As Range

    Set tabla = Sheets("nevsor").Range("A1:D10000")
    kikeres = Application.WorksheetFunction.VLookup(id, tabla, 2, False)
End Function

Ebben nincs most hibakezelés, azaz hogy ha nincs találat, akkor mi van.

imre

• A hozzászólás módosításra került: 7 years, 1 month telt el-horvimi.