broj_1=0001
broj_2=02

With Application.WorksheetFunction
 rezultat= .VLookup( broj_1 & broj_2, Range(Cells(1, 1), Cells(6, 3)), 3, 0)
End With