(Resolved) Get the next two words after I find a string.

[BukHix]

Created for Bill Smith Bill Smith 100 Maple St. Nowhere, MI 49091 PROGRAM INFORMATION UNDECIDED ABOUT YOUR CAREER PATH?

I can find the position where "Created for" occurs in the string

Private Function FindText(ByVal strText As String) As String
        Return InStr(strText, "Created for")  
    End Function

I am trying to get the first and last name that occurs right after the "Created for" in that string but I have not found a good way to do so.

Essentialy there are multiple files in a directory that I am spinning though and changing the name of the files to match the name in the file.