- 帖子
- 23
- 主題
- 4
- 精華
- 0
- 積分
- 39
- 點名
- 0
- 作業系統
- Win7
- 軟體版本
- Office2007
- 閱讀權限
- 10
- 性別
- 女
- 註冊時間
- 2011-10-27
- 最後登錄
- 2021-5-13
|
本帖最後由 thps51134 於 2011-12-7 12:44 編輯
回復 2# Hsieh
Dear Hsieh大, 老實說
讓我相當困惑的其中一點就在於
我的Code是寫在下面所寫的"Test.xls"的Module中- Ｗindows("Test.xls").Activate
- Range(Cells(1, 1), Cells(4, 72)).Copy
-
- With Workbooks.Add
- With Sheets1
- Cells(1, 1).Select '也改為' Cells(1,1).value= "OH" '過, 確認過動作真的是會作用在此'
- ActiveSheet.Paste
- End With
- End With
讓在test 中Copy的資料於新開的workbook中的Sheet1中貼上
(我的目的就是要copy舊檔案中的部分資料, paste於開的檔案中)
Hsieh大的回覆也讓我驚覺我的錯誤訊息問題...
應該與語法不熟大有關係= =a
因為將
With Sheet1 改為 With .Sheets(1)後
加"."的就順利執行了!
感謝! |
|
發表於 2011-12-7 12:34
| 
發表於 2011-12-7 10:13
| 