libxlsxwriter/examples/chart_styles.c
2018-08-30 23:52:31 +01:00

63 lines
2.0 KiB
C

/*
* An example showing all 48 default chart styles available in Excel 2007
* using the libxlsxwriter library. Note, these styles are not the same as the
* styles available in Excel 2013.
*
* Copyright 2014-2018, John McNamara, jmcnamara@cpan.org
*
*/
#include "xlsxwriter.h"
int main() {
int chart_types[] = {LXW_CHART_COLUMN, LXW_CHART_AREA, LXW_CHART_LINE, LXW_CHART_PIE};
char *chart_names[] = {"Column", "Area", "Line", "Pie"};
char chart_title[32] = {0};
int row_num, col_num, chart_num, style_num;
lxw_worksheet *worksheet;
lxw_chart *chart;
lxw_workbook *workbook = new_workbook("chart_styles.xlsx");
for (chart_num = 0; chart_num < 4; chart_num++) {
/* Add a worksheet for each chart type. */
worksheet = workbook_add_worksheet(workbook, chart_names[chart_num]);
worksheet_set_zoom(worksheet, 30);
/* Create 48 charts, each with a different style. */
style_num = 1;
for (row_num = 0; row_num < 90; row_num += 15) {
for (col_num = 0; col_num < 64; col_num += 8) {
chart = workbook_add_chart(workbook, chart_types[chart_num]);
sprintf(chart_title, "Style %d", style_num);
chart_add_series(chart, NULL, "=Data!$A$1:$A$6");
chart_title_set_name(chart, chart_title);
chart_set_style(chart, style_num);
worksheet_insert_chart(worksheet, row_num, col_num, chart);
style_num++;
}
}
}
/* Create a worksheet with data for the charts. */
worksheet = workbook_add_worksheet(workbook, "Data");
worksheet_write_number(worksheet, 0, 0, 10, NULL);
worksheet_write_number(worksheet, 1, 0, 40, NULL);
worksheet_write_number(worksheet, 2, 0, 50, NULL);
worksheet_write_number(worksheet, 3, 0, 20, NULL);
worksheet_write_number(worksheet, 4, 0, 10, NULL);
worksheet_write_number(worksheet, 5, 0, 50, NULL);
return workbook_close(workbook);
}