ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   opentext method of excel workbook object (https://www.excelbanter.com/excel-programming/329205-opentext-method-excel-workbook-object.html)

Kislay

opentext method of excel workbook object
 
I am using the following code in word macro and it gives error that opentext
method failed.

Set MinMax = CreateObject("Excel.Application")
MinMax.workbooks.Opentext FileName:="d:\abc.txt", _
Origin:=xlMSDOS, StartRow:=17, DataType:=xlDelimited,
TextQualifier:= _
xlDoubleQuote, ConsecutiveDelimiter:=True, Tab:=True,
Semicolon:=False, _
Comma:=False, Space:=True, Other:=False, FieldInfo:=Array(Array(1,
1), _
Array(2, 1), Array(3, 1), Array(4, 1), Array(5, 1), Array(6, 1))

Any help is appreciated.

Thanks.


Tom Ogilvy

opentext method of excel workbook object
 
Since you appear to be using late binding,
Replace the constants with their numeric equivalents:

? xldelimited
1
? xldoublequote
1


--
Regards,
Tom Ogilvy

"Kislay" wrote in message
...
I am using the following code in word macro and it gives error that

opentext
method failed.

Set MinMax = CreateObject("Excel.Application")
MinMax.workbooks.Opentext FileName:="d:\abc.txt", _
Origin:=xlMSDOS, StartRow:=17, DataType:=xlDelimited,
TextQualifier:= _
xlDoubleQuote, ConsecutiveDelimiter:=True, Tab:=True,
Semicolon:=False, _
Comma:=False, Space:=True, Other:=False, FieldInfo:=Array(Array(1,
1), _
Array(2, 1), Array(3, 1), Array(4, 1), Array(5, 1), Array(6, 1))

Any help is appreciated.

Thanks.




Kislay

opentext method of excel workbook object
 
Thanks Tom,

It works fine now.

Kislay

"Tom Ogilvy" wrote:

Since you appear to be using late binding,
Replace the constants with their numeric equivalents:

? xldelimited
1
? xldoublequote
1


--
Regards,
Tom Ogilvy

"Kislay" wrote in message
...
I am using the following code in word macro and it gives error that

opentext
method failed.

Set MinMax = CreateObject("Excel.Application")
MinMax.workbooks.Opentext FileName:="d:\abc.txt", _
Origin:=xlMSDOS, StartRow:=17, DataType:=xlDelimited,
TextQualifier:= _
xlDoubleQuote, ConsecutiveDelimiter:=True, Tab:=True,
Semicolon:=False, _
Comma:=False, Space:=True, Other:=False, FieldInfo:=Array(Array(1,
1), _
Array(2, 1), Array(3, 1), Array(4, 1), Array(5, 1), Array(6, 1))

Any help is appreciated.

Thanks.






All times are GMT +1. The time now is 05:39 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com