vba – Value Worksheetfunction.Vlookup on error

I have this function (wb is a public workbook variable):

GetTiersAccount Function (TiersName As String, Clients As Boolean) As Long

If customers = true then
On GoTo error ERRRRR
GetTiersAccount = WorksheetFunction.VLookup (TiersName, wb.Sheets (1) .Range ("A1: B13"), 2, False)
Output function
Other
On GoTo error ERRRRR
GetTiersAccount = WorksheetFunction.VLookup (TiersName, wb.Sheets (1) .Range ("D1: E94"), 2, False)
Output function
End if

ERRRRR:
GetTiersAccount = 471

End function

I feel like I managed to manage worksheetfunction.vlookup an unpleasant mistake. However, I want Gettieraccount to return 471 in case of vlookup error.

There must be a better way to do it.
Thank you in advance.