急 C#DataTable导出成Execl 总是提示object未包含"get_Range"的定义

阴错阳差 2011-04-27 10:15:34
各位高手请帮帮忙,在下面红色区域总是提示:object未包含"get_Range"的定义,导致导出数据失败
try
{
System.Data.DataTable objDtResult = new System.Data.DataTable();
objDtResult.Columns.Add("姓名");
objDtResult.Columns.Add("性别");
objDtResult.Columns.Add("年龄");
objDtResult.Columns.Add("身份证号");

objDtResult.Columns.Add("职业工种");

objDtResult.Columns.Add("工作单位");

objDtResult.Columns.Add("套餐名称");

objDtResult.Columns.Add("企业分组");

//指定数据源
string m_strSerName = string.Empty;//套餐名
string m_strGroup = string.Empty;//分组名
string m_strSex = "男,女";
string m_strEnterprise = this.m_objViewer.m_dgvEnterpriseDetail.Rows[0].Cells["entname_vchr"].Value.ToString();
for (int intI = 0; intI < this.m_objViewer.m_dgvEnterpriseDetail.Rows.Count; intI++)
{
if (intI == 0)
{
m_strSerName = this.m_objViewer.m_dgvEnterpriseDetail.Rows[intI].Cells["sername_vchr"].Value.ToString();
m_strGroup = this.m_objViewer.m_dgvEnterpriseDetail.Rows[intI].Cells["entgroupname_vchr"].Value.ToString();
}
else
{
m_strSerName += "," + this.m_objViewer.m_dgvEnterpriseDetail.Rows[intI].Cells["sername_vchr"].Value.ToString();
m_strGroup += "," + this.m_objViewer.m_dgvEnterpriseDetail.Rows[intI].Cells["entgroupname_vchr"].Value.ToString();
}
}
string saveFileName = "";
SaveFileDialog saveDialog = new SaveFileDialog();
saveDialog.DefaultExt = "xls";
saveDialog.Filter = "Excel文件|*.xls";
saveDialog.FileName = "";
saveDialog.ShowDialog();
saveFileName = saveDialog.FileName;
if (saveFileName.IndexOf(":") < 0) return; //被点了取消
Microsoft.Office.Interop.Excel.Application xlApp = new Microsoft.Office.Interop.Excel.Application();
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

//新方法
iCare.Pub.Utility.clsExcelExporter m_objExcelExporter = new Pub.Utility.clsExcelExporter();
m_objExcelExporter.m_mthExport(saveFileName);

//写入标题
for (int i = 0; i < objDtResult.Columns.Count; i++)
{
worksheet.Cells[1, i + 1] = objDtResult.Columns[i].ColumnName;//myDGV.Columns[i].HeaderText;
}
//指定格式
worksheet.get_Range(worksheet.Cells[2, 2], worksheet.Cells[1000, 2]).Validation.Add(Microsoft.Office.Interop.Excel.XlDVType.xlValidateList, Microsoft.Office.Interop.Excel.XlDVAlertStyle.xlValidAlertStop, Type.Missing, m_strSex, Type.Missing);
worksheet.get_Range(worksheet.Cells[2, 6], worksheet.Cells[1000, 6]).Validation.Add(Microsoft.Office.Interop.Excel.XlDVType.xlValidateList, Microsoft.Office.Interop.Excel.XlDVAlertStyle.xlValidAlertStop, Type.Missing, m_strEnterprise, Type.Missing);
worksheet.get_Range(worksheet.Cells[2, 7], worksheet.Cells[1000, 7]).Validation.Add(Microsoft.Office.Interop.Excel.XlDVType.xlValidateList, Microsoft.Office.Interop.Excel.XlDVAlertStyle.xlValidAlertStop, Type.Missing, m_strSerName, Type.Missing);
worksheet.get_Range(worksheet.Cells[2, 8], worksheet.Cells[1000, 8]).Validation.Add(Microsoft.Office.Interop.Excel.XlDVType.xlValidateList, Microsoft.Office.Interop.Excel.XlDVAlertStyle.xlValidAlertStop, Type.Missing, m_strGroup, Type.Missing);
worksheet.Columns.EntireColumn.AutoFit();//列宽自适应
if (saveFileName != "")
{
try
{
workbook.Saved = true;
workbook.SaveCopyAs(saveFileName);
//fileSaved = true;
}
catch (Exception ex)
{
MessageBox.Show("导出文件时出错,文件可能正被打开!\n" + ex.Message);
}

}
xlApp.Quit();
xlApp = null;
GC.Collect();//强行销毁
MessageBox.Show("操作成功", "提示", MessageBoxButtons.OK);
}
...全文
691 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
Smellyfish 2013-10-31
  • 打赏
  • 举报
回复
顶楼上,我也用worksheet.get_Range((object)worksheet.Cells[2, 2] 解决了这个问题
k35353193 2011-10-09
  • 打赏
  • 举报
回复
worksheet.get_Range((object)worksheet.Cells[2, 2]
我用这个解决了问题
51Crack 2011-04-28
  • 打赏
  • 举报
回复
worksheet.get_Range((object)worksheet.Cells[2, 2]
sheet.getrange没试,不行就行xlApp.get_range
阴错阳差 2011-04-27
  • 打赏
  • 举报
回复
[Quote=引用 1 楼 newegg2009 的回复:]
参考:
“呵呵,就应当用Range这个才对。“
http://topic.csdn.net/u/20101206/09/81a314d4-f655-41fc-9766-575668a51bb3.html
[/Quote] 我看过了,但是不知道如何用,您能不能说详细一点,
小童 2011-04-27
  • 打赏
  • 举报
回复
你的声明是Microsoft.Office.Interop.Excel.Worksheet worksheet
怎么会提示object,重新编译
  • 打赏
  • 举报
回复
参考:
“呵呵,就应当用Range这个才对。“
http://topic.csdn.net/u/20101206/09/81a314d4-f655-41fc-9766-575668a51bb3.html

110,539

社区成员

发帖
与我相关
我的任务
社区描述
.NET技术 C#
社区管理员
  • C#
  • Web++
  • by_封爱
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告

让您成为最强悍的C#开发者

试试用AI创作助手写篇文章吧