Sub Main ' open the file called Data that is in the ' same directory as the macro Open MacroDir & "\Data" For Input As #1 Line Input #1, S$ Debug.Print S$ Close #1End Sub