要将事业部导出excel的时候合并,就得动态的去判断事业部下的内容,遇到相同的则合并,不相同 的不合并。不能动态写死(文中加粗处)。
private void ExportExcels(string fileName, Mes.ControlsEx.DataGridViewEx myDGV)
{
string saveFileName = "";
SaveFileDialog saveDialog = new SaveFileDialog();
saveDialog.DefaultExt = "xls";
saveDialog.Filter = "Excel文件|*.xls";
saveDialog.FileName = fileName;
saveDialog.ShowDialog();
saveFileName = saveDialog.FileName;
if (saveFileName.IndexOf(":") < 0) return; //被点了取消
Microsoft.Office.Interop.Excel.Application xlApp = new Microsoft.Office.Interop.Excel.Application();
//禁止弹出对话框 (合并单元格时会提示仅保留左上角的数据)
xlApp.DisplayAlerts = false
;
if (xlApp == null)
{
MessageBox.Show("无法创建Excel对象,可能您的主机未安装Excel");
return;
}
Microsoft.Office.Interop.Excel.Workbooks workbooks = xlApp.Workbooks;
Microsoft.Office.Interop.Excel.Workbook workbook = workbooks.Add(Microsoft.Office.Interop.Excel.XlWBATemplate.xlWBATWorksheet);
Microsoft.Office.Interop.Excel.Worksheet worksheet = (Microsoft.Office.Interop.Excel.Worksheet)workbook.Worksheets[1];//取得sheet1
int colIndex = 0;
//写入标题
for (int i = 0; i < myDGV.ColumnCount; i++)
{
//仅显示可见的列
if (myDGV.Columns[i].Visible)
{
colIndex++;
worksheet.Cells[1, colIndex] = myDGV.Columns[i].HeaderText;
}
}
//写入数值
for (int r = 0; r < myDGV.Rows.Count; r++)
{
colIndex = 0;
for (int i = 0; i < myDGV.ColumnCount; i++)
{
if (myDGV.Columns[i].Visible)
{
colIndex++;
//从第2行开始写数据
worksheet.Cells[r + 2, colIndex] = myDGV.Rows[r].Cells[i].Value;
}
}
System.Windows.Forms.Application.DoEvents();
}
//合并单元格
int startIdx = -1;
int endIdx = -1;
string cellValue = string.Empty;
for (int i = 0; i < myDGV.Rows.Count; i++)
{
//如果是第一行 或者 当前行内容不等于上一行
if (i == 0 || !StrUtil.ValueToString(myDGV.Rows[i].Cells[Column1.Index].Value).Equals(StrUtil.ValueToString(myDGV.Rows[i - 1].Cells[Column1.Index].Value)))
{
startIdx = i;
cellValue = StrUtil.ValueToString(myDGV.Rows[i].Cells[Column1.Index].Value);
}
//如果是最后一行 或者 当前行与上一行的内容一样 并且 当前行与下一行的内容不一样
if (i == myDGV.Rows.Count - 1 || (StrUtil.ValueToString(myDGV.Rows[i].Cells[Column1.Index].Value).Equals(cellValue) && !StrUtil.ValueToString(myDGV.Rows[i].Cells[Column1.Index].Value).Equals(StrUtil.ValueToString(myDGV.Rows[i + 1].Cells[Column1.Index].Value))))
{
endIdx = i;
MergeHeader(worksheet, "A" + (startIdx + 2), "A" + (endIdx + 2));
}
}
worksheet.Columns.EntireColumn.AutoFit();//列宽自适应
if (saveFileName != "")
{
try
{
workbook.Saved = true;
workbook.SaveCopyAs(saveFileName);
}
catch (Exception ex)
{
MessageBox.Show("导出文件时出错,文件可能正被打开!\n" + ex.Message);
}
}
xlApp.Quit();
GC.Collect();//强行销毁
MessageBox.Show("文件: " + fileName + " 保存成功", "信息提示", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
public void MergeHeader(Worksheet worksheet, string startcell, string endcell)
{
Microsoft.Office.Interop.Excel.Range range = worksheet.get_Range(startcell, endcell);
range.Merge(0);
range.HorizontalAlignment = XlVAlign.xlVAlignCenter;
///字体大小
// range.Font.Size = 18;
///字体
// range.Font.Name = "黑体";
///行高
range.RowHeight = 20;
//自动调整列宽
range.EntireColumn.AutoFit();
//填充颜色
range.Interior.ColorIndex = 20;
//设置单元格边框的粗细
range.Cells.Borders.LineStyle = 1;
}
这样合并是没问题的,能实现:
但是再保存的时候会提示如下内容,原因是本来的单元格中有内容,会弹出提示让你确定是否合并,每合并一个就有一个提示框,这样的用户体验太差了,所以就在网上查资料如何去掉这个对话框。
//禁止弹出对话框 (合并单元格时会提示仅保留左上角的数据)
xlApp.DisplayAlerts = false
;
这句代码就可实现不弹出提示对话框的效果。