调用EXCEL的问题。请各位高人帮个小忙。

[humourHM]

我通过以下方式调用EXCEL的一个模板（该模板中有好几个工作薄（如班级课程表，教师课程表……）），并向里面写数据，然后显示出打印预览的效果。可是每次打印预览的都是某一个工作薄。请问如何设置当前打印预览的工作薄？
_Application ExcelApp;
Workbooks wbsMyBooks;
_Workbook wbMyBook;
Worksheets wssMysheets;
_Worksheet wsMysheet;
Range rgMyRge;
//创建Excel 2000服务器(启动Excel)

if (!ExcelApp.CreateDispatch("Excel.Application",NULL))
{
AfxMessageBox("创建Excel服务失败!");
exit(1);
}
//利用模板文件建立新文档
wbsMyBooks.AttachDispatch(ExcelApp.GetWorkbooks(),true);
wbMyBook.AttachDispatch(wbsMyBooks.Add(_variant_t("d:\\课表模版.xlt")));
//得到Worksheets
wssMysheets.AttachDispatch(wbMyBook.GetWorksheets(),true);
//得到sheet1
wsMysheet.AttachDispatch(wssMysheets.GetItem(_variant_t("班级课程表")),true);
//得到全部Cells，此时,rgMyRge是cells的集合
rgMyRge.AttachDispatch(wsMysheet.GetCells(),true);
//设置1行1列的单元的值
rgMyRge.SetItem(_variant_t((long)3),_variant_t((long)1),_variant_t("班级XXX"));
//得到所有的列
rgMyRge.AttachDispatch(wsMysheet.GetColumns(),true);
//得到第一列
rgMyRge.AttachDispatch(rgMyRge.GetItem(_variant_t((long)1),vtMissing).pdispVal,true);
//设置列宽
rgMyRge.SetColumnWidth(_variant_t((long)15));
//打印预览
wbMyBook.SetSaved(true);
ExcelApp.SetVisible(true);
wbMyBook.PrintPreview(_variant_t(false));
//释放对象
rgMyRge.ReleaseDispatch();
wsMysheet.ReleaseDispatch();
wssMysheets.ReleaseDispatch();
wbMyBook.ReleaseDispatch();
wbsMyBooks.ReleaseDispatch();
ExcelApp.ReleaseDispatch();

[humourHM]

UP。
为什么，这样一个小问题，大家都不肯帮忙呢？

[humourHM]

顶一下，这个问题，应该很简单吧（也许一个函数就能搞定吧）。希望大家能帮小弟一个忙啊。

[zxphf]

好，帮忙顶一下

[xtjqu]

没仔细研究过怎么在VC里调用EXCEL,不过对于EXCEL来说,预览是针对activeworkbook的activesheet的,在VBA里,做workbook(n).worksheet(n).activate就可以,你找一下有没有对应的语句