环境:Vs2015 office 2013
1. 找到类视图,右击类名,添加 - > 类 - > MFC - > TypeLib 中的 MFC 类 - > 添加
2. 然后出现
3. 在下拉列表框选择 excel 在接口栏找到对应的类,分别添加
4. 这6个类,然后生成的6个类的头文件的这句话都注释掉
#import "C:\\Program Files (x86)\\Microsoft Office\\OFFICE12\\EXCEL.EXE" no_namespace
5. 然后编译,此时会编译失败,那我们双击错误信息,找到dialogbox 注释掉就好了。
VARIANT DialogBox()
{
VARIANT result;
InvokeHelper(0xf5, DISPATCH_METHOD, VT_VARIANT, (void*)&result, NULL);
return result;
}
6. 主函数添加如下:
void ClistToExcelDlg::OnBnClickedButton1()
{
// TODO: 在此添加控件通知处理程序代码
CFileDialog FileDialog(FALSE, L"xls", NULL, OFN_HIDEREADONLY | OFN_OVERWRITEPROMPT, _T("Microsoft Excel 2013(*.xls)|*.xls|所有文件(*.*)"), this);
if (FileDialog.DoModal() != IDOK)
{
return;
}
CString cStrFile = FileDialog.GetPathName(); //选择保存路径名称
if (::PathFileExists(cStrFile))
DeleteFile(cStrFile);
//CString cStrFile = _T("E:\\myexcel.xls");