Class ChartDataTable

public class ChartDataTable

//Instansiera ett Workbook-objekt
Workbook workbook = new Workbook();

//Få referensen till det första kalkylbladet
Worksheet worksheet = workbook.Worksheets[0];

//Lägg till ett exempelvärde i cell "A1"
worksheet.Cells["A1"].PutValue(50);

//Lägg till ett exempelvärde i cell "A2"
worksheet.Cells["A2"].PutValue(100);

//Lägg till ett exempelvärde i cell "A3"
worksheet.Cells["A3"].PutValue(150);

//Lägg till ett exempelvärde i cell "B1"
worksheet.Cells["B1"].PutValue(60);

//Lägg till ett exempelvärde i cell "B2"
worksheet.Cells["B2"].PutValue(32);

//Lägg till ett exempelvärde i cell "B3"
worksheet.Cells["B3"].PutValue(50);

//Lägg till ett diagram i kalkylbladet
int chartIndex = worksheet.Charts.Add(ChartType.Column, 5, 0, 25, 10);

//Åtkomst till instansen av det nyss tillagda diagrammet
Chart chart = worksheet.Charts[chartIndex];

//Lägg till NSeries (diagramdatakälla) till diagrammet som sträcker sig från cell "A1" till "B3"
chart.NSeries.Add("A1:B3", true);

chart.ShowDataTable = true;

//Hämta diagramtabellen
ChartDataTable chartTable = chart.ChartDataTable;

//Ställ in diagramtabellens teckensnittsfärg
chartTable.Font.Color = System.Drawing.Color.Red;

//Ställ in synlighetsalternativ för legendnyckel
chartTable.ShowLegendKey = false;

//Spara Excel-filen
workbook.Save("book1.xls");

'Instansiera ett Workbook-objekt
Dim workbook As Workbook = New Workbook()

'Få referensen till det första kalkylbladet
Dim worksheet As Worksheet = workbook.Worksheets(0)

'Lägg till ett exempelvärde i cell "A1"
worksheet.Cells("A1").PutValue(50)

'Lägg till ett exempelvärde i cell "A2"
worksheet.Cells("A2").PutValue(100)

'Lägg till ett exempelvärde i cell "A3"
worksheet.Cells("A3").PutValue(150)

'Lägg till ett exempelvärde i cell "B1"
worksheet.Cells("B1").PutValue(60)

'Lägg till ett exempelvärde i cell "B2"
worksheet.Cells("B2").PutValue(32)

'Lägg till ett exempelvärde i cell "B3"
worksheet.Cells("B3").PutValue(50)

'Lägg till ett diagram i kalkylbladet
Dim chartIndex As Integer = worksheet.Charts.Add(ChartType.Column, 5, 0, 25, 10)

'Åtkomst till instansen av det nyss tillagda diagrammet
Dim chart As Chart = worksheet.Charts(chartIndex)

'Lägg till NSeries (diagramdatakälla) till diagrammet som sträcker sig från cell "A1" till "B3"
chart.NSeries.Add("A1:B3", True)

chart.ShowDataTable = True

'Hämta diagramtabellen
Dim chartTable As ChartDataTable = chart.ChartDataTable

'Ställ in diagramtabellens teckensnittsfärg
chartTable.Font.Color = System.Drawing.Color.Red

'Ställ in synlighetsalternativ för legendnyckel
chartTable.ShowLegendKey = False

'Spara Excel-filen
workbook.Save("book1.xls")

public bool AutoScaleFont { get; set; }

public BackgroundMode BackgroundMode { get; set; }

public Line Border { get; }

public Font Font { get; }

public bool HasHorizontalBorder { get; set; }

public bool HasOutlineBorder { get; set; }

public bool HasVerticalBorder { get; set; }

public bool ShowLegendKey { get; set; }