註冊
登錄
首頁
論壇版規
禁止列表
說明
地圖
數位書香
私人消息 (0)
公共消息 (0)
論壇任務 (0)
系統消息 (0)
好友消息 (0)
帖子消息 (0)
麻辣家族討論版版
»
Excel程式區
» 複製工作表時, 如何可以不複製工作表背後附著的巨集
返回列表
下一主題
上一主題
發帖
[發問]
複製工作表時, 如何可以不複製工作表背後附著的巨集
enoch
發短消息
加為好友
enoch
當前離線
UID
3500
帖子
176
主題
98
精華
0
積分
279
金錢
279
點名
0
作業系統
window 7
軟體版本
office 2007
閱讀權限
20
性別
男
在線時間
137 小時
註冊時間
2011-2-17
最後登錄
2020-4-8
中學生
帖子
176
主題
98
精華
0
積分
279
點名
0
作業系統
window 7
軟體版本
office 2007
閱讀權限
20
性別
男
註冊時間
2011-2-17
最後登錄
2020-4-8
1
#
跳轉到
»
正序看帖
打印
字體大小:
t
T
發表於 2014-3-6 12:27
|
只看該作者
[發問]
複製工作表時, 如何可以不複製工作表背後附著的巨集
當使用
巨集
複製
工作表時,
如何
可以不複製工作表背後附著的巨集如
Private Sub Worksheet_Change(ByVal Target As Range)
或將巨集刪除
請指教
樓主熱帖
樞紐分析表如何不顯示(空白)
EXCEL 發出聲音
文字格式轉回數字格式
檢查檔案是否存在
不同工作表可否雙面列印
另存新檔問題
合併列印日期格式問題
請問如何將工作表分另儲存成不同檔案
如何判斷檔案是否已經開啟
開啟檔案設定日期格式
收藏
分享
huijuang
發短消息
加為好友
huijuang
當前離線
UID
16605
帖子
49
主題
3
精華
0
積分
74
金錢
74
點名
0
作業系統
windows
軟體版本
XP
閱讀權限
20
性別
男
來自
雲林
在線時間
32 小時
註冊時間
2014-2-13
最後登錄
2020-9-18
中學生
帖子
49
主題
3
精華
0
積分
74
點名
0
作業系統
windows
軟體版本
XP
閱讀權限
20
性別
男
來自
雲林
註冊時間
2014-2-13
最後登錄
2020-9-18
4
#
發表於 2014-3-7 15:19
|
只看該作者
不好意思我沒注意到是Worksheet
那如果改成以下程式
應該可以
Sub test()
Sheets("sheet1").Select '選擇要複製的工作表
Cells.Copy '複製工作表
Workbooks.Add '新增一個excel檔
ActiveSheet.Paste '貼上複製
ActiveWorkbook.Save '存檔
End Sub
動念成因積因成果 by huijuang
TOP
enoch
發短消息
加為好友
enoch
當前離線
UID
3500
帖子
176
主題
98
精華
0
積分
279
金錢
279
點名
0
作業系統
window 7
軟體版本
office 2007
閱讀權限
20
性別
男
在線時間
137 小時
註冊時間
2011-2-17
最後登錄
2020-4-8
中學生
帖子
176
主題
98
精華
0
積分
279
點名
0
作業系統
window 7
軟體版本
office 2007
閱讀權限
20
性別
男
註冊時間
2011-2-17
最後登錄
2020-4-8
3
#
發表於 2014-3-7 14:34
|
只看該作者
用這方法會將附著sheet1 的巨集都會複製到新檔案
Private Sub Worksheet_Change(ByVal Target As Range)
TOP
huijuang
發短消息
加為好友
huijuang
當前離線
UID
16605
帖子
49
主題
3
精華
0
積分
74
金錢
74
點名
0
作業系統
windows
軟體版本
XP
閱讀權限
20
性別
男
來自
雲林
在線時間
32 小時
註冊時間
2014-2-13
最後登錄
2020-9-18
中學生
帖子
49
主題
3
精華
0
積分
74
點名
0
作業系統
windows
軟體版本
XP
閱讀權限
20
性別
男
來自
雲林
註冊時間
2014-2-13
最後登錄
2020-9-18
2
#
發表於 2014-3-6 15:17
|
只看該作者
我的做法是複製工作表,如下
Sub test()
Sheets("sheet1").Select '選擇要複製的工作表
Sheets("sheet1").Copy '複製工作表
ActiveWorkbook.Save '存檔
End Sub
動念成因積因成果 by huijuang
TOP
靜思自在 :
【行善要及時】行善要及時,功德要持續。如燒開水一般,未燒開之前千萬不要停熄火候,否則重來就太費事了。
返回列表
下一主題
上一主題
EXCEL專屬討論區
Excelㄧ般區
Excel程式區
進階應用專區
OFFICE 系列
Word
PowerPoint
Access
Office不分區
程式語言
VB 與 VB.Net
C 與 C#
Java 與 J#
程式設計不分區
資料庫
ORACLE
My SQL
MS SQL
網頁設計
ASP 與 ASP.NET
PHP
PHP+MySQL 入門實作
JavaScript
FLASH / ActionScript
HTM/ HTML/ CSS
網頁設計不分區
電腦與作業系統
電腦各種硬體討論
一般電腦軟體討論
論壇事務
管理公告
投訴反映
新手測試
愛 ‧ 生活
公益佈告欄
生活與感動
[收藏此主題]
[關注此主題的新回復]
[通過 QQ、MSN 分享給朋友]
申請友情鏈接
Facebook粉絲