What exactly is your question here, there seem to be 6 or 7 there?

In you code, you haven't qualified GetOpenFilename with the Application object, then you try to do a Dir on the selected file PLUS .txt, i.e. two extension types.