返回列表 上一主題 發帖

月底執行巨集

funnydisk

帖子
28 
主題
13 
精華
0 
積分
68 
點名
0  
作業系統
winXP 
軟體版本
office2003 
閱讀權限
20 
性別
男 
註冊時間
2012-7-4 
最後登錄
2015-9-29 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2012-9-8 23:26 | 只看該作者

月底執行巨集

請教各位前輩，假如我要在每月月底執行SK這個巨集，所以我設定31號
但是如果遇到當月是30或29，要如何修改，謝謝
If Day(Date) = 31 Then        
Application.Run "SK"
End If
收藏 分享

Hsieh

帖子
4901 
主題
44 
精華
24 
積分
4916 
點名
142  
作業系統
Windows 7 
軟體版本
Office 20xx 
閱讀權限
150 
性別
男 
來自
台北 
註冊時間
2010-4-30 
最後登錄
2026-7-16 

2025年全勤獎章2024年全勤獎章2023年全勤獎章2022虎年全勤獎章2021牛年全勤獎章2020鼠年全勤獎章2019 豬年全勤獎章2018 狗年全勤獎章2017 雞年全勤獎章2016猴年全勤獎章2015羊年全勤獎章2014馬年全勤獎章2013蛇年全勤獎章2012龍年全勤獎章論壇貢獻勳章熱心公益勳章2011兔年全勤獎章
2#
發表於 2012-9-8 23:33 | 只看該作者
回復 1# funnydisk

If Month(Date) <> Month(Date + 1) Then
學海無涯_不恥下問

TOP

        靜思自在 : 【時日莫空過】一個人在世間做了多少事，就等於壽命有多長。因此必須與時間競爭，切莫使時日空過。
返回列表 上一主題