Posted to microsoft.public.excel.programming
|
|
About _Workbook::SaveAs in Excel 2007
I have written some code in VC++
Can't help you with that
But maybe this page is useful for you
http://www.rondebruin.nl/saveas.htm
--
Regards Ron de Bruin
http://www.rondebruin.nl
"Priyanka" wrote in message ...
HI everybody..........
This is regarding the Excel API _Workbook::SaveAs.......
I have written some code in VC++ to save any excel sheet at a particular
place of my choice using my ExcelAddin.
It works fine with office 2000/2003.
Here it is,
VARIANT vt_Format;
VariantInit(&vt_Format);
vt_Format.vt = VT_I4;
vt_Format.lVal = GetFormat(nFormat);
VARIANT vt_Optional;
vt_Optional.vt = VT_ERROR;
vt_Optional.scode = DISP_E_PARAMNOTFOUND;
_bstr_t bstrFilePath(strFilePath.operator LPCTSTR());
VARIANT vt_FilePath;
VariantInit(&vt_FilePath);
vt_FilePath.vt = VT_BSTR;
vt_FilePath.bstrVal = bstrFilePath;
try
{
CExcelDMSConnect::m_bFirstSave = TRUE;
hr = pBook-SaveAs(vt_FilePath,
t, -----------------------------XYZ
vt_Optional, vt_Optional, vt_Optional,
vt_Optional, xlNoChange, vt_Optional,
vt_Optional, vt_Optional, vt_Optional, 0);
CExcelDMSConnect::m_bFirstSave = FALSE;
if(FAILED(hr))
{
AfxMessageBox(IDS_ERR_SAVEAS_DOC);
return;
}
}
catch(_com_error e)
{
_bstr_t description=e.Description();
_bstr_t errmsg=e.ErrorMessage();
CString strDes=OLE2T(description);
CString strErrMsg=OLE2T(errmsg);
}
When i execute the line labelled
"......................................XYZ", the _com_error exception is
thrown by office API.
When i look at Desription of the exception, it shows a null string and the
Errormessage is "Unknown Error".
I am using mso9.dll
I don't know what is wrong with it and why this API fails...........
Has the API for this purpose been changed??????????
Any help would be appreciable.
Thanks and Regards,
Priyanka
|