VC里面操作EXCEL 怎样设置单元格的边框,如果有些单元格只设置上边框,或者设置下边框,怎么设置!?
COleVariant vtOptional((long)DISP_E_PARAMNOTFOUND,VT_ERROR),
vtTrue((short)TRUE),
vtFalse((short)FALSE);
_Application* ExcelApp = new _Application;
ExcelApp->CreateDispatch("excel.application");
//设置为显示
ExcelApp->SetVisible(TRUE);
//得到WorkBooks
Workbooks ExcelBooks = ExcelApp->GetWorkbooks();
Sheets ExcelSheets = ExcelBooks.Add(vtOptional);
_Workbook workBook;
_Worksheet workSheet;
Range range;
workBook.AttachDispatch(ExcelApp->GetApplication());
ExcelSheets=workBook.GetSheets();
workSheet = ExcelSheets.GetItem(COleVariant((short)1));
workSheet.Activate();
Range myallrange=workSheet.GetRange(COleVariant("A1"),COleVariant("D1"));
//myallrange.BorderAround(COleVariant((short)1),(long)2,(long)1,vtOptional);
myallrange.SetHorizontalAlignment(COleVariant((short)3));//居中
myallrange.Merge(COleVariant((short)1));//合并单元格
myallrange.SetValue(COleVariant("个人信息表"));
VC里面操作EXCEL 怎样设置单元格的边框
最新推荐文章于 2022-05-25 20:27:34 发布