Thread: import text file
View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Tom Ogilvy Tom Ogilvy is offline
external usenet poster
  
Posts: 27,285
Default import text file
To open a text file:

ChDrive "c"
ChDir "c:\Mydata"
fileToOpen = Application.GetOpenFilename(filefilter:="Text Files
(*.txt),*.txt")
Workbooks.Open FiletoOpen

--
Regards,
Tom Ogilvy

"Lynn" wrote in message
oups.com...
hi,
i have a macro as follows

ChDrive "c"
ChDir "c:\Mydata"
fileToOpen = Application.GetOpenFilename(filefilter:="Text Files
(*.txt),*.txt")

how can i use the above to import a text file ?



Reply With QuoteReply With Quote