WorksheetFunction in VBA

My workbook has a sheet called "MyList", another called "HisList" , a named range called "myNamedRange" which is "MyList!A:A".

How do I get this functionality of this excel formula

 Countif(MyList!A:A, HisList!A1)

in this vba code

dblvalue=application.worksheetFunction(...)
msgbox dblvalue

The following code works with a named range

wsHisList = Worksheets("HisList").Range("A1").offset(0,0).value
Application.worksheetFunction(Range("myNamedRange"), wsHisList)

My question is how can I use "MyList!A:A" directly in the worksheet function.

Thanks