Re: [問題] 終止處理程序中的Excel.exe
※ 引述《hyc325 (SONY VAIO-FE25TP)》之銘言:
: 我所使用的新增sheet方式是以下方法:
: 宣告省略......
: sheet=sheets.GetItem(COleVariant((short)(3)));
: sheet.Activate();
: COleVariant vBefore,vAfter,vCount,vType;
: //Default
: vBefore.vt=VT_ERROR;
: vBefore.scode=DISP_E_PARAMNOTFOUND;
: //Insert next to active sheet
: vAfter.vt=VT_DISPATCH;
: vAfter.pdispVal=book.GetActiveSheet();
: //Insert 1 sheet
: vCount.vt=VT_I2;
: vCount.iVal=1;
: //Insert a Worksheet object
: vType.vt=VT_I2;
: vType.iVal=-4167; // xlWorksheet
: sheets.Add(vBefore,vAfter,vCount,vType);
我截取出我包出來的 class CExcel 一段
private:
_Application objApp;
Workbooks objBooks;
_Workbook objBook;
Worksheets objSheets;
_Worksheet objSheet;
//=====================================================================================
// 插入第 nIndex 個 Sheet
//=====================================================================================
BOOL CExcel::InsertSheet(long nIndex, CString SheetName)
{
if(nIndex <=0 || nIndex > objSheets.GetCount()) return FALSE;
objSheet = objSheets.GetItem(COleVariant(nIndex));
objSheet.Activate();
objSheets.Add(VOptional,VOptional,VOptional,VOptional);
objSheet = objSheets.GetItem(COleVariant(nIndex));
objSheet.SetName(SheetName);
return TRUE;
}
--
YouLoveMe() ? LetItBe() : LetMeFree();
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 180.177.76.142
→
12/09 00:19, , 1F
12/09 00:19, 1F
→
12/09 00:20, , 2F
12/09 00:20, 2F
推
12/09 01:03, , 3F
12/09 01:03, 3F
→
12/09 01:04, , 4F
12/09 01:04, 4F
→
12/09 01:30, , 5F
12/09 01:30, 5F
討論串 (同標題文章)
本文引述了以下文章的的內容:
完整討論串 (本文為第 4 之 5 篇):
C_and_CPP 近期熱門文章
PTT數位生活區 即時熱門文章