VSTO Excel rendering graphics

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using Microsoft.Office.Tools.Ribbon;
using Microsoft.Office.Interop.Excel;

namespace ExcelAddIn1
{
    public partial class Ribbon1
    {
        private void Ribbon1_Load(object sender, RibbonUIEventArgs e)
        {

        }

        private void button1_Click(object sender, RibbonControlEventArgs e)
        {
            Worksheet currentSheet = Globals.ThisAddIn.Application.ActiveSheet;

            var activeApp = Globals.ThisAddIn.Application;

            int sRowCount = currentSheet.UsedRange.Rows.Count;
            Range serialNumbers = currentSheet.Range["A2:A" + sRowCount];
            Range dataCells = currentSheet.Range["B2:B" + sRowCount];

            //Put the datacells into array
            object[,] originalData;
            originalData = dataCells.Value2;

            int elementCount = 0;
            double[] originalDataArr = new double[sRowCount - 1];
            string[] serialNumberArr = new string[sRowCount - 1];

            foreach (object element in originalData)
            {
                originalDataArr[elementCount] = Convert.ToDouble(element.ToString());
                elementCount++;
            }
            elementCount = 0;
            foreach (object element in serialNumbers)
            {
                serialNumberArr[elementCount] = Convert.ToString(element.ToString());
                elementCount++;
            }

            double standardDev = (double)activeApp.WorksheetFunction.StDevP(dataCells.Cells);
            double averageA = originalDataArr.Average();
            double threeStd = 3 * standardDev;

            //Put average and stddev into worksheet
            string[] columnTitles = new[] { "Mean", "StdDev", "35tDev" };
            string[] columnResults = new[] { averageA.ToString(), standardDev.ToString(), threeStd.ToString() };

            for (int n = 0; n < columnTitles.Length; n++)
            {
                Range titleRange = currentSheet.Range["D" + (n + 3)];
                titleRange.Value = columnTitles[n];
                Range valueRange = currentSheet.Range["E" + (n + 3)];
                valueRange.Value = columnResults[n];
            }
            Range borderStats = currentSheet.Range["D3:E" + (columnTitles.Length + 2)];

            borderStats.BorderAround2(XlLineStyle.xlDouble, XlBorderWeight.xlMedium, XlColorIndex.xlColorIndexNone, XlThemeColor.xlThemeColorLight2);

            //******************************************************
            //add chart
            Shape myChart = (Shape)currentSheet.Shapes.AddChart(XlChartType.xlLineMarkers, 275, 50, 400, 300);

            myChart.Chart.SetSourceData(dataCells, Type.Missing);

            var seriesOrig = (Series)myChart.Chart.SeriesCollection(1);
            seriesOrig.XValues = serialNumbers;
            seriesOrig.Name = "bogus number";

            //change Title
            myChart.Chart.HasTitle = true;
            myChart.Chart.ChartTitle.Text = "Bogus cHART";

            double diffMaxmin = originalDataArr.Max() - originalDataArr.Min();
            Axis yAxis = (Axis)myChart.Chart.Axes(XlAxisType.xlValue, XlAxisGroup.xlPrimary);

            yAxis.MinimumScale = originalDataArr.Min() - (.05 * diffMaxmin);

            //Avergae
            double[] meanArr = Enumerable.Repeat(averageA, sRowCount - 1).ToArray();
            var extraSeries = (SeriesCollection)myChart.Chart.SeriesCollection();
            var xbarSeries = extraSeries.NewSeries();
            var threePosStd = extraSeries.NewSeries();

            xbarSeries.MarkerStyle = XlMarkerStyle.xlMarkerStyleNone;
            xbarSeries.Name = "average";
            xbarSeries.Format.Line.Weight = 2.5F;
            xbarSeries.Values = meanArr;
        }
    }
}




 

Guess you like

Origin blog.csdn.net/time_forgotten/article/details/89322130