返回列表 上一主題 發帖

想請教-在設定的日期自動執行巨集

oobird
　頭銜: 街友一族

超級版主Rank: 8Rank: 8

帖子
1572 
主題
16 
精華
2 
積分
1521 
點名
0  
作業系統
xp 
軟體版本
office 2003 
閱讀權限
150 
性別
男 
註冊時間
2010-5-1 
最後登錄
2016-1-13 

論壇貢獻勳章
1# 跳轉到 »
發表於 2010-10-18 16:09 | 顯示全部帖子
Application.OnTime "9:05:12", "marco1"

TOP

oobird
　頭銜: 街友一族

超級版主Rank: 8Rank: 8

帖子
1572 
主題
16 
精華
2 
積分
1521 
點名
0  
作業系統
xp 
軟體版本
office 2003 
閱讀權限
150 
性別
男 
註冊時間
2010-5-1 
最後登錄
2016-1-13 

論壇貢獻勳章
2#
發表於 2010-10-18 16:47 | 顯示全部帖子
Sub auto_open()
Application.OnTime "9:05:12", "marco1"
Application.OnTime "9:08:32", "marco2"
.....................................
...............................
end sub
放在module中。

TOP

oobird
　頭銜: 街友一族

超級版主Rank: 8Rank: 8

帖子
1572 
主題
16 
精華
2 
積分
1521 
點名
0  
作業系統
xp 
軟體版本
office 2003 
閱讀權限
150 
性別
男 
註冊時間
2010-5-1 
最後登錄
2016-1-13 

論壇貢獻勳章
3#
發表於 2010-10-19 13:36 | 顯示全部帖子
不怪你，要怪我。
代碼不夠人性化，它應該要自己會判斷套用的！

TOP

oobird
　頭銜: 街友一族

超級版主Rank: 8Rank: 8

帖子
1572 
主題
16 
精華
2 
積分
1521 
點名
0  
作業系統
xp 
軟體版本
office 2003 
閱讀權限
150 
性別
男 
註冊時間
2010-5-1 
最後登錄
2016-1-13 

論壇貢獻勳章
4#
發表於 2010-10-19 15:31 | 顯示全部帖子
前面加一行if data <> "某某日" then exit sub

TOP

oobird
　頭銜: 街友一族

超級版主Rank: 8Rank: 8

帖子
1572 
主題
16 
精華
2 
積分
1521 
點名
0  
作業系統
xp 
軟體版本
office 2003 
閱讀權限
150 
性別
男 
註冊時間
2010-5-1 
最後登錄
2016-1-13 

論壇貢獻勳章
5#
發表於 2010-10-19 20:35 | 顯示全部帖子
第一行：
Sub Ex()
顯示不完全。我試了完全ok。

TOP

        靜思自在 : 真正的愛心，是照顧好自己的這顆心。
返回列表 上一主題