返回列表 上一主題 發帖

[發問] 請問~延遲作業 不行直接在活頁簿上處理

7777

帖子
125 
主題
33 
精華
0 
積分
223 
點名
0  
作業系統
XP 
軟體版本
Excel 2003 
閱讀權限
20 
性別
男 
來自
台北市 
註冊時間
2010-9-6 
最後登錄
2024-6-8 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2019-2-13 11:27 | 只看該作者

[發問] 請問~延遲作業 不行直接在活頁簿上處理

請問~延遲作業 不行直接在活頁簿上處理

Sub 巨集1()
Application.OnTime Now + TimeValue("00:00:05"), Sheets("工作表1").[A2] = 1 '延遲作業 不行直接這樣 (在 活頁簿上處理)
End Sub

' 必須 要 這樣 巨集1 + 巨集2  作業   請問~有別的方式處理嗎??  感謝

Sub 巨集1()
Application.OnTime Now + TimeValue("00:00:05"), "巨集2"
End Sub

Sub 巨集2()
Sheets("工作表1").[A2] = 1
End Sub


請問~有別的方式處理嗎??  感謝
收藏 分享
50 字節以內
不支持自定義 Discuz! 代碼

准提部林

帖子
2834 
主題
10 
精華
0 
積分
2890 
點名
0  
作業系統
〔略〕 
軟體版本
〔略〕 
閱讀權限
100 
性別
男 
來自
〔略〕 
註冊時間
2013-5-13 
最後登錄
2024-11-22 
2#
發表於 2019-2-13 14:28 | 只看該作者
Sub 巨集1()
Application.OnTime Now + TimeValue("00:00:05"), "巨集1"
Sheets("工作表1").[A2] = 1
End Sub

TOP

        靜思自在 : 【時間無法遮擋】怕時間消逝，花了許多心血，想盡各式方法要遮擋時間，結果是：浪費了更多時間，且一無所成！
返回列表 上一主題