Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
text files
Is it possable to extract the data held within text files on the hard drive
directly into a worksheet through VBA. |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
text files
Think I have sort of worked it out myself, however could someone explain what "EOF(1)" is all about, and do i really have to do this one char at a time. Also, how much info could be got using this method (obviously i would not be putting it into a msgbog) Sub getInfo() Dim q, theData Open "c:\Active\temp\testfile.txt" For Input As #1 Do While Not EOF(1) q = Input(1, #1) theData = theData & q Loop Close #1 MsgBox theData End Sub Stuart wrote in message ... Is it possable to extract the data held within text files on the hard drive directly into a worksheet through VBA. |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
text files
In Excel 2000 and later, you can do Data=Get External Data = Import Text
file. Turn on the macro recorder while you do it manually to get the code you need. In earlier versions you can use low level file io or you can open it as a new workbook, copy it across, then close the original file without saving. -- Regards, Tom Ogilvy Stuart wrote in message ... Is it possable to extract the data held within text files on the hard drive directly into a worksheet through VBA. |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
text files
EOF is end of file.
You could actually read it all in, all at once. However, it depends on how you want to process it. will each line in the text file be spread over multiple columns, or does all the data in each line go in a single cell. If the latter, you might want to use line input -- Regards, Tom Ogilvy Stuart wrote in message ... Think I have sort of worked it out myself, however could someone explain what "EOF(1)" is all about, and do i really have to do this one char at a time. Also, how much info could be got using this method (obviously i would not be putting it into a msgbog) Sub getInfo() Dim q, theData Open "c:\Active\temp\testfile.txt" For Input As #1 Do While Not EOF(1) q = Input(1, #1) theData = theData & q Loop Close #1 MsgBox theData End Sub Stuart wrote in message ... Is it possable to extract the data held within text files on the hard drive directly into a worksheet through VBA. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Files saved as csv files are actually saved as text files? | Excel Discussion (Misc queries) | |||
Text Files | Excel Discussion (Misc queries) | |||
Excel (xls) files spontaneously converting to text files | Excel Discussion (Misc queries) | |||
Text Files | Excel Discussion (Misc queries) | |||
how do i convert text files into CSV files? | Excel Discussion (Misc queries) |