C#实现导出Word图表通用方法之散点图

            writer.WritePropertyName("t:chart1_ex");
            writer.WriteStartArray();
            writer.WriteStartObject();
            writer.WritePropertyName("NumberFormat");
            writer.WriteValue("#,##0");
            writer.WriteEndObject();
            writer.WriteEndArray();

StringWriter sw = new StringWriter();
        using (Newtonsoft.Json.JsonWriter writer = new Newtonsoft.Json.JsonTextWriter(sw))
        {
            writer.Formatting = Newtonsoft.Json.Formatting.Indented;
            writer.WriteStartObject();

            //t:chart1
            writer.WritePropertyName("t:chart1");
            writer.WriteStartArray();
            //point1
            writer.WriteStartObject();
            writer.WritePropertyName("y");
            writer.WriteValue((int)y);
            writer.WritePropertyName("x");
            writer.WriteValue((int)x);
            writer.WriteEndObject();

            writer.WriteStartObject();
            writer.WriteEndArray();

            writer.WritePropertyName("t:chart1_ex");
            writer.WriteStartArray();
            writer.WriteStartObject();
            writer.WritePropertyName("NumberFormat");
            writer.WriteValue("#,##0");
            writer.WriteEndObject();
            writer.WriteEndArray();

            //t:chart1



            writer.WriteEndObject();
            writer.Flush();
        }
        sw.Close();
        string jsonContent = sw.GetStringBuilder().ToString();

////一些引用
using Word=Microsoft.Office.Interop.Word;
using Newtonsoft.Json.Linq;


////转换 json 字符串为 json 对象

Newtonsoft.Json.Linq.JObject jObject = null;
            if (jsonContent != "")
            {
                try
                {
                    jObject = Newtonsoft.Json.Linq.JObject.Parse(jsonContent); //转换为json对象
                }
                catch (Exception e)
                {
                    resultReport += "create json object  fail.<br>";  //失败记入调试报告
                }
            }

////初始化 Word 应用程序

			Word.Application WordApp=new Word.Application();
            
			//创建一个名为WordDoc的文档对象
			WordApp.DisplayAlerts=Word.WdAlertLevel.wdAlertsNone;  //禁止一切提示警告
            //打开 filename 的文件
			Word.Document WordDoc=WordApp.Documents.Open(ref filename,ref Nothing,ref Nothing,ref Nothing,ref Nothing,ref Nothing,ref Nothing,ref Nothing,ref Nothing,ref Nothing,ref Nothing,ref Nothing,ref Nothing,ref Nothing,ref Nothing,ref Nothing);
            //禁用拼写检查
            WordDoc.SpellingChecked = false;
            WordDoc.ShowSpellingErrors = false;



////遍历word 里的 shapes

for (int i = 1; i <= WordDoc.InlineShapes.Count; i++)
{
  Word.InlineShape shape = WordDoc.InlineShapes[i];  //得到 shape对象
   //遍历 json 对象
  foreach (var item in jObject)
  {
    string tcmd = item.Key.ToString();   //取关键字
    //如果 shape 包含图表，则继续
    if (shape.HasChart == Microsoft.Office.Core.MsoTriState.msoTrue)
    {
        //如果图表未设置标题，则短路
        if (shape.Chart.HasTitle == false)
        {
            continue;
        }
        //获取图表的title
        string _name = shape.Chart.ChartTitle.Text.Trim().ToLower();
        if (_name.IndexOf(tcmd) != -1) //如果包含关键字则继续
        {
            //替换掉关键字，保留下来的是真正的标题
           shape.Chart.ChartTitle.Text = shape.Chart.ChartTitle.Text.Replace(tcmd, "");

            //这是一个玄机，否则会报错，目前我是这样的解决，A1:Z100，先赋值为空串
           shape.Chart.ChartData.Workbook.Worksheets[1].Range("A1:Z100").Value = "";
            //计算最后的单元格地址
           string lastcellAddress = "$" + ((char)(64 + jObject[tcmd][0].Count())).ToString() + "$" + jObject[tcmd].Count().ToString();
           //获得最终地址字串 
           string sourceDataAddress = "='Sheet1'!$A$1:" + lastcellAddress;

           //计算附加配置，设置单元格数字格式字串
           string numberFormat = "#,##0.0";
           if (jObject[_name + "_ex"] != null)
           {
                if (jObject[_name + "_ex"][0]["NumberFormat"] != null)
                {
                  numberFormat = jObject[_name + "_ex"][0]["NumberFormat"].ToString();
                }
           }


           //遍历json对象节点里的数组
           for (int i = 0; i < jObject[tcmd].Count(); i++)
           {
                List<JToken> tokens = jObject[tcmd][i].ToList();
                int k = 0;
                foreach (JToken jToken in tokens)
                {
                  //为每一个单元格赋值

                  string celladdress = ((char)(65 + k)).ToString() + (i + 1).ToString();  
//设置单元格数字格式                             
shape.Chart.ChartData.Workbook.Worksheets[1].Range(celladdress).NumberFormat = numberFormat;
shape.Chart.ChartData.Workbook.Worksheets[1].Range(celladdress).Value = jToken.ToArray()[0].ToString();
                  k++;
                }
           }
           shape.Chart.SetSourceData(sourceDataAddress);  //设置更新图表的数据源
           break;
         } // index of name
      } // has chart

   }//foreach tcmd


} //WordDoc.InlineShapes