返回列表 上一主題 發帖

[發問] 如何單獨把excel單一sheet做輸出

回復 4# atuan207
要單獨excel報表中的sheet1,所以我做了一個按鈕做單獨的另存
可否看看按鈕這段程式碼!

TOP

回復 6# atuan207
我沒有 2007 猜想是, FileFormat:=xlOpenXMLWorkbook  是存為 2007檔案的參數, 與副檔名" xls" 是2003 起衝突.
不要用FileFormat參數應可行.
  1. Private Sub CoB另存_Click()
  2.     Sheets(1).Copy   
  3.     ActiveWorkbook.SaveAs Filename:="D:\表單.xls"  
  4.     ActiveWorkbook.Close
  5. End Sub
複製代碼

TOP

        靜思自在 : 人要知福、惜福、再造福。
返回列表 上一主題