VSTO学习笔记（七）基于WPF的Excel分析、转换小程序

原文:VSTO学习笔记（七）基于WPF的Excel分析、转换小程序

近期因为工作的需要，要批量处理Excel文件，于是写了一个小程序，来提升工作效率。

小程序的功能是对Excel进行一些分析、验证，然后进行转换。

1. 概述

1. 小程序主界面如下：

首先选择一个日期和类别，从命名上对待分析的Excel文件进行过滤。点击【浏览】选择待分析的Excel文件所在的目录，

程序中会获取所有子目录。然后点击【执行分析】就会按照左边CheckBox中的选择进行分析，分析结果显示在每一行中间。【修改配置】可以对分析规则进行设置，此处还未完善，后续再改进。分析结束后点击【执行转换】可以将Exce转换为我们需要的格式和内容，去除只读、重命名、转换格式、去除保护、去除公式、显示零设置等。

1. 主要对Excel做如下几种分析：

只读分析：判断Excel的文件属性是否为只读；

命名分析：判断Excel的文件名是否符合既定规范，包含的工作表是否在有效值列表中；

格式分析：判断Excel的格式是否符合既定规范（是哪一种Excel，2003？2007？）

保护分析：判断Excel是否包含工作簿保护、工作表保护；

公式分析：判断Excel的单元格中是否包含公式；

显示零分析：判断Excel中的工作表是否设置为零值显示。

前五种都比较好理解，只有最后一种"显示零分析"需要介绍一下。

"显示零"是指什么呢？在Excel中，若单元格中包含的数值为0，则可以通过设置来决定0值是否显示，这种设置在某些情况下是有意义的。以Excel 2010为例，我们来看一下怎么设置"零值显示" ：

2.1、随便打开一个Excel 2010文件，点击【File】 -->【Options】：

2.2、在【Advanced】选项卡中，找到【Display options for this worksheet】，选中或取消【Show a zero in cells that have zero value】，点击【OK】即可：

注意这种设置是工作表级别的，即当前设置只对所选择工作表有效。为什么要单独做这种分析呢？若一个工作表中有大量的区域都包含零值，此时若设置为零值显示则会使得工作表的内容非常杂乱，影响美观；其他情况下我们设置为零值显示，这样方便程序处理，即读取或写入单元格中的数值。

1. 分析完成后会显示出分析结果，并可以【查看明细】按钮来查看具体的内容，可以精确到单元格，如XX单元格包含公式，公式是什么；XX工作表包含保护等。其中公式的分析结果会记录日志，方便查看。

1. 程序中有一个全局配置文件GolbalConfig.xml，来存储分析规则，其他的一些配置信息等：

