Excel VLookup VBA cant refere to another worksheet

Question

Public Function Lohn(ID)

Lohn = Application.WorksheetFunction.VLookup(ID, ThisWorkbook.Worksheets("Arbeiter").Range("A:D"), 2, 0)

End Function