返回列表 上一主題 發帖

指定時間.執行巨集

duck_simon
　暱稱: duck_simon

中學生Rank: 2

帖子
120 
主題
34 
精華
0 
積分
174 
點名
0  
作業系統
win10 
軟體版本
Office 2016 
閱讀權限
20 
性別
男 
來自
台中 
註冊時間
2010-5-4 
最後登錄
2024-11-20 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 5 天前 11:41 | 只看該作者

指定時間.執行巨集

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

准提部林

帖子
2834 
主題
10 
精華
0 
積分
2890 
點名
0  
作業系統
〔略〕 
軟體版本
〔略〕 
閱讀權限
100 
性別
男 
來自
〔略〕 
註冊時間
2013-5-13 
最後登錄
2024-11-21 
2#
發表於 3 天前 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#
發表於 3 天前 12:05 | 只看該作者
回復 2# 准提部林


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

TOP

lee88

帖子
13 
主題
0 
精華
0 
積分
63 
點名
0  
作業系統
win10 
軟體版本
office 365 
閱讀權限
20 
性別
女 
註冊時間
2022-2-1 
最後登錄
2024-11-20 
4#
發表於 前天 11:14 | 只看該作者
  1. Private Sub EX()
  2.     '必須在第一次上午10點,指定的時間之前執行
  3.     Application.OnTime TimeValue("10:00:00 AM"), "工作表1.TEST"
  4.     '  "工作表1.TEST" 程式在工作表模組(物件模組)中需指明    "模組名稱.程式名稱"
  5.     '程式在一般模組  無需指明模組名稱,可直接寫上   "程式名稱"

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

  8. 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#
發表於 前天 19:34 | 只看該作者
回復 4# lee88


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

TOP

        靜思自在 : 脾氣嘴巴不好，心地再好也不能算是好人。
返回列表 上一主題