G
gw.boswell
In Excel 2003 I wrote a macro that included the below code. This code
opened the file and it was visible. Our company still uses Excel 2002
and the below code does not open the file as visible with this version
of Excel. Is there a quick fix?
Dim objFSO As Object, objTextFile As Object
FileToOpen = Application.GetOpenFilename("NONMEM Table Files (*.prn),
*.prn")
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.OpenTextFile(FileToOpen, ForReading)
opened the file and it was visible. Our company still uses Excel 2002
and the below code does not open the file as visible with this version
of Excel. Is there a quick fix?
Dim objFSO As Object, objTextFile As Object
FileToOpen = Application.GetOpenFilename("NONMEM Table Files (*.prn),
*.prn")
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.OpenTextFile(FileToOpen, ForReading)