Schreiber FooF
New Member
Hello !! ?
I have many problems by opening a text file via COM to Excel.
(I'm doing my first steps therein ... )
How may I write that in COM ? :
ChDir "P:\test\analytique\cloture 200305\origine"
Workbooks.OpenText Filename:= "P:\test\test.txt", Origin:=xlWindows _
, StartRow:=1, DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, _
ConsecutiveDelimiter:=False, Tab:=False, Semicolon:=True, Comma:=False _
, Space:=False, Other:=False, FieldInfo:=Array(Array(1, 2), Array(2, 2), _
Array(3, 2), Array(4, 2), Array(5, 2), Array(6, 2), Array(7, 2), Array(8, 2), _
Array(9, 2), Array(10, 2), Array(11, 2), Array(12, 2), Array(13, 2), _
Array(14, 2)), TrailingMinusNumbers:=True
Cells.Select
Cells.EntireColumn.AutoFit
Where I have much problems is in the chExcel:Workbook:OpenText line...
Thanks fer you answer !
I have many problems by opening a text file via COM to Excel.
(I'm doing my first steps therein ... )
How may I write that in COM ? :
ChDir "P:\test\analytique\cloture 200305\origine"
Workbooks.OpenText Filename:= "P:\test\test.txt", Origin:=xlWindows _
, StartRow:=1, DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, _
ConsecutiveDelimiter:=False, Tab:=False, Semicolon:=True, Comma:=False _
, Space:=False, Other:=False, FieldInfo:=Array(Array(1, 2), Array(2, 2), _
Array(3, 2), Array(4, 2), Array(5, 2), Array(6, 2), Array(7, 2), Array(8, 2), _
Array(9, 2), Array(10, 2), Array(11, 2), Array(12, 2), Array(13, 2), _
Array(14, 2)), TrailingMinusNumbers:=True
Cells.Select
Cells.EntireColumn.AutoFit
Where I have much problems is in the chExcel:Workbook:OpenText line...
Thanks fer you answer !