在Excel中将连续多列相同数据项合并.doc

在Excel中将连续多列相同数据项合并效果图如下：代码如下： /**////?summary????????///?合并工作表中指定行数和列数数据相同的单元格????????///?/summary????????///?param?name=sheetIndex工作表索引/param????????///?param?name=beginRowIndex开始行索引/param????????///?param?name=beginColumnIndex开始列索引/param????????///?param?name=rowCount要合并的行数/param????????///?param?name=columnCount要合并的列数/param????????public?void?MergeWorkSheet(int?sheetIndex,int?beginRowIndex,int?beginColumnIndex,int?rowCount,int?columnCount)????????{????????????//检查参数????????????if?(?columnCount??1?||?rowCount??1)????????????????return?;????????????for(int?col=0;colcolumnCount;col++)????????????{????????????????int?mark?=?0;????????????//标记比较数据中第一条记录位置????????????????int?mergeCount?=?1;????????//相同记录数，即要合并的行数????????????????string?text?=?;????????????????????????????????for(int?row=0;rowrowCount;row++)????????????????{????????????????????string?prvName?=?;????????????????????string?nextName?=?;????????????????????//最后一行不用比较????????????????????if(?row?+?1??rowCount)????????????????????????????{????????????????????????for(int?n=0;n=col;n++)????????????????????????{????????????????????????????range?=?(Excel.Range)workSheet.Cells[row?+?beginRowIndex,n?+?beginColumnIndex];????????????????????????????range?=?(Excel.Range)range.MergeArea.get_Item(1,1);????????????????????????????text?=?range.Text.ToString();????????????????????????????prvName?=?prvName?+?text;????????????????????????????range?=?(Excel.Range)workSheet.Cells[row?+?1?+?beginRowIndex,n?+?beginColumnIndex];????????????????????????????range?=?(Excel.Range)range.MergeArea.get_Item(1,1);????????????????????????????nextName?=?nextName?+?range.Text.ToString();????????????????????????}????????????????????????????????????????????????????if(prvName?==?nextName)????????????????????????{????????????????????????????mergeCount++;????????????????????????????if(row?==?rowCount?-?2)????????????????????????????{????????????????????????????????this.MergeCells(sheetIndex,begin