VBA en el error de tiempo de ejecución de la función de búsqueda 91

Mi pregunta es sobre el error de tiempo de ejecución 91 en VBA para Excel. He hecho algunas búsquedas en vano. Mi codigo esta abajo. He notado la sección que causa el error. ¿Por qué sucede esto y cómo puedo solucionarlo y seguir adelante?

Sub RemoveFooterRows(theFile)
    Dim found As Range
    Dim aggregateRow

    ''Error is from section below
    found = isItRow = Workbooks(theFile).Worksheets(1).Columns(1).Find _
        ("Summary", Range("A1"), xlValues, xlPart, xlByRows, xlNext, False, , False)
    ''Error is from section above

    MsgBox ("val is " & found.Row)

End Sub