8 Add Chart Sheet🔗ℹ

add chart sheet to xlsx.

8.1 add-chart-sheet🔗ℹ

[add-chart-sheet (-> string?

(or/c 'LINE 'LINE3D 'BAR 'BAR3D 'PIE 'PIE3D)

string?

(listof (list/c string? string? string? string? string?)) void?)]

arg1: chart sheet name.

arg2: chart type, one of (’LINE ’LINE3D ’BAR ’BAR3D ’PIE ’PIE3D).

arg3: chart topic, will display on the above top.

arg4: chart data serial, serial list.

serial arguments:

arg1 string: category name.

arg2 string: category data sheet name.

arg3 string: category data range.

arg4 string: value data sheet name.

arg5 string: value data range.

8.2 Line Chart🔗ℹ

(add-data-sheet

"DataSheet"

'(

("201601" "201602" "201603" "201604")

(100 300 200 400)

(200 400 300 100)

(300 500 400 200)

))

(add-chart-sheet

"LineChart" 'LINE "LineChartExample"

'(

("CAT" "DataSheet" "A1-D1" "DataSheet" "A2-D2")

("Puma" "DataSheet" "A1-D1" "DataSheet" "A3-D3")

("Brooks" "DataSheet" "A1-D1" "DataSheet" "A4-D4")

))

(add-chart-sheet

"Line3DChart" 'LINE3D "Line3DChartExample"

'(

("CAT" "DataSheet" "A1-D1" "DataSheet" "A2-D2")

("Puma" "DataSheet" "A1-D1" "DataSheet" "A3-D3")

("Brooks" "DataSheet" "A1-D1" "DataSheet" "A4-D4")

))

8.3 Bar Chart🔗ℹ

(add-chart-sheet

"BarChart" 'BAR "BarChartExample"

'(

("CAT" "DataSheet" "A1-D1" "DataSheet" "A2-D2")

("Puma" "DataSheet" "A1-D1" "DataSheet" "A3-D3")

("Brooks" "DataSheet" "A1-D1" "DataSheet" "A4-D4")

))

(add-chart-sheet

"Bar3DChart" 'BAR3D "Bar3DChartExample"

'(

("CAT" "DataSheet" "A1-D1" "DataSheet" "A2-D2")

("Puma" "DataSheet" "A1-D1" "DataSheet" "A3-D3")

("Brooks" "DataSheet" "A1-D1" "DataSheet" "A4-D4")

))

8.4 Pie Chart🔗ℹ

(add-chart-sheet

"PieChart" 'PIE "PieChartExample"

'(

("CAT" "DataSheet" "A1-D1" "DataSheet" "A2-D2")

))

(add-chart-sheet

"Pie3DChart" 'PIE3D "Pie3DChartExample"

'(

("CAT" "DataSheet" "A1-D1" "DataSheet" "A2-D2")

))