请问如何调用 Excel 里的打印预览？ 或显示 Excel 程序.(20分)

eclApp:=CreateOleObject('Excel.Application');
WorkBook:=CreateOleobject('Excel.Sheet');
workBook:=eclApp.workBooks.Add;
eclApp.Cells(1,1) := '测试写入';
eclApp.ActiveWindow.SelectedSheets.PrintPreview; //预览
...
------------------------------------------------------------------
问题是 没有显示? why?
另: 如何将宏代码写入到 Excel 之后,调用刚创建的宏?
Thank you very much.

eclApp.Visible := True;
eclApp.WorkBooks.Open( 'C:/Excel/Demo.xls' );
eclApp.ActiveSheet.PrintPreview;

接受答案了.