CApplication ExcelApp;
CWorkbooks books;
CWorkbook book;
CWorksheets sheets;
CWorksheet sheet;
CRange range;
CPageSetup pageup;
LPDISPATCH lpDisp = NULL;
LPDISPATCH lpDisp1 = NULL;
//创建Excel 服务器(启动Excel)
if(!ExcelApp.CreateDispatch(_T("Excel.Application"),NULL))
{
AfxMessageBox(_T("启动Excel服务器失败!"));
return ;
}
ExcelApp.put_Visible(TRUE);
ExcelApp.put_UserControl(FALSE);
/*得到工作簿容器*/
books.AttachDispatch(ExcelApp.get_Workbooks());
CString strBookPath = _T("E:\\测试表.xls");
try
{
/*打开一个工作簿*/
lpDisp = books.Open(strBookPath,
vtMissing, vtMissing, vtMissing, vtMissing, vtMissing,
vtMissing, vtMissing, vtMissing, vtMissing, vtMissing,
vtMissing, vtMissing, vtMissing, vtMissing);
book.AttachDispatch(lpDisp);
}
catch(...){}
/*得到工作簿中的Sheet的容器*/
sheets.AttachDispatch(book.get_Sheets());
CString strSheetName;
strSheetName = _T("表1");
lpDisp = sheets.get_Item(_variant_t((long)7));
sheet.AttachDispatch(lpDisp);
pageup = sheet.get_PageSetup();
pageup.put_LeftHeader(_T("&9\n&20\n&\"宋体,常规\"&9 这里写要写的话"));//<span style="font-family: Arial, Helvetica, sans-serif;">pageup有操作页眉页脚的其他函数 可以添加文字图片等 自行尝试</span>
sheet.ReleaseDispatch();
sheets.ReleaseDispatch();
book.ReleaseDispatch();
books.ReleaseDispatch();
ExcelApp.Quit();
ExcelApp.ReleaseDispatch();
VC 操作Excel sheet页眉操作
最新推荐文章于 2023-06-27 15:36:50 发布