private List <double> GetSparkLineItemSource(Syncfusion.XlsIO.ISparklineGroup spGroup, GridRenderStyleInfo cellInfo)
{
List <double> itemSource = new List <double>();
// get the sparklines count.
for (int line = 0; line < spGroup.Count; line++)
{
// ISparklineGroup spGroup = spGroups[i];
ISparklines spLines = spGroup[line];
for (int j = 0; j < spLines.Count; j++)
{
ISparkline spLine = spGroup[line][j];
IRange dataRange = spLine.DataRange;
for (int rowInd = dataRange.Row; rowInd <= dataRange.LastRow; rowInd++)
{
if (spLine.ReferenceRange.Row == cellInfo.RowIndex)
{
for (int colInd = dataRange.Column; colInd <= dataRange.LastColumn; colInd++)
{
double cellValue;
if (double.TryParse(cellInfo.GridModel[rowInd, colInd].FormattedText, out cellValue))
{
itemSource.Add(cellValue);
}
}
}
}
}
}
return(itemSource);
}
//
// GET: /Sparklines/
public ActionResult Sparklines(string button)
{
if (button == null)
{
return(View());
}
//Instantiate the spreadsheet creation engine.
ExcelEngine excelEngine = new ExcelEngine();
IApplication application = excelEngine.Excel;
application.DefaultVersion = ExcelVersion.Excel2016;
//A new workbook is created.[Equivalent to creating a new workbook in Microsoft Excel]
//Open workbook with Data
IWorkbook workbook = application.Workbooks.Open(ResolveApplicationDataPath("Sparkline.xlsx"));
//The first worksheet object in the worksheets collection is accessed.
IWorksheet sheet = workbook.Worksheets[0];
#region WholeSale Report
//A new Sparkline group is added to the sheet sparklinegroups
ISparklineGroup sparklineGroup = sheet.SparklineGroups.Add();
//Set the Sparkline group type as line
sparklineGroup.SparklineType = SparklineType.Line;
//Set to display the empty cell as line
sparklineGroup.DisplayEmptyCellsAs = SparklineEmptyCells.Line;
//Sparkline group style properties
sparklineGroup.ShowFirstPoint = true;
sparklineGroup.FirstPointColor = Color.Green;
sparklineGroup.ShowLastPoint = true;
sparklineGroup.LastPointColor = Color.DarkOrange;
sparklineGroup.ShowHighPoint = true;
sparklineGroup.HighPointColor = Color.DarkBlue;
sparklineGroup.ShowLowPoint = true;
sparklineGroup.LowPointColor = Color.DarkViolet;
sparklineGroup.ShowMarkers = true;
sparklineGroup.MarkersColor = Color.Black;
sparklineGroup.ShowNegativePoint = true;
sparklineGroup.NegativePointColor = Color.Red;
//set the line weight
sparklineGroup.LineWeight = 0.3;
//The sparklines are added to the sparklinegroup.
ISparklines sparklines = sparklineGroup.Add();
//Set the Sparkline Datarange .
IRange dataRange = sheet.Range["D6:G17"];
//Set the Sparkline Reference range.
IRange referenceRange = sheet.Range["H6:H17"];
//Create a sparkline with the datarange and reference range.
sparklines.Add(dataRange, referenceRange);
#endregion
#region Retail Trade
//A new Sparkline group is added to the sheet sparklinegroups
sparklineGroup = sheet.SparklineGroups.Add();
//Set the Sparkline group type as column
sparklineGroup.SparklineType = SparklineType.Column;
//Set to display the empty cell as zero
sparklineGroup.DisplayEmptyCellsAs = SparklineEmptyCells.Zero;
//Sparkline group style properties
sparklineGroup.ShowHighPoint = true;
sparklineGroup.HighPointColor = Color.Green;
sparklineGroup.ShowLowPoint = true;
sparklineGroup.LowPointColor = Color.Red;
sparklineGroup.ShowNegativePoint = true;
sparklineGroup.NegativePointColor = Color.Black;
//The sparklines are added to the sparklinegroup.
sparklines = sparklineGroup.Add();
//Set the Sparkline Datarange .
dataRange = sheet.Range["D21:G32"];
//Set the Sparkline Reference range.
referenceRange = sheet.Range["H21:H32"];
//Create a sparkline with the datarange and reference range.
sparklines.Add(dataRange, referenceRange);
#endregion
#region Manufacturing Trade
//A new Sparkline group is added to the sheet sparklinegroups
sparklineGroup = sheet.SparklineGroups.Add();
//Set the Sparkline group type as win/loss
sparklineGroup.SparklineType = SparklineType.ColumnStacked100;
sparklineGroup.DisplayEmptyCellsAs = SparklineEmptyCells.Zero;
sparklineGroup.DisplayAxis = true;
sparklineGroup.AxisColor = Color.Black;
sparklineGroup.ShowFirstPoint = true;
sparklineGroup.FirstPointColor = Color.Green;
sparklineGroup.ShowLastPoint = true;
sparklineGroup.LastPointColor = Color.Orange;
sparklineGroup.ShowNegativePoint = true;
sparklineGroup.NegativePointColor = Color.Red;
sparklines = sparklineGroup.Add();
dataRange = sheet.Range["D36:G46"];
referenceRange = sheet.Range["H36:H46"];
sparklines.Add(dataRange, referenceRange);
#endregion
try
{
//Saving the workbook to disk.
return(excelEngine.SaveAsActionResult(workbook, "Sparklines.xlsx", HttpContext.ApplicationInstance.Response, ExcelDownloadType.PromptDialog, ExcelHttpContentType.Excel2016));
}
catch (Exception)
{
}
workbook.Close();
excelEngine.Dispose();
return(View());
}
private async void btnGenerateExcel_Click(object sender, RoutedEventArgs e)
{
#region workbook Initialization
//Instantiate the spreadsheet creation engine.
ExcelEngine excelEngine = new ExcelEngine();
//Instantiate the excel application object.
IApplication application = excelEngine.Excel;
//Set the default version as Excel 2010.
application.DefaultVersion = ExcelVersion.Excel2010;
Assembly assembly = typeof(Chart).GetTypeInfo().Assembly;
string resourcePath = "Syncfusion.SampleBrowser.UWP.XlsIO.XlsIO.Tutorials.Samples.Assets.Resources.Templates.Sparkline.xlsx";
Stream fileStream = assembly.GetManifestResourceStream(resourcePath);
IWorkbook workbook = await application.Workbooks.OpenAsync(fileStream);
//The first worksheet object in the worksheets collection is accessed.
IWorksheet sheet = workbook.Worksheets[0];
#endregion
#region WholeSale Report
//A new Sparkline group is added to the sheet sparklinegroups
ISparklineGroup sparklineGroup = sheet.SparklineGroups.Add();
//Set the Sparkline group type as line
sparklineGroup.SparklineType = SparklineType.Line;
//Set to display the empty cell as line
sparklineGroup.DisplayEmptyCellsAs = SparklineEmptyCells.Line;
//Sparkline group style properties
sparklineGroup.ShowFirstPoint = true;
sparklineGroup.FirstPointColor = Color.FromArgb(255, 0, 128, 0);
sparklineGroup.ShowLastPoint = true;
sparklineGroup.LastPointColor = Color.FromArgb(255, 255, 140, 0);
sparklineGroup.ShowHighPoint = true;
sparklineGroup.HighPointColor = Color.FromArgb(255, 0, 0, 139);
sparklineGroup.ShowLowPoint = true;
sparklineGroup.LowPointColor = Color.FromArgb(255, 148, 0, 211);
sparklineGroup.ShowMarkers = true;
sparklineGroup.MarkersColor = Color.FromArgb(255, 0, 0, 0);
sparklineGroup.ShowNegativePoint = true;
sparklineGroup.NegativePointColor = Color.FromArgb(255, 255, 0, 0);
//set the line weight
sparklineGroup.LineWeight = 0.3;
//The sparklines are added to the sparklinegroup.
ISparklines sparklines = sparklineGroup.Add();
//Set the Sparkline Datarange .
IRange dataRange = sheet.Range["D6:G17"];
//Set the Sparkline Reference range.
IRange referenceRange = sheet.Range["H6:H17"];
//Create a sparkline with the datarange and reference range.
sparklines.Add(dataRange, referenceRange);
#endregion
#region Retail Trade
//A new Sparkline group is added to the sheet sparklinegroups
sparklineGroup = sheet.SparklineGroups.Add();
//Set the Sparkline group type as column
sparklineGroup.SparklineType = SparklineType.Column;
//Set to display the empty cell as zero
sparklineGroup.DisplayEmptyCellsAs = SparklineEmptyCells.Zero;
//Sparkline group style properties
sparklineGroup.ShowHighPoint = true;
sparklineGroup.HighPointColor = Color.FromArgb(255, 0, 128, 0);
sparklineGroup.ShowLowPoint = true;
sparklineGroup.LowPointColor = Color.FromArgb(255, 255, 0, 0);
sparklineGroup.ShowNegativePoint = true;
sparklineGroup.NegativePointColor = Color.FromArgb(255, 0, 0, 0);
//The sparklines are added to the sparklinegroup.
sparklines = sparklineGroup.Add();
//Set the Sparkline Datarange .
dataRange = sheet.Range["D21:G32"];
//Set the Sparkline Reference range.
referenceRange = sheet.Range["H21:H32"];
//Create a sparkline with the datarange and reference range.
sparklines.Add(dataRange, referenceRange);
#endregion
#region Manufacturing Trade
//A new Sparkline group is added to the sheet sparklinegroups
sparklineGroup = sheet.SparklineGroups.Add();
//Set the Sparkline group type as win/loss
sparklineGroup.SparklineType = SparklineType.ColumnStacked100;
sparklineGroup.DisplayEmptyCellsAs = SparklineEmptyCells.Zero;
sparklineGroup.DisplayAxis = true;
sparklineGroup.AxisColor = Color.FromArgb(255, 0, 0, 0);
sparklineGroup.ShowFirstPoint = true;
sparklineGroup.FirstPointColor = Color.FromArgb(255, 0, 128, 0);
sparklineGroup.ShowLastPoint = true;
sparklineGroup.LastPointColor = Color.FromArgb(255, 255, 165, 0);
sparklineGroup.ShowNegativePoint = true;
sparklineGroup.NegativePointColor = Color.FromArgb(255, 255, 0, 0);
sparklines = sparklineGroup.Add();
dataRange = sheet.Range["D36:G46"];
referenceRange = sheet.Range["H36:H46"];
sparklines.Add(dataRange, referenceRange);
#endregion
#region Save the Workbook
StorageFile storageFile;
if (!(Windows.Foundation.Metadata.ApiInformation.IsTypePresent("Windows.Phone.UI.Input.HardwareButtons")))
{
FileSavePicker savePicker = new FileSavePicker();
savePicker.SuggestedStartLocation = PickerLocationId.Desktop;
savePicker.SuggestedFileName = "Sparklines";
savePicker.FileTypeChoices.Add("Excel Files", new List <string>()
{
".xlsx",
});
storageFile = await savePicker.PickSaveFileAsync();
}
else
{
StorageFolder local = Windows.Storage.ApplicationData.Current.LocalFolder;
storageFile = await local.CreateFileAsync("Sparklines.xlsx", CreationCollisionOption.ReplaceExisting);
}
if (storageFile != null)
{
//Saving the workbook
await workbook.SaveAsAsync(storageFile);
workbook.Close();
excelEngine.Dispose();
MessageDialog msgDialog = new MessageDialog("Do you want to view the Document?", "File has been created successfully.");
UICommand yesCmd = new UICommand("Yes");
msgDialog.Commands.Add(yesCmd);
UICommand noCmd = new UICommand("No");
msgDialog.Commands.Add(noCmd);
IUICommand cmd = await msgDialog.ShowAsync();
if (cmd == yesCmd)
{
// Launch the saved file
bool success = await Windows.System.Launcher.LaunchFileAsync(storageFile);
}
}
else
{
workbook.Close();
excelEngine.Dispose();
}
#endregion
}
private void Button_Click(object sender, RoutedEventArgs e)
{
//Instantiate the spreadsheet creation engine.
ExcelEngine excelEngine = new ExcelEngine();
IApplication application = excelEngine.Excel;
application.DefaultVersion = ExcelVersion.Excel2010;
//A new workbook is created.[Equivalent to creating a new workbook in MS Excel]
//Open workbook with Data
IWorkbook workbook;
#if NETCORE
workbook = excelEngine.Excel.Workbooks.Open(@"..\..\..\..\..\..\..\Common\Data\XlsIO\Sparkline.xlsx");
#else
workbook = excelEngine.Excel.Workbooks.Open(@"..\..\..\..\..\..\Common\Data\XlsIO\Sparkline.xlsx");
#endif
//The first worksheet object in the worksheets collection is accessed.
IWorksheet sheet = workbook.Worksheets[0];
#region WholeSale Report
//A new Sparkline group is added to the sheet sparklinegroups
ISparklineGroup sparklineGroup = sheet.SparklineGroups.Add();
//Set the Sparkline group type as line
sparklineGroup.SparklineType = SparklineType.Line;
//Set to display the empty cell as line
sparklineGroup.DisplayEmptyCellsAs = SparklineEmptyCells.Line;
//Sparkline group style properties
sparklineGroup.ShowFirstPoint = true;
sparklineGroup.FirstPointColor = System.Drawing.Color.Green;
sparklineGroup.ShowLastPoint = true;
sparklineGroup.LastPointColor = System.Drawing.Color.DarkOrange;
sparklineGroup.ShowHighPoint = true;
sparklineGroup.HighPointColor = System.Drawing.Color.DarkBlue;
sparklineGroup.ShowLowPoint = true;
sparklineGroup.LowPointColor = System.Drawing.Color.DarkViolet;
sparklineGroup.ShowMarkers = true;
sparklineGroup.MarkersColor = System.Drawing.Color.Black;
sparklineGroup.ShowNegativePoint = true;
sparklineGroup.NegativePointColor = System.Drawing.Color.Red;
//set the line weight
sparklineGroup.LineWeight = 0.3;
//The sparklines are added to the sparklinegroup.
ISparklines sparklines = sparklineGroup.Add();
//Set the Sparkline Datarange .
IRange dataRange = sheet.Range["D6:G17"];
//Set the Sparkline Reference range.
IRange referenceRange = sheet.Range["H6:H17"];
//Create a sparkline with the datarange and reference range.
sparklines.Add(dataRange, referenceRange);
#endregion
#region Retail Trade
//A new Sparkline group is added to the sheet sparklinegroups
sparklineGroup = sheet.SparklineGroups.Add();
//Set the Sparkline group type as column
sparklineGroup.SparklineType = SparklineType.Column;
//Set to display the empty cell as zero
sparklineGroup.DisplayEmptyCellsAs = SparklineEmptyCells.Zero;
//Sparkline group style properties
sparklineGroup.ShowHighPoint = true;
sparklineGroup.HighPointColor = System.Drawing.Color.Green;
sparklineGroup.ShowLowPoint = true;
sparklineGroup.LowPointColor = System.Drawing.Color.Red;
sparklineGroup.ShowNegativePoint = true;
sparklineGroup.NegativePointColor = System.Drawing.Color.Black;
//The sparklines are added to the sparklinegroup.
sparklines = sparklineGroup.Add();
//Set the Sparkline Datarange .
dataRange = sheet.Range["D21:G32"];
//Set the Sparkline Reference range.
referenceRange = sheet.Range["H21:H32"];
//Create a sparkline with the datarange and reference range.
sparklines.Add(dataRange, referenceRange);
#endregion
#region Manufacturing Trade
//A new Sparkline group is added to the sheet sparklinegroups
sparklineGroup = sheet.SparklineGroups.Add();
//Set the Sparkline group type as win/loss
sparklineGroup.SparklineType = SparklineType.ColumnStacked100;
sparklineGroup.DisplayEmptyCellsAs = SparklineEmptyCells.Zero;
sparklineGroup.DisplayAxis = true;
sparklineGroup.AxisColor = System.Drawing.Color.Black;
sparklineGroup.ShowFirstPoint = true;
sparklineGroup.FirstPointColor = System.Drawing.Color.Green;
sparklineGroup.ShowLastPoint = true;
sparklineGroup.LastPointColor = System.Drawing.Color.Orange;
sparklineGroup.ShowNegativePoint = true;
sparklineGroup.NegativePointColor = System.Drawing.Color.Red;
sparklines = sparklineGroup.Add();
dataRange = sheet.Range["D36:G46"];
referenceRange = sheet.Range["H36:H46"];
sparklines.Add(dataRange, referenceRange);
#endregion
try
{
//Saving the workbook to disk.
workbook.Version = ExcelVersion.Excel2010;
fileName = "Sparklines.xlsx";
workbook.SaveAs(fileName);
//Close the workbook.
workbook.Close();
//No exception will be thrown if there are unsaved workbooks.
excelEngine.ThrowNotSavedOnDestroy = false;
excelEngine.Dispose();
//Message box confirmation to view the created spreadsheet.
if (MessageBox.Show("Do you want to view the workbook?", "Workbook has been created",
MessageBoxButton.YesNo, MessageBoxImage.Information) == MessageBoxResult.Yes)
{
//Launching the Excel file using the default Application.[MS Excel Or Free ExcelViewer]
#if NETCORE
System.Diagnostics.Process process = new System.Diagnostics.Process();
process.StartInfo = new System.Diagnostics.ProcessStartInfo(fileName)
{
UseShellExecute = true
};
process.Start();
#else
Process.Start(fileName);
#endif
//Exit
this.Close();
}
else
{
// Exit
this.Close();
}
}
catch
{
MessageBox.Show("Sorry, Excel can't open two workbooks with the same name at the same time.\nPlease close the workbook and try again.", "File is already open", MessageBoxButton.OK);
}
}
private void btnCreate_Click(object sender, System.EventArgs e)
{
#region Workbook Initialize
//New instance of XlsIO is created.[Equivalent to launching MS Excel with no workbooks open].
//The instantiation process consists of two steps.
//Step 1 : Instantiate the spreadsheet creation engine.
ExcelEngine excelEngine = new ExcelEngine();
//Step 2 : Instantiate the excel application object.
IApplication application = excelEngine.Excel;
//Set the default version as Excel 2010.
application.DefaultVersion = ExcelVersion.Excel2010;
string inputPath = GetTemplatePath("Sparkline.xlsx");
//A new workbook is created.[Equivalent to creating a new workbook in MS Excel]
//The new workbook will have 1 worksheet.
IWorkbook workbook = application.Workbooks.Open(inputPath);
//The first worksheet object in the worksheets collection is accessed.
IWorksheet worksheet = workbook.Worksheets[0];
#endregion
#region WholeSale Report
//A new Sparkline group is added to the sheet sparklinegroups
ISparklineGroup sparklineGroup = worksheet.SparklineGroups.Add();
//Set the Sparkline group type as line
sparklineGroup.SparklineType = SparklineType.Line;
//Set to display the empty cell as line
sparklineGroup.DisplayEmptyCellsAs = SparklineEmptyCells.Line;
#region Sparkline Group Style Properties
//Sparkline group style properties
sparklineGroup.ShowFirstPoint = true;
sparklineGroup.FirstPointColor = Color.Green;
sparklineGroup.ShowLastPoint = true;
sparklineGroup.LastPointColor = Color.DarkOrange;
sparklineGroup.ShowHighPoint = true;
sparklineGroup.HighPointColor = Color.DarkBlue;
sparklineGroup.ShowLowPoint = true;
sparklineGroup.LowPointColor = Color.DarkViolet;
sparklineGroup.ShowMarkers = true;
sparklineGroup.MarkersColor = Color.Black;
sparklineGroup.ShowNegativePoint = true;
sparklineGroup.NegativePointColor = Color.Red;
#endregion
//set the line weight
sparklineGroup.LineWeight = 0.3;
//The sparklines are added to the sparklinegroup.
ISparklines sparklines = sparklineGroup.Add();
//Set the Sparkline Datarange .
IRange dataRange = worksheet.Range["D6:G17"];
//Set the Sparkline Reference range.
IRange referenceRange = worksheet.Range["H6:H17"];
//Create a sparkline with the datarange and reference range.
sparklines.Add(dataRange, referenceRange);
#endregion
#region Retail Trade
//A new Sparkline group is added to the sheet sparklinegroups
sparklineGroup = worksheet.SparklineGroups.Add();
//Set the Sparkline group type as column
sparklineGroup.SparklineType = SparklineType.Column;
//Set to display the empty cell as zero
sparklineGroup.DisplayEmptyCellsAs = SparklineEmptyCells.Zero;
#region Sparkline Group Style Properties
//Sparkline group style properties
sparklineGroup.ShowHighPoint = true;
sparklineGroup.HighPointColor = Color.Green;
sparklineGroup.ShowLowPoint = true;
sparklineGroup.LowPointColor = Color.Red;
sparklineGroup.ShowNegativePoint = true;
sparklineGroup.NegativePointColor = Color.Black;
#endregion
//The sparklines are added to the sparklinegroup.
sparklines = sparklineGroup.Add();
//Set the Sparkline Datarange .
dataRange = worksheet.Range["D21:G32"];
//Set the Sparkline Reference range.
referenceRange = worksheet.Range["H21:H32"];
//Create a sparkline with the datarange and reference range.
sparklines.Add(dataRange, referenceRange);
#endregion
#region Manufacturing Trade
//A new Sparkline group is added to the sheet sparklinegroups
sparklineGroup = worksheet.SparklineGroups.Add();
//Set the Sparkline group type as win/loss
sparklineGroup.SparklineType = SparklineType.ColumnStacked100;
sparklineGroup.DisplayEmptyCellsAs = SparklineEmptyCells.Zero;
#region Sparkline Group Style Properties
sparklineGroup.DisplayAxis = true;
sparklineGroup.AxisColor = Color.Black;
sparklineGroup.ShowFirstPoint = true;
sparklineGroup.FirstPointColor = Color.Green;
sparklineGroup.ShowLastPoint = true;
sparklineGroup.LastPointColor = Color.Orange;
sparklineGroup.ShowNegativePoint = true;
sparklineGroup.NegativePointColor = Color.Red;
#endregion
sparklines = sparklineGroup.Add();
dataRange = worksheet.Range["D36:G46"];
referenceRange = worksheet.Range["H36:H46"];
sparklines.Add(dataRange, referenceRange);
#endregion
#region Workbook Save and Close
//Saving the workbook to disk.
workbook.SaveAs("Sparklines.xlsx");
//Close the workbook.
workbook.Close();
//No exception will be thrown if there are unsaved workbooks.
excelEngine.ThrowNotSavedOnDestroy = false;
excelEngine.Dispose();
#endregion
#region View the Workbook
//Message box confirmation to view the created spreadsheet.
if (MessageBox.Show("Do you want to view the workbook?", "Workbook has been created",
MessageBoxButtons.YesNo, MessageBoxIcon.Information)
== DialogResult.Yes)
{
//Launching the Excel file using the default Application.[MS Excel Or Free ExcelViewer]
#if NETCORE
System.Diagnostics.Process process = new System.Diagnostics.Process();
process.StartInfo = new System.Diagnostics.ProcessStartInfo("Sparklines.xlsx")
{
UseShellExecute = true
};
process.Start();
#else
Process.Start("Sparklines.xlsx");
#endif
//Exit
this.Close();
}
else
{
// Exit
this.Close();
}
#endregion
}
//
// GET: /CallCenterDashboard/
public ActionResult CallCenterDashboard(string button)
{
if (button == null)
{
return(View());
}
else if (button == "Input Template")
{
//Step 1 : Instantiate the spreadsheet creation engine.
ExcelEngine excelEngine = new ExcelEngine();
//Step 2 : Instantiate the excel application object.
IApplication application = excelEngine.Excel;
application.EnablePartialTrustCode = true;
IWorkbook workbook = application.Workbooks.Open(ResolveApplicationDataPath(@"CallCenterTemplate.xlsx"));
return(excelEngine.SaveAsActionResult(workbook, "Template.xlsx", HttpContext.ApplicationInstance.Response, ExcelDownloadType.PromptDialog, ExcelHttpContentType.Excel2016));
}
else
{
#region Workbook Initialize
//Initialize the spreadsheet creation engine
ExcelEngine excelEngine = new ExcelEngine();
//Initialize the Excel application object
IApplication application = excelEngine.Excel;
//Set the default application version
application.DefaultVersion = ExcelVersion.Excel2016;
//Enable the incremental formula
application.EnableIncrementalFormula = true;
//Load the existing Excel document into IWorkbook
IWorkbook workbook = application.Workbooks.Open(ResolveApplicationDataPath(@"CallCenterTemplate.xlsx"));
#endregion
#region Calculation Sheet
//Access the Calculation sheet
IWorksheet calculation = workbook.Worksheets["Calculation"];
//Formula calculation is enabled for the sheet
calculation.EnableSheetCalculations();
calculation.Range["A1"].Text = "Week";
calculation.Range["B1"].Text = "Sorting Control";
calculation.Range["D2"].NumberFormat = "dd-mmm-yyyy";
calculation.Range["D2"].Formula = "=DATE(2016,1,4)+7*(A2-1)";
calculation.Range["E2"].Formula = "=\"Week # \"&A2";
#region Call data in the week
calculation.Range["A4"].Text = "Total Calls";
calculation.Range["B4"].Formula = "=COUNTIF(Data[Column1],TRUE)";
calculation.Range["A5"].Text = "Calls Answered";
calculation.Range["B5"].Formula = "=SUMPRODUCT((Data[Answered (Y/N)]=\"Y\")*(Data[Column1]=TRUE))";
calculation.Range["A6"].Text = "Avg Speed of Answer";
calculation.Range["B6"].Formula = "=SUMPRODUCT((Data[Speed of Answer]),--(Data[Column1]=TRUE))/B4";
calculation.Range["A7"].Text = "Abandon Rate";
calculation.Range["B7"].Formula = "=SUMPRODUCT((Data[Answered (Y/N)]=\"N\")*(Data[Column1]=TRUE))/B4";
calculation.Range["A8"].Text = "Avg Call/Min";
calculation.Range["B8"].Formula = "=B4/(7*9*60)";
calculation.Range["A9"].Text = "Satisfaction Overall";
calculation.Range["B9"].Formula = "=SUMPRODUCT((Data[Satisfaction rating]),--(Data[Column1]=TRUE))/B5";
calculation.Range["A10"].Text = "Calls of Less than 180 Seconds";
calculation.Range["B10"].Formula = "=SUMPRODUCT((Data[Column1]=TRUE)*(Data[Answered (Y/N)]=\"Y\")*(Data[AvgTalkDuration]<TIME(0,3,0)))";
calculation.Range["A11"].Text = "% Calls of Less than 180 Seconds";
calculation.Range["B11"].Formula = "=B10/B5";
calculation.Range["A12"].Text = "Satisfaction less than equal to 3";
calculation.Range["B12"].Formula = "=SUMPRODUCT((Data[Column1]=TRUE)*(Data[Date]<D2+6)*(Data[Satisfaction rating]<=3))";
#endregion
#region Call data of each agent
calculation.Range["A15"].Text = "Agent Name";
calculation.Range["B15"].Text = "Total Calls";
calculation.Range["C15"].Text = "Calls Answered";
calculation.Range["D15"].Text = "Avg Speed of Answer";
calculation.Range["E15"].Text = "Call Resolution %";
calculation.Range["F15"].Text = "Call Resolved";
calculation.Range["H15"].Text = "For Sorting";
calculation.Range["M15"].Text = "Total Calls";
calculation.Range["N15"].Text = "Calls Answered";
calculation.Range["O15"].Text = "Avg Speed of Answer";
calculation.Range["P15"].Text = "Call Resolution (%)";
calculation.Range["A16"].Text = "Diane";
calculation.Range["A17"].Text = "Becky";
calculation.Range["A18"].Text = "Stewart";
calculation.Range["A19"].Text = "Greg";
calculation.Range["A20"].Text = "Jim";
calculation.Range["A21"].Text = "Joe";
calculation.Range["A22"].Text = "Martha";
calculation.Range["A23"].Text = "Dan";
calculation.Range["B16:B23"].Formula = "=SUMPRODUCT((Data[Column1]=TRUE)*(Data[Agent]=A16))";
calculation.Range["C16:C23"].Formula = "=SUMPRODUCT((Data[Column1]=TRUE)*(Data[Agent]=A16)*(Data[Answered (Y/N)]=\"Y\"))";
calculation.Range["D16:D23"].Formula = "=SUMPRODUCT((Data[Column1]=TRUE)*(Data[Agent]=A16),(Data[Speed of Answer]))/C16";
calculation.Range["E16:E23"].Formula = "=SUMPRODUCT((Data[Column1]=TRUE)*(Data[Agent]=A16)*(Data[Resolved]=\"Y\"))/B16";
calculation.Range["F16:F23"].Formula = "=SUMPRODUCT((Data[Column1]=TRUE)*(Data[Agent]=A16)*(Data[Resolved]=\"Y\"))";
calculation.Range["H16:H23"].Formula = "=INDEX($B$16:$E$23,ROWS($G$16:G16),$B$2)";
calculation.Range["I16:I23"].Formula = "=H16+ROWS($H$16:H16)/1000000";
calculation.Range["J16:J23"].Formula = "=IF($B$2=3,SMALL($I$16:$I$23,ROWS($I$16:I16)),LARGE($I$16:$I$23,ROWS($I$16:I16)))";
calculation.Range["K16:K23"].Formula = "=MATCH(J16,$I$16:$I$23,0)";
calculation.Range["L16:L23"].Formula = "=INDEX($A$16:$A$23,K16)";
calculation.Range["M16:M23"].Formula = "=INDEX($A$16:$E$23,MATCH($L16,$A$16:$A$23,0),COLUMNS($K$14:L16))";
calculation.Range["N16:N23"].Formula = "=INDEX($A$16:$E$23,MATCH($L16,$A$16:$A$23,0),COLUMNS($K$14:M16))";
calculation.Range["O16:O23"].Formula = "=INDEX($A$16:$E$23,MATCH($L16,$A$16:$A$23,0),COLUMNS($K$14:N16))";
calculation.Range["P16:P23"].Formula = "=INDEX($A$16:$E$23,MATCH($L16,$A$16:$A$23,0),COLUMNS($K$14:O16))";
#endregion
#region Overall Satisfaction chart
calculation.Range["A25"].Text = "Satisfaction Chart";
calculation.Range["A26"].Number = 50;
calculation.Range["A27"].Number = 20;
calculation.Range["A28"].Number = 30;
calculation.Range["A29"].Number = 100;
calculation.Range["B26"].Formula = "=B9*20-2";
calculation.Range["B27"].Number = 2;
calculation.Range["B28"].Formula = "=200-B26";
#endregion
#region call data of each agent per day
calculation.Range["A32"].Text = "Agent Name";
calculation.Range["B32"].Text = "Mon";
calculation.Range["C32"].Text = "Tue";
calculation.Range["D32"].Text = "Wed";
calculation.Range["E32"].Text = "Thu";
calculation.Range["F32"].Text = "Fri";
calculation.Range["G32"].Text = "Sat";
calculation.Range["H32"].Text = "Sun";
calculation.Range["A33:A40"].Formula = "=L16";
calculation.Range["B33:B40"].Formula = "=SUMPRODUCT((INT(Data[Date])=($D$2+COLUMNS($A$33:A33)-1))*(Data[Agent]=$A33)*(Data[Resolved]=\"Y\"))";
calculation.Range["C33:C40"].Formula = "=SUMPRODUCT((INT(Data[Date])=($D$2+COLUMNS($A$33:B33)-1))*(Data[Agent]=$A33)*(Data[Resolved]=\"Y\"))";
calculation.Range["D33:D40"].Formula = "=SUMPRODUCT((INT(Data[Date])=($D$2+COLUMNS($A$33:C33)-1))*(Data[Agent]=$A33)*(Data[Resolved]=\"Y\"))";
calculation.Range["E33:E40"].Formula = "=SUMPRODUCT((INT(Data[Date])=($D$2+COLUMNS($A$33:D33)-1))*(Data[Agent]=$A33)*(Data[Resolved]=\"Y\"))";
calculation.Range["F33:F40"].Formula = "=SUMPRODUCT((INT(Data[Date])=($D$2+COLUMNS($A$33:E33)-1))*(Data[Agent]=$A33)*(Data[Resolved]=\"Y\"))";
calculation.Range["G33:G40"].Formula = "=SUMPRODUCT((INT(Data[Date])=($D$2+COLUMNS($A$33:F33)-1))*(Data[Agent]=$A33)*(Data[Resolved]=\"Y\"))";
calculation.Range["H33:H40"].Formula = "=SUMPRODUCT((INT(Data[Date])=($D$2+COLUMNS($A$33:G33)-1))*(Data[Agent]=$A33)*(Data[Resolved]=\"Y\"))";
#endregion
#region Satisfaction score for each agent
calculation.Range["A43"].Text = "Agent Name";
calculation.Range["B43"].Text = "Satisfaction Score";
calculation.Range["C43"].Text = "Target";
calculation.Range["A44:A51"].Formula = "=A33";
calculation.Range["B44:B51"].Formula = "=SUMPRODUCT((Data[Column1]=TRUE)*(Data[Agent]=$A44),(Data[Satisfaction rating]))/N16";
calculation.Range["C44:C51"].Number = 3.5;
calculation.Range["D44:D51"].Formula = "=IF(B44>C44,$A$52&\" \"&A44,A44)";
calculation.Range["E44:E51"].Formula = "=B44";
#endregion
#region call data for each product
calculation.Range["B54"].Text = "Total Cell";
calculation.Range["C54"].Text = "Call Answered";
calculation.Range["D54"].Text = "Abandoned Calls %";
calculation.Range["E54"].Text = "SLA Limit";
calculation.Range["F54"].Text = "SLA Breached";
calculation.Range["A55"].Text = "Washing Machine";
calculation.Range["A56"].Text = "Toaster";
calculation.Range["A57"].Text = "Fridge";
calculation.Range["A58"].Text = "Air Conditioner";
calculation.Range["A59"].Text = "Television";
calculation.Range["B55:B59"].Formula = "=SUMPRODUCT((Data[Column1]=TRUE)*(Data[Department]=A55))";
calculation.Range["C55:C59"].Formula = "=SUMPRODUCT((Data[Column1]=TRUE)*(Data[Department]=A55)*(Data[Answered (Y/N)]=\"Y\"))";
calculation.Range["D55:D59"].Formula = "=(B55-C55)/B55";
calculation.Range["E55:E59"].NumberFormat = "0%";
calculation.Range["E55:E59"].Value = "20%";
calculation.Range["F55:F59"].Formula = "=IF(D55>E55,D55,NA())";
#endregion
//Formula calculation is disabled for the sheet
calculation.DisableSheetCalculations();
#endregion
#region Dashboard Sheet
//Create Dashboard sheet
IWorksheet dashboard = workbook.Worksheets.Create("Dashboard");
dashboard.Range["A1"].ColumnWidth = 0.5;
dashboard.Range["A1"].RowHeight = 30;
dashboard.Range["I1"].ColumnWidth = 0.5;
#region Marcos for selecting the week and sort option
//Cell Style for B1 to R1
dashboard.Range["B1:R1"].CellStyle.Color = Color.FromArgb(48, 13, 225);
//Cell Style and text in B6 - Click to Sort
dashboard.Range["B6:B7"].Merge();
dashboard.Range["B6"].Text = "Click to Sort";
dashboard.Range["B6"].CellStyle.Font.RGBColor = Color.FromArgb(48, 13, 225);
dashboard.Range["B6"].CellStyle.Font.Italic = true;
dashboard.Range["B6"].HorizontalAlignment = ExcelHAlign.HAlignCenter;
dashboard.Range["B6"].VerticalAlignment = ExcelVAlign.VAlignCenter;
//Macros for Scroll Bar and Option Buttons
IVbaProject project = workbook.VbaProject;
IVbaModules vbaModules = project.Modules;
IVbaModule scrollBar = vbaModules.Add("scrollBar", VbaModuleType.StdModule);
scrollBar.Code = "Sub Auto_Open()" +
"\n Dim Worksheet_Name As String" +
"\n Worksheet_Name = \"Dashboard\"" +
"\n ThisWorkbook.Worksheets(Worksheet_Name).Select" +
"\n ThisWorkbook.Worksheets(Worksheet_Name).ScrollBars.Add(12, 3.5, 96.5, 20).Select" +
"\n With Selection" +
"\n .Value = 0" + "\n .Min = 1" + "\n .Max = 4" + "\n .SmallChange = 1" +
"\n .LargeChange = 10" + "\n .LinkedCell = \"=Calculation!A2\"" + "\n .Display3DShading = True" +
"\n End With" +
"\n ThisWorkbook.Worksheets(Worksheet_Name).OptionButtons.Add(98.5, 97, 63, 17.5).Select" +
"\n Selection.Characters.Text = \"\"" + "\n With Selection" +
"\n .Value = xlOn" + "\n .LinkedCell = \"=Calculation!B2\"" + "\n .Display3DShading = False" +
"\n End With" +
"\n ThisWorkbook.Worksheets(Worksheet_Name).OptionButtons.Add(166, 97, 63, 17.5).Select" +
"\n Selection.Characters.Text = \"\"" + "\n With Selection" +
"\n .Value = xlOff" + "\n .LinkedCell = \"=Calculation!B2\"" + "\n .Display3DShading = False" +
"\n End With" +
"\n ThisWorkbook.Worksheets(Worksheet_Name).OptionButtons.Add(270, 97, 63, 17.5).Select" +
"\n Selection.Characters.Text = \"\"" + "\n With Selection" +
"\n .Value = xlOff" + "\n .LinkedCell = \"=Calculation!B2\"" + "\n .Display3DShading = False" +
"\n End With" +
"\n ThisWorkbook.Worksheets(Worksheet_Name).OptionButtons.Add(380, 97, 63, 17.5).Select" +
"\n Selection.Characters.Text = \"\"" + "\n With Selection" +
"\n .Value = xlOff" + "\n .LinkedCell = \"=Calculation!B2\"" + "\n .Display3DShading = False" +
"\n End With" +
"\n End Sub";
#endregion
#region Week display
//Week Selected
dashboard.Range["D1"].Formula = "=Calculation!E2";
dashboard.Range["D1"].CellStyle.Font.Bold = true;
dashboard.Range["D1"].CellStyle.Font.Italic = true;
dashboard.Range["D1"].CellStyle.Font.Size = 16;
dashboard.Range["D1"].CellStyle.Font.RGBColor = Color.FromArgb(225, 225, 225);
dashboard.Range["D1"].CellStyle.HorizontalAlignment = ExcelHAlign.HAlignCenter;
dashboard.Range["D1"].CellStyle.VerticalAlignment = ExcelVAlign.VAlignCenter;
#endregion
#region Call data overview for the week
dashboard.Range["B2:D3"].Merge();
dashboard.Range["B4:D5"].Merge();
dashboard.Range["E2:G3"].Merge();
dashboard.Range["E4:G5"].Merge();
dashboard.Range["H2:M3"].Merge();
dashboard.Range["H4:M5"].Merge();
dashboard.Range["N2:R3"].Merge();
dashboard.Range["N4:R5"].Merge();
dashboard.Range["B2:N4"].CellStyle.Font.FontName = "Verdana";
dashboard.Range["B2:N4"].CellStyle.Font.Bold = true;
dashboard.Range["B2:N2"].CellStyle.Font.RGBColor = Color.FromArgb(0, 0, 0);
dashboard.Range["B4:N4"].CellStyle.Font.RGBColor = Color.FromArgb(48, 13, 225);
dashboard.Range["B2:N2"].CellStyle.Font.Size = 12;
dashboard.Range["B4:N4"].CellStyle.Font.Size = 18;
dashboard.Range["B2:N4"].HorizontalAlignment = ExcelHAlign.HAlignCenter;
dashboard.Range["B2:N4"].VerticalAlignment = ExcelVAlign.VAlignCenter;
dashboard.Range["B2:N4"].CellStyle.Color = Color.FromArgb(217, 217, 217);
dashboard.Range["B2"].Text = "Total Calls";
dashboard.Range["E2"].Text = "Avg. Answer Speed (in sec)";
//Create a rich text string
IRichTextString richText = dashboard.Range["E2"].RichText;
//Create fonts for rich text formatting
IFont font1 = workbook.CreateFont();
font1.FontName = "Verdana";
font1.RGBColor = Color.FromArgb(0, 0, 0);
font1.Bold = true;
font1.Size = 12;
richText.SetFont(0, 17, font1);
IFont font2 = workbook.CreateFont();
font2.FontName = "Verdana";
font2.RGBColor = Color.FromArgb(0, 0, 0);
font2.Bold = false;
font2.Size = 10;
richText.SetFont(18, 25, font2);
dashboard.Range["H2"].Text = "Abandon rate";
dashboard.Range["N2"].Text = "Avg Calls/Minute";
dashboard.Range["B4"].Formula = "=Calculation!B4";
dashboard.Range["E4"].NumberFormat = "0.0";
dashboard.Range["E4"].Formula = "=Calculation!B6";
dashboard.Range["H4"].NumberFormat = "0.0%";
dashboard.Range["H4"].Formula = "=Calculation!B7";
dashboard.Range["N4"].NumberFormat = "0.000";
dashboard.Range["N4"].Formula = "=Calculation!B8";
dashboard.Range["B2:D5"].BorderAround(ExcelLineStyle.Thin, Color.Black);
dashboard.Range["E2:G5"].BorderAround(ExcelLineStyle.Thin, Color.Black);
dashboard.Range["H2:M5"].BorderAround(ExcelLineStyle.Thin, Color.Black);
dashboard.Range["N2:R5"].BorderAround(ExcelLineStyle.Thin, Color.Black);
#endregion
#region Table to display call data of each agent
dashboard.Range["B8"].Text = "Agent Name";
dashboard.Range["C8"].Text = "Total Calls";
dashboard.Range["D8"].Text = "Calls Answered";
dashboard.Range["E8"].Text = "Avg. Speed of Answer";
dashboard.Range["F8"].Text = "Call Resolution (%)";
dashboard.Range["H8"].Text = "CR Trend";
dashboard.Range["B9:B16"].Formula = "=Calculation!L16";
dashboard.Range["C9:C16"].Formula = "=Calculation!M16";
dashboard.Range["D9:D16"].Formula = "=Calculation!N16";
dashboard.Range["E9:E16"].NumberFormat = "0.0";
dashboard.Range["E9:E16"].Formula = "=Calculation!O16";
dashboard.Range["F9:F16"].NumberFormat = "0.0%";
dashboard.Range["F9:F16"].Formula = "=Calculation!P16";
dashboard.Range["G9:G16"].Formula = "=F9";
#region Conditional formats
//Create icon sets for the data in the specified range
IConditionalFormats conditionalFormats = dashboard.Range["G9:G16"].ConditionalFormats;
IConditionalFormat conditionalFormat = conditionalFormats.AddCondition();
conditionalFormat.FormatType = ExcelCFType.IconSet;
IIconSet iconSet = conditionalFormat.IconSet;
iconSet.IconSet = ExcelIconSetType.ThreeSigns;
//Apply three signs icon and hide the data in the specified range
IIconConditionValue iconValue2 = iconSet.IconCriteria[1] as IIconConditionValue;
iconValue2.IconSet = ExcelIconSetType.ThreeSigns;
iconValue2.Index = 1;
iconValue2.Type = ConditionValueType.Number;
iconValue2.Value = "0.7";
iconValue2.Operator = ConditionalFormatOperator.GreaterThan;
IIconConditionValue iconValue3 = iconSet.IconCriteria[2] as IIconConditionValue;
iconValue3.IconSet = ExcelIconSetType.ThreeSigns;
iconValue3.Index = 2;
iconValue3.Type = ConditionValueType.Number;
iconValue3.Value = "0.8";
iconValue3.Operator = ConditionalFormatOperator.GreaterThanorEqualTo;
iconSet.ShowIconOnly = true;
#endregion
//Auto-fit columns
dashboard.Range["B8:G16"].AutofitColumns();
dashboard.Range["H8"].ColumnWidth = 11;
#region Sparklines
//Add sparkline groups
ISparklineGroup sparklineGroup = dashboard.SparklineGroups.Add();
sparklineGroup.SparklineType = SparklineType.Line;
sparklineGroup.MarkersColor = Color.FromArgb(51, 102, 153);
sparklineGroup.LowPointColor = Color.FromArgb(192, 0, 0);
sparklineGroup.ShowHighPoint = false;
sparklineGroup.ShowFirstPoint = false;
sparklineGroup.ShowLastPoint = false;
sparklineGroup.ShowMarkers = false;
//Add sparklines
ISparklines sparklines = sparklineGroup.Add();
IRange dataRange = calculation.Range["B33:H40"];
IRange referenceRange = dashboard.Range["H9:H16"];
sparklines.Add(dataRange, referenceRange);
#endregion
//Apply range formatting using cellstyle properties
dashboard.Range["B8:E16"].BorderAround(ExcelLineStyle.Thin, Color.Black);
dashboard.Range["B8:E16"].BorderInside(ExcelLineStyle.Thin, Color.Black);
dashboard.Range["F8:G8"].BorderAround(ExcelLineStyle.Thin, Color.Black);
dashboard.Range["F9:G9"].BorderAround(ExcelLineStyle.Thin, Color.Black);
dashboard.Range["F10:G10"].BorderAround(ExcelLineStyle.Thin, Color.Black);
dashboard.Range["F11:G11"].BorderAround(ExcelLineStyle.Thin, Color.Black);
dashboard.Range["F12:G12"].BorderAround(ExcelLineStyle.Thin, Color.Black);
dashboard.Range["F13:G13"].BorderAround(ExcelLineStyle.Thin, Color.Black);
dashboard.Range["F14:G14"].BorderAround(ExcelLineStyle.Thin, Color.Black);
dashboard.Range["F15:G15"].BorderAround(ExcelLineStyle.Thin, Color.Black);
dashboard.Range["F16:G16"].BorderAround(ExcelLineStyle.Thin, Color.Black);
dashboard.Range["H8:H16"].BorderAround(ExcelLineStyle.Thin, Color.Black);
dashboard.Range["B8:H8"].CellStyle.Font.Bold = true;
dashboard.Range["B8:H8"].CellStyle.Font.Italic = true;
dashboard.Range["B8:H8"].CellStyle.Color = Color.FromArgb(217, 217, 217);
#endregion
#region Column Chart - Call Abandon Rate By Department
//Column Chart - Chart Title
dashboard.Range["J8:R8"].Merge();
dashboard.Range["J8"].CellStyle.Font.Italic = true;
dashboard.Range["J8"].CellStyle.Font.Size = 12;
dashboard.Range["J8"].CellStyle.Font.RGBColor = Color.FromArgb(127, 127, 127);
dashboard.Range["J8"].CellStyle.HorizontalAlignment = ExcelHAlign.HAlignCenter;
dashboard.Range["J8"].CellStyle.VerticalAlignment = ExcelVAlign.VAlignCenter;
dashboard.Range["J8"].Text = "Call Abandon Rate - By Department";
//Column Chart - Call Abandon Rate - By Department
IChartShape columnChart = dashboard.Charts.Add();
IChartSerie columnserieOne = columnChart.Series.Add();
columnserieOne.Values = calculation.Range["D55:D59"];
columnserieOne.CategoryLabels = calculation.Range["A55:A59"];
columnserieOne.SerieFormat.CommonSerieOptions.GapWidth = 150;
columnserieOne.DataPoints.DefaultDataPoint.DataLabels.IsValue = true;
columnChart.PrimaryValueAxis.MajorUnit = 0.1;
columnChart.PrimaryValueAxis.NumberFormat = "0.0%";
columnChart.PrimaryValueAxis.HasMajorGridLines = false;
columnChart.HasLegend = false;
columnChart.ChartArea.Border.LineColor = Color.White;
columnChart.Left = 1;
columnChart.TopRow = 9;
columnChart.LeftColumn = 10;
columnChart.BottomRow = 17;
columnChart.RightColumn = 19;
(columnChart as IChart).Height = (columnChart as IChart).Height - 10;
(columnChart as IChart).Width = (columnChart as IChart).Width - 10;
dashboard.Range["J8:R16"].BorderAround(ExcelLineStyle.Thin, Color.Black);
#endregion
#region SLA Limits
dashboard.Range["J18:R18"].Merge();
dashboard.Range["J21:O23"].Merge();
dashboard.Range["J26:O28"].Merge();
dashboard.Range["P21:R23"].Merge();
dashboard.Range["P26:R28"].Merge();
dashboard.Range["J18"].Text = "SLA LIMITS";
dashboard.Range["J18"].CellStyle.Font.Bold = true;
dashboard.Range["J18"].CellStyle.Font.Size = 16;
dashboard.Range["J18"].CellStyle.Font.FontName = "Calibri (body)";
dashboard.Range["J18"].CellStyle.HorizontalAlignment = ExcelHAlign.HAlignCenter;
dashboard.Range["J18"].CellStyle.VerticalAlignment = ExcelVAlign.VAlignCenter;
dashboard.Range["J18"].CellStyle.Font.Color = ExcelKnownColors.Black;
dashboard.Range["J18"].CellStyle.Color = Color.FromArgb(217, 217, 217);
dashboard.Range["J18:R18"].BorderAround(ExcelLineStyle.Thin, Color.Black);
dashboard.Range["J21"].Text = "Calls answered in less than 180 Seconds:";
dashboard.Range["J21"].CellStyle.Font.Bold = true;
dashboard.Range["J21"].CellStyle.Font.Size = 14;
dashboard.Range["J21"].CellStyle.Font.FontName = "Verdana";
dashboard.Range["J21"].CellStyle.WrapText = true;
dashboard.Range["J21"].CellStyle.Font.Color = ExcelKnownColors.Black;
dashboard.Range["J21"].CellStyle.VerticalAlignment = ExcelVAlign.VAlignCenter;
dashboard.Range["P21"].Formula = "=Calculation!B11";
dashboard.Range["P21"].CellStyle.Font.Bold = true;
dashboard.Range["P21"].CellStyle.Font.Size = 28;
dashboard.Range["P21"].CellStyle.Font.FontName = "Verdana";
dashboard.Range["P21"].NumberFormat = "0.0%";
dashboard.Range["P21"].CellStyle.Font.RGBColor = Color.FromArgb(84, 130, 53);
dashboard.Range["P21"].CellStyle.VerticalAlignment = ExcelVAlign.VAlignCenter;
dashboard.Range["P21"].CellStyle.HorizontalAlignment = ExcelHAlign.HAlignLeft;
dashboard.Range["J26"].Text = "Calls with satisfaction score less than 3:";
dashboard.Range["J26"].CellStyle.Font.Bold = true;
dashboard.Range["J26"].CellStyle.Font.Size = 14;
dashboard.Range["J26"].CellStyle.Font.FontName = "Verdana";
dashboard.Range["J26"].CellStyle.WrapText = true;
dashboard.Range["J26"].CellStyle.Font.Color = ExcelKnownColors.Black;
dashboard.Range["J26"].CellStyle.VerticalAlignment = ExcelVAlign.VAlignCenter;
dashboard.Range["P26"].Formula = "=Calculation!B12";
dashboard.Range["P26"].CellStyle.Font.Bold = true;
dashboard.Range["P26"].CellStyle.Font.Size = 28;
dashboard.Range["P26"].CellStyle.Font.FontName = "Verdana";
dashboard.Range["P26"].CellStyle.Font.RGBColor = Color.FromArgb(192, 0, 0);
dashboard.Range["P26"].CellStyle.VerticalAlignment = ExcelVAlign.VAlignCenter;
dashboard.Range["P26"].CellStyle.HorizontalAlignment = ExcelHAlign.HAlignLeft;
dashboard.Range["J19:R30"].BorderAround(ExcelLineStyle.Thin, Color.Black);
#endregion
#region Bar Chart - Satisfaction Score By Agent
//Bar Chart - Chart Title
dashboard.Range["E18:H18"].Merge();
dashboard.Range["E18"].CellStyle.Font.Italic = true;
dashboard.Range["E18"].CellStyle.Font.Underline = ExcelUnderline.Single;
dashboard.Range["E18"].CellStyle.Font.Size = 12;
dashboard.Range["E18"].CellStyle.Font.RGBColor = Color.FromArgb(127, 127, 127);
dashboard.Range["E18"].CellStyle.HorizontalAlignment = ExcelHAlign.HAlignCenter;
dashboard.Range["E18"].CellStyle.VerticalAlignment = ExcelVAlign.VAlignCenter;
dashboard.Range["E18"].Text = "Satisfaction Score - By Agent";
//Bar Chart - Satisfaction Score - By Agent
IChartShape barChart = dashboard.Charts.Add();
IChartSerie barSerieOne = barChart.Series.Add();
barSerieOne.SerieType = ExcelChartType.Bar_Clustered;
barSerieOne.CategoryLabels = calculation.Range["D44:D51"];
barSerieOne.Values = calculation.Range["E44:E51"];
barChart.PrimaryValueAxis.MinimumValue = 0;
barChart.PrimaryValueAxis.MaximumValue = 5;
barChart.PrimaryValueAxis.HasMajorGridLines = false;
barChart.HasLegend = false;
barChart.ChartArea.Border.LineColor = Color.White;
barChart.Top = 1;
barChart.TopRow = 20;
barChart.LeftColumn = 5;
barChart.BottomRow = 31;
barChart.RightColumn = 9;
(barChart as IChart).Height = (barChart as IChart).Height - 10;
(barChart as IChart).Width = (barChart as IChart).Width - 10;
#endregion
#region Doughnut and Pie Chart - Overall Satisfaction Score
//Doughnut Chart - Chart Title
dashboard.Range["B18:D18"].Merge();
dashboard.Range["B18"].CellStyle.Font.Italic = true;
dashboard.Range["B18"].CellStyle.Font.Underline = ExcelUnderline.Single;
dashboard.Range["B18"].CellStyle.Font.Size = 12;
dashboard.Range["B18"].CellStyle.Font.RGBColor = Color.FromArgb(127, 127, 127);
dashboard.Range["B18"].CellStyle.HorizontalAlignment = ExcelHAlign.HAlignCenter;
dashboard.Range["B18"].CellStyle.VerticalAlignment = ExcelVAlign.VAlignCenter;
dashboard.Range["B18"].Text = "Overall Satisfaction Score";
//Doughnut Chart - Overall Satisfaction Score
IChartShape doughnutChart = dashboard.Charts.Add();
IChartSerie doughnutSerie = doughnutChart.Series.Add();
doughnutChart.ChartType = ExcelChartType.Doughnut;
doughnutSerie.Values = calculation.Range["A26:A29"];
doughnutSerie.SerieFormat.CommonSerieOptions.FirstSliceAngle = 270;
doughnutSerie.DataPoints[0].DataFormat.Fill.ForeColor = Color.FromArgb(255, 0, 0);
doughnutSerie.DataPoints[1].DataFormat.Fill.ForeColor = Color.FromArgb(255, 192, 0);
doughnutSerie.DataPoints[2].DataFormat.Fill.ForeColor = Color.FromArgb(0, 176, 80);
doughnutSerie.DataPoints[3].DataFormat.Fill.ForeColorIndex = ExcelKnownColors.White;
doughnutSerie.DataPoints[3].DataFormat.Fill.Transparency = 1.0;
doughnutChart.HasLegend = false;
doughnutChart.ChartArea.Border.LineColor = Color.White;
doughnutChart.ChartArea.Fill.Transparency = 1.0;
doughnutChart.PlotArea.Fill.Transparency = 1.0;
doughnutChart.Left = 1;
doughnutChart.TopRow = 20;
doughnutChart.LeftColumn = 2;
doughnutChart.BottomRow = 32;
doughnutChart.RightColumn = 5;
//Pie Chart - Overall Satisfaction Score
IChartShape pieChart = dashboard.Charts.Add();
IChartSerie pieSerieOne = pieChart.Series.Add();
pieSerieOne.SerieType = ExcelChartType.Pie;
pieSerieOne.Values = calculation.Range["B26:B28"];
pieSerieOne.SerieFormat.CommonSerieOptions.FirstSliceAngle = 270;
pieSerieOne.DataPoints[0].DataFormat.Fill.ForeColorIndex = ExcelKnownColors.White;
pieSerieOne.DataPoints[0].DataFormat.Fill.Transparency = 1.0;
pieSerieOne.DataPoints[1].DataFormat.Fill.ForeColorIndex = ExcelKnownColors.Black;
pieSerieOne.DataPoints[1].DataFormat.LineProperties.LineColor = Color.White;
pieSerieOne.DataPoints[1].DataFormat.LineProperties.LineWeight = ExcelChartLineWeight.Narrow;
pieSerieOne.DataPoints[2].DataFormat.Fill.ForeColorIndex = ExcelKnownColors.White;
pieSerieOne.DataPoints[2].DataFormat.Fill.Transparency = 1.0;
pieChart.HasLegend = false;
pieChart.ChartArea.Border.LineColor = Color.White;
pieChart.ChartArea.Fill.Transparency = 1.0;
pieChart.PlotArea.Fill.Transparency = 1.0;
pieChart.Top = 1;
pieChart.Left = 1;
pieChart.TopRow = 20;
pieChart.LeftColumn = 2;
pieChart.BottomRow = 33;
pieChart.RightColumn = 5;
dashboard.Range["B30:C30"].Merge();
dashboard.Range["B30"].Text = "Satisafction Score:";
dashboard.Range["B30"].HorizontalAlignment = ExcelHAlign.HAlignRight;
dashboard.Range["B30"].VerticalAlignment = ExcelVAlign.VAlignCenter;
dashboard.Range["D30"].NumberFormat = "0.00";
dashboard.Range["D30"].Formula = "=Calculation!B9";
dashboard.Range["D30"].CellStyle.Font.Size = 18;
dashboard.Range["D30"].CellStyle.Font.Bold = true;
dashboard.Range["D30"].CellStyle.Font.RGBColor = Color.FromArgb(0, 112, 192);
dashboard.Range["D30"].HorizontalAlignment = ExcelHAlign.HAlignCenter;
dashboard.Range["B18:H30"].BorderAround(ExcelLineStyle.Thin, Color.Black);
#endregion
//Disable the gridlines
dashboard.IsGridLinesVisible = false;
//Set the dashboard sheet as active sheet
dashboard.Activate();
#endregion
#region Save the Workbook
//Save the workbook to disk
workbook.Version = ExcelVersion.Excel2016;
return(excelEngine.SaveAsActionResult(workbook, "CallCenterDashboard.xlsm", ExcelSaveType.SaveAsMacro, HttpContext.ApplicationInstance.Response, ExcelDownloadType.PromptDialog, ExcelHttpContentType.Excel2016));
#endregion
}
}
//
// GET: /Sparklines/
public ActionResult Sparklines(string button)
{
string basePath = _hostingEnvironment.WebRootPath;
if (button == null)
{
return(View());
}
//Instantiate the spreadsheet creation engine.
ExcelEngine excelEngine = new ExcelEngine();
IApplication application = excelEngine.Excel;
application.DefaultVersion = ExcelVersion.Excel2016;
//A new workbook is created.[Equivalent to creating a new workbook in Microsoft Excel]
//Open workbook with Data
FileStream inputStream = new FileStream(ResolveApplicationPath("Sparkline.xlsx"), FileMode.Open, FileAccess.Read);
IWorkbook workbook = application.Workbooks.Open(inputStream);
//The first worksheet object in the worksheets collection is accessed.
IWorksheet sheet = workbook.Worksheets[0];
#region WholeSale Report
//A new Sparkline group is added to the sheet sparklinegroups
ISparklineGroup sparklineGroup = sheet.SparklineGroups.Add();
//Set the Sparkline group type as line
sparklineGroup.SparklineType = SparklineType.Line;
//Set to display the empty cell as line
sparklineGroup.DisplayEmptyCellsAs = SparklineEmptyCells.Line;
//Sparkline group style properties
sparklineGroup.ShowFirstPoint = true;
sparklineGroup.FirstPointColor = Color.Green;
sparklineGroup.ShowLastPoint = true;
sparklineGroup.LastPointColor = Color.DarkOrange;
sparklineGroup.ShowHighPoint = true;
sparklineGroup.HighPointColor = Color.DarkBlue;
sparklineGroup.ShowLowPoint = true;
sparklineGroup.LowPointColor = Color.DarkViolet;
sparklineGroup.ShowMarkers = true;
sparklineGroup.MarkersColor = Color.Black;
sparklineGroup.ShowNegativePoint = true;
sparklineGroup.NegativePointColor = Color.Red;
//set the line weight
sparklineGroup.LineWeight = 0.3;
//The sparklines are added to the sparklinegroup.
ISparklines sparklines = sparklineGroup.Add();
//Set the Sparkline Datarange .
IRange dataRange = sheet.Range["D6:G17"];
//Set the Sparkline Reference range.
IRange referenceRange = sheet.Range["H6:H17"];
//Create a sparkline with the datarange and reference range.
sparklines.Add(dataRange, referenceRange);
#endregion
#region Retail Trade
//A new Sparkline group is added to the sheet sparklinegroups
sparklineGroup = sheet.SparklineGroups.Add();
//Set the Sparkline group type as column
sparklineGroup.SparklineType = SparklineType.Column;
//Set to display the empty cell as zero
sparklineGroup.DisplayEmptyCellsAs = SparklineEmptyCells.Zero;
//Sparkline group style properties
sparklineGroup.ShowHighPoint = true;
sparklineGroup.HighPointColor = Color.Green;
sparklineGroup.ShowLowPoint = true;
sparklineGroup.LowPointColor = Color.Red;
sparklineGroup.ShowNegativePoint = true;
sparklineGroup.NegativePointColor = Color.Black;
//The sparklines are added to the sparklinegroup.
sparklines = sparklineGroup.Add();
//Set the Sparkline Datarange .
dataRange = sheet.Range["D21:G32"];
//Set the Sparkline Reference range.
referenceRange = sheet.Range["H21:H32"];
//Create a sparkline with the datarange and reference range.
sparklines.Add(dataRange, referenceRange);
#endregion
#region Manufacturing Trade
//A new Sparkline group is added to the sheet sparklinegroups
sparklineGroup = sheet.SparklineGroups.Add();
//Set the Sparkline group type as win/loss
sparklineGroup.SparklineType = SparklineType.ColumnStacked100;
sparklineGroup.DisplayEmptyCellsAs = SparklineEmptyCells.Zero;
sparklineGroup.DisplayAxis = true;
sparklineGroup.AxisColor = Color.Black;
sparklineGroup.ShowFirstPoint = true;
sparklineGroup.FirstPointColor = Color.Green;
sparklineGroup.ShowLastPoint = true;
sparklineGroup.LastPointColor = Color.Orange;
sparklineGroup.ShowNegativePoint = true;
sparklineGroup.NegativePointColor = Color.Red;
sparklines = sparklineGroup.Add();
dataRange = sheet.Range["D36:G46"];
referenceRange = sheet.Range["H36:H46"];
sparklines.Add(dataRange, referenceRange);
#endregion
try
{
MemoryStream ms = new MemoryStream();
workbook.SaveAs(ms);
ms.Position = 0;
return(File(ms, "Application/vnd.openxmlformats-officedocument.spreadsheetml.sheet", "Sparklines.xlsx"));
}
catch (Exception)
{
}
// Close the workbook
workbook.Close();
excelEngine.Dispose();
return(View());
}
/// <summary>
/// Create the Excel document with sparklines
/// </summary>
/// <returns>Return the created excel document as stream</returns>
public MemoryStream SparklinesXlsIO()
{
//New instance of XlsIO is created.[Equivalent to launching Microsoft Excel with no workbooks open].
//The instantiation process consists of two steps.
//Step 1 : Instantiate the spreadsheet creation engine
using (ExcelEngine excelEngine = new ExcelEngine())
{
//Step 2 : Instantiate the excel application object
IApplication application = excelEngine.Excel;
application.DefaultVersion = ExcelVersion.Excel2016;
//A new workbook is created.[Equivalent to creating a new workbook in Microsoft Excel]
//Open workbook with Data
FileStream inputStream = new FileStream(ResolveApplicationPath("sparkline.xlsx"), FileMode.Open, FileAccess.Read);
IWorkbook workbook = application.Workbooks.Open(inputStream);
//The first worksheet object in the worksheets collection is accessed
IWorksheet sheet = workbook.Worksheets[0];
#region WholeSale Report
//A new Sparkline group is added to the sheet sparklinegroups
ISparklineGroup sparklineGroup = sheet.SparklineGroups.Add();
//Set the Sparkline group type as line
sparklineGroup.SparklineType = SparklineType.Line;
//Set to display the empty cell as line
sparklineGroup.DisplayEmptyCellsAs = SparklineEmptyCells.Line;
//Sparkline group style properties
sparklineGroup.ShowFirstPoint = true;
sparklineGroup.FirstPointColor = Color.Green;
sparklineGroup.ShowLastPoint = true;
sparklineGroup.LastPointColor = Color.DarkOrange;
sparklineGroup.ShowHighPoint = true;
sparklineGroup.HighPointColor = Color.DarkBlue;
sparklineGroup.ShowLowPoint = true;
sparklineGroup.LowPointColor = Color.DarkViolet;
sparklineGroup.ShowMarkers = true;
sparklineGroup.MarkersColor = Color.Black;
sparklineGroup.ShowNegativePoint = true;
sparklineGroup.NegativePointColor = Color.Red;
//set the line weight
sparklineGroup.LineWeight = 0.3;
//The sparklines are added to the sparklinegroup
ISparklines sparklines = sparklineGroup.Add();
//Set the Sparkline Datarange
IRange dataRange = sheet.Range["D6:G17"];
//Set the Sparkline Reference range
IRange referenceRange = sheet.Range["H6:H17"];
//Create a sparkline with the datarange and reference range
sparklines.Add(dataRange, referenceRange);
#endregion
#region Retail Trade
//A new Sparkline group is added to the sheet sparklinegroups
sparklineGroup = sheet.SparklineGroups.Add();
//Set the Sparkline group type as column
sparklineGroup.SparklineType = SparklineType.Column;
//Set to display the empty cell as zero
sparklineGroup.DisplayEmptyCellsAs = SparklineEmptyCells.Zero;
//Sparkline group style properties
sparklineGroup.ShowHighPoint = true;
sparklineGroup.HighPointColor = Color.Green;
sparklineGroup.ShowLowPoint = true;
sparklineGroup.LowPointColor = Color.Red;
sparklineGroup.ShowNegativePoint = true;
sparklineGroup.NegativePointColor = Color.Black;
//The sparklines are added to the sparklinegroup
sparklines = sparklineGroup.Add();
//Set the Sparkline Datarange
dataRange = sheet.Range["D21:G32"];
//Set the Sparkline Reference range
referenceRange = sheet.Range["H21:H32"];
//Create a sparkline with the datarange and reference range
sparklines.Add(dataRange, referenceRange);
#endregion
#region Manufacturing Trade
//A new Sparkline group is added to the sheet sparklinegroups
sparklineGroup = sheet.SparklineGroups.Add();
//Set the Sparkline group type as win/loss
sparklineGroup.SparklineType = SparklineType.ColumnStacked100;
sparklineGroup.DisplayEmptyCellsAs = SparklineEmptyCells.Zero;
sparklineGroup.DisplayAxis = true;
sparklineGroup.AxisColor = Color.Black;
sparklineGroup.ShowFirstPoint = true;
sparklineGroup.FirstPointColor = Color.Green;
sparklineGroup.ShowLastPoint = true;
sparklineGroup.LastPointColor = Color.Orange;
sparklineGroup.ShowNegativePoint = true;
sparklineGroup.NegativePointColor = Color.Red;
sparklines = sparklineGroup.Add();
dataRange = sheet.Range["D36:G46"];
referenceRange = sheet.Range["H36:H46"];
sparklines.Add(dataRange, referenceRange);
#endregion
//Save the document as a stream and retrun the stream
using (MemoryStream stream = new MemoryStream())
{
//Save the created Excel document to MemoryStream
workbook.SaveAs(stream);
return(stream);
}
}
}
private async void btnGenerateExcel_Click(object sender, RoutedEventArgs e)
{
#region Setting output location
StorageFile storageFile;
if (!(Windows.Foundation.Metadata.ApiInformation.IsTypePresent("Windows.Phone.UI.Input.HardwareButtons")))
{
FileSavePicker savePicker = new FileSavePicker();
savePicker.SuggestedStartLocation = PickerLocationId.Desktop;
savePicker.SuggestedFileName = "ChartSample";
if (rdBtn2003.IsChecked.Value)
{
savePicker.FileTypeChoices.Add("Excel Files", new List <string>()
{
".xls"
});
}
else
{
savePicker.FileTypeChoices.Add("Excel Files", new List <string>()
{
".xlsx",
});
}
storageFile = await savePicker.PickSaveFileAsync();
}
else
{
StorageFolder local = Windows.Storage.ApplicationData.Current.LocalFolder;
if (rdBtn2003.IsChecked.Value)
{
storageFile = await local.CreateFileAsync("ChartSample.xls", CreationCollisionOption.ReplaceExisting);
}
else
{
storageFile = await local.CreateFileAsync("ChartSample.xlsx", CreationCollisionOption.ReplaceExisting);
}
}
if (storageFile == null)
{
return;
}
#endregion
#region Initializing workbook
//Instantiate excel Engine
ExcelEngine excelEngine = new ExcelEngine();
IApplication application = excelEngine.Excel;
if (rdBtn2003.IsChecked.Value)
{
application.DefaultVersion = ExcelVersion.Excel97to2003;
}
else
{
application.DefaultVersion = ExcelVersion.Excel2013;
}
IWorkbook workbook;
if (application.DefaultVersion != ExcelVersion.Excel97to2003)
{
Assembly assembly = typeof(Chart).GetTypeInfo().Assembly;
string resourcePath = "Syncfusion.SampleBrowser.UWP.XlsIO.XlsIO.Tutorials.Samples.Assets.Resources.Templates.Sparkline.xlsx";
Stream fileStream = assembly.GetManifestResourceStream(resourcePath);
workbook = await application.Workbooks.OpenAsync(fileStream);
}
else
{
workbook = application.Workbooks.Create(1);
}
IWorksheet sheet = workbook.Worksheets[0];
#endregion
//#if WINDOWS_APP
if (application.DefaultVersion != ExcelVersion.Excel97to2003)
{
#region Sparklines
#region WholeSale Report
//A new Sparkline group is added to the sheet sparklinegroups
ISparklineGroup sparklineGroup = sheet.SparklineGroups.Add();
//Set the Sparkline group type as line
sparklineGroup.SparklineType = SparklineType.Line;
//Set to display the empty cell as line
sparklineGroup.DisplayEmptyCellsAs = SparklineEmptyCells.Line;
//Sparkline group style properties
sparklineGroup.ShowFirstPoint = true;
sparklineGroup.FirstPointColor = Color.FromArgb(Colors.Green.A, Colors.Green.R, Colors.Green.G, Colors.Green.B);
sparklineGroup.ShowLastPoint = true;
sparklineGroup.LastPointColor = Color.FromArgb(Colors.Orange.A, Colors.Orange.R, Colors.Orange.G, Colors.Orange.B);
sparklineGroup.ShowHighPoint = true;
sparklineGroup.HighPointColor = Color.FromArgb(Colors.Blue.A, Colors.Blue.R, Colors.Blue.G, Colors.Blue.B);
sparklineGroup.ShowLowPoint = true;
sparklineGroup.LowPointColor = Color.FromArgb(Colors.Purple.A, Colors.Purple.R, Colors.Purple.G, Colors.Purple.B);
sparklineGroup.ShowMarkers = true;
sparklineGroup.MarkersColor = Color.FromArgb(Colors.Black.A, Colors.Black.R, Colors.Black.G, Colors.Black.B);
sparklineGroup.ShowNegativePoint = true;
sparklineGroup.NegativePointColor = Color.FromArgb(Colors.Red.A, Colors.Red.R, Colors.Red.G, Colors.Red.B);
//set the line weight
sparklineGroup.LineWeight = 0.3;
//The sparklines are added to the sparklinegroup.
ISparklines sparklines = sparklineGroup.Add();
//Set the Sparkline Datarange .
IRange dataRange = sheet.Range["D6:G17"];
//Set the Sparkline Reference range.
IRange referenceRange = sheet.Range["H6:H17"];
//Create a sparkline with the datarange and reference range.
sparklines.Add(dataRange, referenceRange);
#endregion
#region Retail Trade
//A new Sparkline group is added to the sheet sparklinegroups
sparklineGroup = sheet.SparklineGroups.Add();
//Set the Sparkline group type as column
sparklineGroup.SparklineType = SparklineType.Column;
//Set to display the empty cell as zero
sparklineGroup.DisplayEmptyCellsAs = SparklineEmptyCells.Zero;
//Sparkline group style properties
sparklineGroup.ShowHighPoint = true;
sparklineGroup.HighPointColor = Color.FromArgb(Colors.Green.A, Colors.Green.R, Colors.Green.G, Colors.Green.B);
sparklineGroup.ShowLowPoint = true;
sparklineGroup.LowPointColor = Color.FromArgb(Colors.Red.A, Colors.Red.R, Colors.Red.G, Colors.Red.B);
sparklineGroup.ShowNegativePoint = true;
sparklineGroup.NegativePointColor = Color.FromArgb(Colors.Black.A, Colors.Black.R, Colors.Black.G, Colors.Black.B);
//The sparklines are added to the sparklinegroup.
sparklines = sparklineGroup.Add();
//Set the Sparkline Datarange .
dataRange = sheet.Range["D21:G32"];
//Set the Sparkline Reference range.
referenceRange = sheet.Range["H21:H32"];
//Create a sparkline with the datarange and reference range.
sparklines.Add(dataRange, referenceRange);
#endregion
#region Manufacturing Trade
//A new Sparkline group is added to the sheet sparklinegroups
sparklineGroup = sheet.SparklineGroups.Add();
//Set the Sparkline group type as win/loss
sparklineGroup.SparklineType = SparklineType.ColumnStacked100;
sparklineGroup.DisplayEmptyCellsAs = SparklineEmptyCells.Zero;
sparklineGroup.DisplayAxis = true;
sparklineGroup.AxisColor = Color.FromArgb(Colors.Black.A, Colors.Black.R, Colors.Black.G, Colors.Black.B);
sparklineGroup.ShowFirstPoint = true;
sparklineGroup.FirstPointColor = Color.FromArgb(Colors.Green.A, Colors.Green.R, Colors.Green.G, Colors.Green.B);
sparklineGroup.ShowLastPoint = true;
sparklineGroup.LastPointColor = Color.FromArgb(Colors.Orange.A, Colors.Orange.R, Colors.Orange.G, Colors.Orange.B);
sparklineGroup.ShowNegativePoint = true;
sparklineGroup.NegativePointColor = Color.FromArgb(Colors.Red.A, Colors.Red.R, Colors.Red.G, Colors.Red.B);
sparklines = sparklineGroup.Add();
dataRange = sheet.Range["D36:G46"];
referenceRange = sheet.Range["H36:H46"];
sparklines.Add(dataRange, referenceRange);
#endregion
#endregion
}
//#endif
#region Creating chart datasource
IWorksheet chartSheet;
if (application.DefaultVersion != ExcelVersion.Excel97to2003)
{
chartSheet = workbook.Worksheets.Create("Chart Data");
}
else
{
chartSheet = workbook.Worksheets[0];
}
// Entering the Datas for the chart
chartSheet.Range["A1"].Text = "Crescent City, CA";
chartSheet.Range["A1:D1"].Merge();
chartSheet.Range["A1"].CellStyle.Font.Bold = true;
chartSheet.Range["B3"].Text = "Precipitation,in.";
chartSheet.Range["C3"].Text = "Temperature,deg.F";
chartSheet.Range["A4"].Text = "Jan";
chartSheet.Range["A5"].Text = "Feb";
chartSheet.Range["A6"].Text = "March";
chartSheet.Range["A7"].Text = "Apr";
chartSheet.Range["A8"].Text = "May";
chartSheet.Range["A9"].Text = "June";
chartSheet.Range["A10"].Text = "July";
chartSheet.Range["A11"].Text = "Aug";
chartSheet.Range["A12"].Text = "Sept";
chartSheet.Range["A13"].Text = "Oct";
chartSheet.Range["A14"].Text = "Nov";
chartSheet.Range["A15"].Text = "Dec";
chartSheet.Range["B4"].Number = 10.9;
chartSheet.Range["B5"].Number = 8.9;
chartSheet.Range["B6"].Number = 8.6;
chartSheet.Range["B7"].Number = 4.8;
chartSheet.Range["B8"].Number = 3.2;
chartSheet.Range["B9"].Number = 1.4;
chartSheet.Range["B10"].Number = 0.6;
chartSheet.Range["B11"].Number = 0.7;
chartSheet.Range["B12"].Number = 1.7;
chartSheet.Range["B13"].Number = 5.4;
chartSheet.Range["B14"].Number = 9.0;
chartSheet.Range["B15"].Number = 10.4;
chartSheet.Range["C4"].Number = 4.5;
chartSheet.Range["C5"].Number = 2.7;
chartSheet.Range["C6"].Number = 9.9;
chartSheet.Range["C7"].Number = 4.2;
chartSheet.Range["C8"].Number = 6.1;
chartSheet.Range["C9"].Number = 5.3;
chartSheet.Range["C10"].Number = 3.1;
chartSheet.Range["C11"].Number = 7;
chartSheet.Range["C12"].Number = 4.5;
chartSheet.Range["C13"].Number = 8.4;
chartSheet.Range["C14"].Number = 3.1;
chartSheet.Range["C15"].Number = 8.8;
chartSheet.UsedRange.AutofitColumns();
#endregion
//#if WINDOWS_APP
#region Column Chart
#region Creating ChartSheet with Wall implementation
// Adding a New chart to the Existing Worksheet
IChart chart = workbook.Charts.Add("Column Chart");
chart.DataRange = chartSheet.Range["A3:C15"];
chart.ChartTitle = "Crescent City, CA";
chart.IsSeriesInRows = false;
chart.PrimaryValueAxis.Title = "Precipitation,in.";
chart.PrimaryValueAxis.TitleArea.TextRotationAngle = 90;
chart.PrimaryValueAxis.MaximumValue = 14.0;
chart.PrimaryValueAxis.NumberFormat = "0.0";
chart.PrimaryCategoryAxis.Title = "Month";
IChartSerie serieOne = chart.Series[0];
//set the Chart Type
chart.ChartType = ExcelChartType.Column_Clustered_3D;
//set the Backwall fill option
chart.BackWall.Fill.FillType = ExcelFillType.Gradient;
//set the Texture Type
chart.BackWall.Fill.GradientColorType = ExcelGradientColor.TwoColor;
chart.BackWall.Fill.GradientStyle = ExcelGradientStyle.Diagonl_Down;
chart.BackWall.Fill.ForeColor = Colors.White;
chart.BackWall.Fill.BackColor = Colors.Blue;
//set the Border Linecolor
chart.BackWall.Border.LineColor = Colors.Brown;
//set the Picture Type
chart.BackWall.PictureUnit = ExcelChartPictureType.stretch;
//set the Backwall thickness
chart.BackWall.Thickness = 10;
//set the sidewall fill option
chart.SideWall.Fill.FillType = ExcelFillType.SolidColor;
//set the sidewall foreground and backcolor
chart.SideWall.Fill.BackColor = Colors.White;
chart.SideWall.Fill.ForeColor = Colors.White;
//set the side wall Border color
chart.SideWall.Border.LineColor = Colors.Red;
//set floor fill option
chart.Floor.Fill.FillType = ExcelFillType.Pattern;
//set the floor pattern Type
chart.Floor.Fill.Pattern = ExcelGradientPattern.Pat_Divot;
//Set the floor fore and Back ground color
chart.Floor.Fill.ForeColor = Colors.Blue;
chart.Floor.Fill.BackColor = Colors.White;
//set the floor thickness
chart.Floor.Thickness = 3;
//Set rotation angles
chart.Rotation = 20;
chart.Elevation = 15;
IChartSerie serieTwo = chart.Series[1];
//Show value as data labels
serieOne.DataPoints.DefaultDataPoint.DataLabels.IsValue = true;
serieTwo.DataPoints.DefaultDataPoint.DataLabels.IsValue = true;
serieTwo.Name = "Temperature,deg.F";
// Legend setting
chart.Legend.Position = ExcelLegendPosition.Right;
chart.Legend.IsVerticalLegend = false;
//Move the worksheet
chartSheet.Move(1);
#endregion
#endregion
//#endif
#region Pie Chart
IWorksheet embeddedChartSheet = workbook.Worksheets.Create("Pie Chart");
IChartShape embeddedChart = embeddedChartSheet.Charts.Add();
embeddedChartSheet.Activate();
embeddedChart.ChartTitle = "Precipitation in Months";
embeddedChart.IsSeriesInRows = false;
embeddedChart.ChartType = ExcelChartType.Pie;
embeddedChart.DataRange = chartSheet["A4:B15"];
embeddedChart.Series[0].DataPoints.DefaultDataPoint.DataLabels.IsValue = true;
embeddedChart.Series[0].DataPoints.DefaultDataPoint.DataLabels.ShowLeaderLines = true;
#endregion
#if WINDOWS_PHONE_APP
workbook.Worksheets[0].Remove();
embeddedChartSheet.Activate();
#endif
#region Saving workbook and disposing objects
await workbook.SaveAsAsync(storageFile);
workbook.Close();
excelEngine.Dispose();
#endregion
#region Save acknowledgement and launching of ouput file
MessageDialog msgDialog = new MessageDialog("Do you want to view the Document?", "File has been created successfully.");
UICommand yesCmd = new UICommand("Yes");
msgDialog.Commands.Add(yesCmd);
UICommand noCmd = new UICommand("No");
msgDialog.Commands.Add(noCmd);
IUICommand cmd = await msgDialog.ShowAsync();
if (cmd == yesCmd)
{
// Launch the saved file
bool success = await Windows.System.Launcher.LaunchFileAsync(storageFile);
}
#endregion
}
