- 帖子
- 60
- 主題
- 26
- 精華
- 0
- 積分
- 93
- 點名
- 0
- 作業系統
- Windows
- 軟體版本
- Windows 7
- 閱讀權限
- 20
- 註冊時間
- 2014-9-8
- 最後登錄
- 2020-4-15
|
強制關閉複製的EXCEL
大大您好 我想請問一下 當我複製EXCEL中的資料 卻無法關閉 這有甚麼方法可以強制關閉EXCEL嗎
感謝協助
Dim Path As String
Path = ThisWorkbook.Path
Workbooks.Open Path & "\" & Range("B1")
Workbooks("aabtxt").Activate
Workbooks("aabtxt").Sheets(1).Range("A1").Select
Workbooks("aabtxt").Sheets(1).Range(Selection, ActiveCell.SpecialCells(xlLastCell)).Copy
Windows("測試用2.xlsx").Activate
Worksheets(2).Range("A1").PasteSpecial
'Workbooks("aabtxt").SaveChanges:= False
Workbooks("aabtxt").Close SaveChanges:=False |
-
-
6.png
(21.87 KB)
附件1
|
發表於 2014-11-22 22:30
| 
