topic Re: Excel OLE PlotBy in Application Development and Automation Discussions

Excel OLE PlotBy

Former Member — Wed, 10 Jun 2009 18:30:47 GMT

Hi,

I'm creating a chart in Excel from ABAP.

My problem is, that I want to change the series to columns (swapping the axis). As far as I know this can be done i VBA with the statement PlotBy:=xlColumns.

In my ABAP I have the following code (after setting the range):

CALL METHOD OF chart 'SetSourceData' EXPORTING #1 = range #2 = 1.

Can I somehow add the PlotBy, so I can swop the axis?

Regards,

Vibeke

Re: Excel OLE PlotBy

Former Member — Thu, 11 Jun 2009 08:32:32 GMT

Check the following example


REPORT  ZGRAPH.

DATA: BEGIN OF ITAB_DATA OCCURS 0,
DATANAME(15),
QUANTITY1 TYPE I,
QUANTITY2 TYPE I,
QUANTITY3 TYPE I,
END OF ITAB_DATA,

BEGIN OF ITAB_OPTIONS OCCURS 0,
OPTION(20),
END OF ITAB_OPTIONS.

ITAB_DATA-DATANAME = 'Rice'.
ITAB_DATA-QUANTITY1 = 55.
ITAB_DATA-QUANTITY2 = 62.
ITAB_DATA-QUANTITY3 = 59.
APPEND ITAB_DATA.

ITAB_DATA-DATANAME = 'Wheat'.
ITAB_DATA-QUANTITY1 = 35.
ITAB_DATA-QUANTITY2 = 52.
ITAB_DATA-QUANTITY3 = 44.
APPEND ITAB_DATA.

ITAB_DATA-DATANAME = 'Sugar'.
ITAB_DATA-QUANTITY1 = 18.
ITAB_DATA-QUANTITY2 = 22.
ITAB_DATA-QUANTITY3 = 19.
APPEND ITAB_DATA.

CALL FUNCTION 'GRAPH_MATRIX_3D'
EXPORTING
COL1 = 'Jan'
COL2 = 'Feb'
COL3 = 'Mar'
TITL = 'Quantity Consumed In KG.'
TABLES
DATA = ITAB_DATA
OPTS = ITAB_OPTIONS
EXCEPTIONS
OTHERS = 1.

Re: Excel OLE PlotBy

Former Member — Thu, 11 Jun 2009 10:11:26 GMT

I'm using OLE creating Excel.

Regards,

Vibeke

Re: Excel OLE PlotBy

Former Member — Thu, 11 Jun 2009 14:24:47 GMT

CALL METHOD OF chart 'SetSourceData'

EXPORTING #1 = range "Range

#2 = 2. "Plot by

Const xlRows = 1

Const xlColumns = 2

Re: Excel OLE PlotBy

Former Member — Thu, 11 Jun 2009 18:26:18 GMT

So that's what that second parameter is for 🐵

Absolutely brilliant. Problem solved.

Many thanks GTREN!

Regards,

Vibeke