VC如何删除一个excel工作表

[a78365135]

我用了worksheet.delete()好象删不了.
谁能给个例子,万分感谢!

[mr.zhoux]

        ::CoInitialize(NULL);
	CWorkbooks		xlBooks;
	CWorkbook		xlBook;
	CApplication	        m_ExcelApplication;		//excel服务对象
	CWorksheets		sheets;
	CWorksheet		sheet;
	m_AppEventListener = NULL;
   if(!m_ExcelApplication.CreateDispatch("Excel.Application",NULL))
	{
		MessageBox(NULL,"excel创建对象错误","类COperatorExcel from dll",MB_OK|MB_ICONWARNING);
		return false;
	}


	xlBooks.AttachDispatch(m_ExcelApplication.get_Workbooks(),true);
	xlBook.AttachDispatch(xlBooks.Add(_variant_t("c://1.xls")));

	//得到 worksheets
	sheets.AttachDispatch(xlBook.get_Worksheets(),true);
	sheet = sheets.get_Item(COleVariant((short)1));
	m_ExcelApplication.put_Visible(true);
	m_ExcelApplication.put_UserControl(false);

        
        ...
        int nIndex = 2; //你要删除的worksheet序号 sheet2
        sheet = sheets.get_Item(COleVariant((short)nindex));
	sheet.Delete();

代码是摘抄的 ,已测试通过 不懂短信我~:)

[rainy824]

楼上是对的，验证通过。
以前我老用DELETE不成功，原来关键是 m_ExcelApplication.put_Visible(true);这句代码……
但怎么做才不需要弹出确认删除的对话框呢？

[rainy824]

m_ExcelApplication.put_DisplayAlerts(false);
sheet .Delete();
m_ExcelApplication.put_DisplayAlerts(true);

找到了，以上方法可以实现不确认直接删除。
自己MARK下……