要 想 預 覽 ， 必 須 注 意 兩 個 問 題 ， 一 個 是 Excel窗 口 是 可 見 的 ， 二 是 當 前 工 作 表 上 必 須 有 內 容 可 以 用 來 打 印 ， 空 的 工 作 表 是 不 行 的 。 下 面 這 段 代 碼 可 以 實 現 預 覽 功 能 ： 
     Set oleExcel = CreateObject("Excel.Application") 
     Set oleWorkbook = oleExcel.Workbooks.Add 
     Set oleWorkSheet = oleWorkbook.Sheets.Add 
     oleExcel.Visible = True 
     oleExcel.ActiveCell.FormulaR1C1 = "Text" 
     oleWorkSheet.PrintPreview 
<END>