VSTO 绘制Excel图形

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;
        }
    }
}




 

  • 1
    点赞
  • 3
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
您可以使用VSTO(Visual Studio Tools for Office)来生成Excel文件。引用提到了一个名为ResxWriter的工具,它可以从Excel电子表格生成.resx文件。通过将Excel电子表格中的数据转换为.resx文件,您可以在项目中方便地使用这些数据。另外,引用提到了使用VSTO插件来自动化频繁的Excel任务的方法。您可以使用VSTO插件来编写自定义代码来生成Excel文件,并执行各种Excel操作,如打开、编辑和保存文件。因此,使用VSTO和相应的工具或插件,您可以方便地生成Excel文件。<span class="em">1</span><span class="em">2</span><span class="em">3</span> #### 引用[.reference_title] - *1* *2* [Code Project精彩系列(转)](https://blog.csdn.net/LHHfp2013/article/details/102280749)[target="_blank" data-report-click={"spm":"1018.2226.3001.9630","extra":{"utm_source":"vip_chatgpt_common_search_pc_result","utm_medium":"distribute.pc_search_result.none-task-cask-2~all~insert_cask~default-1-null.142^v93^chatsearchT3_1"}}] [.reference_item style="max-width: 50%"] - *3* [二级ms office软件_如何将MS Office 2007修补程序作为必备软件包括在安装项目中](https://blog.csdn.net/cunchi8090/article/details/107522449)[target="_blank" data-report-click={"spm":"1018.2226.3001.9630","extra":{"utm_source":"vip_chatgpt_common_search_pc_result","utm_medium":"distribute.pc_search_result.none-task-cask-2~all~insert_cask~default-1-null.142^v93^chatsearchT3_1"}}] [.reference_item style="max-width: 50%"] [ .reference_list ]
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值