Hi Russ

Not test it but i think it use the format of the default save format
Office Button Excel Options Save

You can use code to open a xls workbook and use
ActiveSheet.QueryTables.Add to add the txt file if you not want to change the default
save format

If you need help post back


--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"Russ" wrote in message ...
I am working in Excel 2007. In a file of type .xls I have recorded a macro
to open a text file as shown below:

Workbooks.OpenText Filename:="D:\MVCC\activity.dnl", Origin:=437, StartRow _
:=1, DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, _
ConsecutiveDelimiter:=False, Tab:=True, Semicolon:=False,
Comma:=False _
, Space:=False, Other:=False, FieldInfo:=Array(Array(1, 1), Array(2,
1), _
Array(3, 1), Array(4, 1), Array(5, 1), Array(6, 1), Array(7, 1),
Array(8, 1), Array(9, 1), _
Array(10, 1), Array(11, 1), Array(12, 1), Array(13, 1)),
TrailingMinusNumbers:=True

The code executes properly however the file that is opened is a .xlsx file
type. I would like the file type to be a .xls file type. Is there a way to
do this
--
russ