Hi,
I am opening a text file within excel. For the file to be properly
formatted within excel, it is necessary to field delimited using a
tab.

Is it possible to determine if the text file being imported is tab
delimited?

I am using the following to open the text file.

Code:
--------------------
Sub Open_File(My_File)

Workbooks.OpenText Filename:=My_File
, Origin:=437, StartRow:=1, DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, _
Tab:=True, 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)), TrailingMinusNumbers:=True
My_File = ActiveWorkbook.Name

End Sub
--------------------


The reason I want to do this is that if the text file is not tab
delimited, the data will be 'skewed' in excel.


--
PLPE
------------------------------------------------------------------------
PLPE's Profile: http://www.excelforum.com/member.php...o&userid=23856
View this thread: http://www.excelforum.com/showthread...hreadid=388331

Great. I asked the same question yesterday and have gotten no replie
yet. I will anxiously await the results of this thread. :

--
Loss
-----------------------------------------------------------------------
Losse's Profile: http://www.excelforum.com/member.php...fo&userid=2481
View this thread: http://www.excelforum.com/showthread.php?threadid=38833

Until we get a reply, you could just try inserting the tab after th
file is already opened:

Columns("A:A").Select
Selection.TextToColumns Destination:=Range("A1")
DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=True
Tab:=True, _
Semicolon:=False, Comma:=False, Space:=True, Other:=False
FieldInfo _
:=Array(Array(1, 1), Array(2, 1)), TrailingMinusNumbers:=Tru

--
Loss
-----------------------------------------------------------------------
Losse's Profile: http://www.excelforum.com/member.php...fo&userid=2481
View this thread: http://www.excelforum.com/showthread.php?threadid=38833