Highlighted
Absent Member.
Absent Member.
313 views

[archive] Spreadsheet OWC - Impossible to find member

[Migrated content. Thread originally posted on 01 January 2011]

Hy I want to read a value (text/number) from excel spreadshet but I have
this problem "Impossible to find Member Err 000289:

I put in a form a ActiveX Spreadshet (excel) of OWC

Define...
77 olWrkBk HANDLE OF WORKBOOK.
77 olWrkSh HANDLE OF WORKSHEET.
77 olWrkShNEW HANDLE OF WORKSHEET.
77 oRange HANDLE OF RANGE.
77 oFont HANDLE OF @Font.
77 oInterior HANDLE OF Interior.
77 MY-STRING PIC X(80).
77 ws-count PIC 9(5).
77 H-VARIANT USAGE HANDLE.


INQUIRE olExcel @ActiveSheet IN olWrkSh.

-> INQUIRE olExcel @ActiveSheet::@cells::@item(1, 1) IN oRange.
modify oRange @value = MY-STRING.

ALSO
-> INQUIRE olWrkSh Range("A1")::Value IN MY-STRING.

ALSO
-> inquire olExcel @ActiveSheet::Range("A1")::Value IN MY-STRING.

Same error in all cases.... any ideas?
Thank's
0 Likes
3 Replies
Highlighted
Absent Member.
Absent Member.

RE: [archive] Spreadsheet OWC - Impossible to find member

Would be better with a full example. Can you please post a full example?
0 Likes
Highlighted
Absent Member.
Absent Member.

RE: [archive] Spreadsheet OWC - Impossible to find member

I find solution:
*-----------------------------------------------------------------
01 olWrkBk HANDLE OF WORKBOOK.
01 olWrkSh HANDLE OF WORKSHEET.
01 oRange HANDLE OF RANGE.
*-----------------------------------------------------------------
01 MY-STRING PIC X(80).
01 MY-NUMBER PIC 9(3).

INQUIRE olExcel @ActiveSheet IN olWrkSh.
INQUIRE olWrkSh Range("A1") IN oRange

* I want the string value (attention if number
INQUIRE oRange Value IN MY-STRING

* I want the number value (if value is numeric numeric value give back correct)
INQUIRE oRange Value IN MY-NUMBER
0 Likes
Highlighted
Absent Member.
Absent Member.

RE: [archive] Spreadsheet OWC - Impossible to find member

Note for simplicity, you can also do:

INQUIRE olWrkSh Range("A1")::Value IN MY-STRING.
INQUIRE olWrkSh Range("A1")::Value IN MY-NUMBER.

Thus avoiding the use of oRange :-).
0 Likes
The opinions expressed above are the personal opinions of the authors, not of Micro Focus. By using this site, you accept the Terms of Use and Rules of Participation. Certain versions of content ("Material") accessible here may contain branding from Hewlett-Packard Company (now HP Inc.) and Hewlett Packard Enterprise Company. As of September 1, 2017, the Material is now offered by Micro Focus, a separately owned and operated company. Any reference to the HP and Hewlett Packard Enterprise/HPE marks is historical in nature, and the HP and Hewlett Packard Enterprise/HPE marks are the property of their respective owners.