返回列表下一主題上一主題發帖

指定時間.執行巨集

duck_simon

　暱稱: duck_simon

中學生 Rank: 2

帖子: 120
主題: 34
精華: 0
積分: 174
點名: 0
作業系統: win10
軟體版本: Office 2016
閱讀權限: 20
性別: 男
來自: 台中
註冊時間: 2010-5-4
最後登錄: 2024-11-20

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2024-11-17 11:41 | 只看該作者

指定時間.執行巨集

請教先進:
我欲將星期一至星期六..每日20:25分(依電腦時間) 執行 (複製某區塊..貼上某區塊)
請教大大這時間VBA 如何寫? 感謝指導 ! 祝週日好心情

樓主熱帖

准提部林

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2834
主題: 10
精華: 0
積分: 2890
點名: 0
作業系統: 〔略〕
軟體版本: 〔略〕
閱讀權限: 100
性別: 男
來自: 〔略〕
註冊時間: 2013-5-13
最後登錄: 2024-11-23

2^#

發表於 6 天前 11:44 | 只看該作者

那個檔案是一直保持開啟嗎???
可找找APPLICATION.ONTIME的用法

或找找"工作排程"的方法//
寫一個專門執行的VBA檔案,
排定時間自動開啟, 執行後自動關閉~~

描述太簡單, 別人無法提供正確方案~~

TOP

duck_simon

　暱稱: duck_simon

中學生 Rank: 2

帖子: 120
主題: 34
精華: 0
積分: 174
點名: 0
作業系統: win10
軟體版本: Office 2016
閱讀權限: 20
性別: 男
來自: 台中
註冊時間: 2010-5-4
最後登錄: 2024-11-20

3^#

發表於 6 天前 12:05 | 只看該作者

回復 2# 准提部林

回大大 : 執行 (複製某區塊..貼上某區塊)..此部分可以省略

TOP

lee88

中學生 Rank: 2

帖子: 13
主題: 0
精華: 0
積分: 63
點名: 0
作業系統: win10
軟體版本: office 365
閱讀權限: 20
性別: 女
註冊時間: 2022-2-1
最後登錄: 2024-11-20

4^#

發表於 5 天前 11:14 | 只看該作者

Private Sub EX()
'必須在第一次上午10點,指定的時間之前執行
Application.OnTime TimeValue("10:00:00 AM"), "工作表1.TEST"
' "工作表1.TEST" 程式在工作表模組(物件模組)中需指明 "模組名稱.程式名稱"
'程式在一般模組無需指明模組名稱,可直接寫上 "程式名稱"
End Sub

複製代碼

Sub TEST()
'寫上你要執行的程式碼
'或呼叫(執行),程式碼寫在別的程式
Application.OnTime Date + 1 + TimeValue("10:00 AM"), "工作表1.TEST1"
'下次自動於隔天同時間執行程式
'*** 如第一次指定的時間執行 TEST 也可以不要執行 EX
End Sub

複製代碼

TOP

duck_simon

　暱稱: duck_simon

中學生 Rank: 2

帖子: 120
主題: 34
精華: 0
積分: 174
點名: 0
作業系統: win10
軟體版本: Office 2016
閱讀權限: 20
性別: 男
來自: 台中
註冊時間: 2010-5-4
最後登錄: 2024-11-20

5^#

發表於 5 天前 19:34 | 只看該作者

回復 4# lee88

感謝大大指點..無任感激..謝謝:)

TOP

靜思自在 : 太陽光大、父母恩大、君子量大，小人氣大。

返回列表下一主題上一主題