1. 代码

   <?xml version="1.0" encoding="utf-8" ?>
   <ExcelValidate>
       <SelectedDate></SelectedDate>
       <ReportKind>
           <Report name="不限"></Report>
           <Report name="储备"></Report>
           <Report name="吨煤"></Report>
           <Report name="汇总"></Report>
       </ReportKind>
       <ReportNames>
           <ReportName IsSum="true" reg="^\d{1,2}月汇总表.xlsx?$">
               <SheetNames>
                   <SheetName name="累计库存"></SheetName>
                   <SheetName name="累计消耗"></SheetName>
                   <SheetName name="原煤1 "></SheetName>
                   <SheetName name="各业务科平均库存储备资金统计 "></SheetName>
                   <SheetName name="各业务科库存储备资金统计"></SheetName>
                   <SheetName name="累计库存资金统计报表"></SheetName>
                   <SheetName name="累计消耗资金统计报表"></SheetName>
                   <SheetName name="本月库存资金统计报表"></SheetName>
                   <SheetName name="本月消耗资金统计报表"></SheetName>
                   <SheetName name="库存储备资金完成情况统计表"></SheetName>
                   <SheetName name="各单位平均库存储备资金统计表"></SheetName>
                   <SheetName name="各单位吨煤材料费"></SheetName>
                   <SheetName name="各业务科吨煤材料费"></SheetName>
                   <SheetName name="产量进尺表"></SheetName>
                   <SheetName name="全局1表"></SheetName>
                   <SheetName name="煤业1表"></SheetName>
                   <SheetName name="全局2表"></SheetName>
                   <SheetName name="煤业2表"></SheetName>
                   <SheetName name="袁庄矿1表"></SheetName>
                   <SheetName name="朱庄矿1表"></SheetName>
                   <SheetName name="杨庄矿1表"></SheetName>
                   <SheetName name="芦岭矿1表"></SheetName>
                   <SheetName name="朱仙庄1表"></SheetName>
                   <SheetName name="童亭矿1表"></SheetName>
                   <SheetName name="桃园矿1表"></SheetName>
                   <SheetName name="祁南矿1表"></SheetName>
                   <SheetName name="许疃矿1表"></SheetName>
                   <SheetName name="涡北矿1表"></SheetName>
                   <SheetName name="孙疃矿1表"></SheetName>
                   <SheetName name="淮选厂1表"></SheetName>
                   <SheetName name="临选厂1表"></SheetName>
                   <SheetName name="铁运处1表"></SheetName>
                   <SheetName name="工程处1表"></SheetName>
                   <SheetName name="总仓库1表"></SheetName>
                   <SheetName name="岱河矿1表"></SheetName>
                   <SheetName name="朔里矿1表"></SheetName>
                   <SheetName name="石台矿1表"></SheetName>
                   <SheetName name="临涣矿1表"></SheetName>
                   <SheetName name="海孜矿1表"></SheetName>
                   <SheetName name="刘店矿1表"></SheetName>
                   <SheetName name="袁庄矿2表"></SheetName>
                   <SheetName name="朱庄矿2表"></SheetName>
                   <SheetName name="杨庄矿2表"></SheetName>
                   <SheetName name="芦岭矿2表"></SheetName>
                   <SheetName name="朱仙庄2表"></SheetName>
                   <SheetName name="童亭矿2表"></SheetName>
                   <SheetName name="桃园矿2表"></SheetName>
                   <SheetName name="祁南矿2表"></SheetName>
                   <SheetName name="许疃矿2表"></SheetName>
                   <SheetName name="涡北矿2表"></SheetName>
                   <SheetName name="孙疃矿2表"></SheetName>
                   <SheetName name="岱河矿2表"></SheetName>
                   <SheetName name="朔里矿2表"></SheetName>
                   <SheetName name="石台矿2表"></SheetName>
                   <SheetName name="临涣矿2表"></SheetName>
                   <SheetName name="海孜矿2表"></SheetName>
                   <SheetName name="刘店矿2表"></SheetName>
               </SheetNames>
           </ReportName>
           <ReportName IsSum="false" reg="^\d{2}\w{3}(储备|吨煤)报表.xlsx?$">
               <SheetNames>
                   <SheetName reg="^\d{4}.\d{2}$"></SheetName>
               </SheetNames>
           </ReportName>
       </ReportNames>
       <MineNames>
           <MineName name="岱河矿"></MineName>
           <MineName name="工程处"></MineName>
           <MineName name="海孜矿"></MineName>
           <MineName name="淮选厂"></MineName>
           <MineName name="临涣矿"></MineName>
           <MineName name="临选厂"></MineName>
           <MineName name="刘店矿"></MineName>
           <MineName name="芦岭矿"></MineName>
           <MineName name="祁南矿"></MineName>
           <MineName name="石台矿"></MineName>
           <MineName name="朔里矿"></MineName>
           <MineName name="孙疃矿"></MineName>
           <MineName name="桃园矿"></MineName>
           <MineName name="铁运处"></MineName>
           <MineName name="童亭矿"></MineName>
           <MineName name="涡北矿"></MineName>
           <MineName name="许疃矿"></MineName>
           <MineName name="杨庄矿"></MineName>
           <MineName name="袁庄矿"></MineName>
           <MineName name="朱仙庄"></MineName>
           <MineName name="朱庄矿"></MineName>
           <MineName name="总仓库"></MineName>
       </MineNames>
   </ExcelValidate>

   分析细则

