vba - Excel VBA: 一致を取得できません。エラー「WorksheetFunction クラスの Match プロパティを取得できません」

Question

すべての良いことへの愛のために、私はこれを機能させることができないようです. 上記のエラーが発生し続けます。

このテーブルがあり、コードが他の列内のどこかにある独自のサブコードと一致するかどうかを調べようとしていますが、エラーが発生しています。よろしくお願いいたします。

Sub testing()

    Dim m1 As long
    Dim myrange As Range

    Set myrange = Worksheets("Sheet1").Range("B2:B23")

    For e = 2 To 23
        m1= Application.WorksheetFunction.Match(Cells(e, 1).Value, myrange, 0)

        If m1 > 0 Then
            Cells(e, 3).Value = "Yes"
        Else
            Cells(e, 3).Value = "No"
        End If
    Next e

MsgBox "Complete!"

End Sub