- 帖子
- 107
- 主題
- 8
- 精華
- 0
- 積分
- 127
- 點名
- 0
- 作業系統
- Windows XP
- 軟體版本
- Office 2003
- 閱讀權限
- 20
- 性別
- 男
- 註冊時間
- 2011-8-29
- 最後登錄
- 2025-1-28
|
日前學了用下面的方法, 原來有更簡單的語法, 長知識了~~~
'Set MyBook = ThisWorkbook
' Application.Workbooks.Add
' Set NewBook = ActiveWorkbook
' MyBook.Sheets(Ex).Copy Before:=NewBook.Sheets(1)
' Application.DisplayAlerts = False
' NewBook.SaveAs Filename:=fname3
' NewBook.Close SaveChanges:=False |
|
發表於 2011-8-29 09:42
| 