1. 只读分析：用File.IsReadOnly判断即可；
2. 命名分析：基于GolbalConfig.xml中的配置进行分析，主要是正则表达式和有效值列表；
3. 格式分析：也是用正则表达式进行分析

Regex excel = new Regex(@"^.xlsx?$");

1. 保护分析：我们知道Excel中的保护功能分为两种级别，一种是工作簿保护，一种是工作表保护，这里要区分对待。

在Excel COM API 中，工作簿保护用Workbook. ProtectWindows和Workbook. ProtectStructure进行判断，这两种保护有什么区别呢？还是以Excel 2010为例，在【Preview】选项卡中点击【Protect Workbook】：

可以看到Structure默认被选中：

我们保持选中Structure不变，输入密码、确认密码后保存，看看效果：

此时可以改变工作表窗口的大小，但是不能添加、删除、重命名、复制工作表等，右键中相应选项不可用：

另一种Windows保护恰好相反。

工作表保护可以对行、列、单元格、区域等做更细粒度的控制：

1. 公式分析：用Excel COM API中的Range.HasFormula来判断；
2. 显示零分析：这个比较特殊，我在Excel COM API中没有找到编程设置的方法，无奈使用OpenXML SDK 2.0中的方法进行验证。从Office 2007开始，Word、Excel、PowerPoint全面使用OpenXML作为存储格式，微软也相应提供了OpenXML SDK，方便开发人员处理OpenXML文档，关于OpenXML SDK的介绍，请参阅我的另一篇博文：

OpenXML SDK 2.0悄然发布

OpenXML SDK是个很好的东西，但是网上资源太少，OpenXML的架构也非常复杂，看着帮助文档中数量庞大的类有些茫然，关于OpenXML SDK我研究也不多，感兴趣的朋友可以一起讨论。

首先需要下载OpenXML SDK 2.0（可以在这里下载），其中有一个工具：OpenXML SDK 2.0 Productivity Tool，功能非常强大，可以查看OpenXML 文档的架构，比较两个OpenXML 文档架构的不同，甚至可以将OpenXML 文档反编译为C#代码。

下面我们来看一下显示零的设置在OpenXML架构中是如何显示的。Excel 中默认是显示零值的，先参照2.1、2.2中的步骤设置为零值不显示，然后打开OpenXML SDK 2.0 Productivity Tool：

点击【Open File】找到刚才设置为零值不显示的Excel文件，点击【Reflector Code】：

Ctrl + F，输入：ShowZeros查找,可以看到在SheetView类的属性里：

下面用OpenXML SDK 2.0中的方法进行分析：

代码

                        using (SpreadsheetDocument mySpreadsheet = SpreadsheetDocument.Open(file.FullName, false))
                        {
                            var book = mySpreadsheet.WorkbookPart.Workbook;
                            foreach (WorksheetPart s in book.WorkbookPart.WorksheetParts)
                            {
                                foreach (SheetView view in s.Worksheet.SheetViews)
                                {
                                    if (view.ShowZeros != null)
                                    {
                                        if (!view.ShowZeros)
                                        {
                                            this.__int显示零单元格个数++;
                                            this.__dic显示零.Add(this.__int显示零单元格个数, file.FullName);
                                        }
                                    }
                                }
                            }
                        }

执行转换

分析结束后，就可以执行转换了，来达到我们需要的格式、命名等要求。转换前默认备份，防止转换错误造成数据丢失，

将待分析的Excel所在的目录整个复制到指定位置。备份目录名取当前时间的年月日时分秒。

这里我引用了Microsoft.VisualBasic.dll进行复制目录操作，否则需要写一个递归函数，C#本身未提供复制目录的方法：

取消保护时需要输入工作簿密码、工作表密码：

1. 运行效果

1. 小结

本次用一个小程序的方式对Excel常见的方面进行了分析与验证，可以避免繁琐的手工处理。程序全部使用了WPF设计，主要运用了Excel COM API来对Excel进行操作，掺杂有少量的Linq to XML。程序中大量使用了foreach循环，效率有待提高，尤其是公式判断时会比较慢，你可以根据需要自行修改代码。仅供测试，在生产环境中情谨慎使用。