返回列表 上一主題 發帖

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

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

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

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! 代碼

Sub 巨集1()
Application.OnTime Now + TimeValue("00:00:05"), "巨集1"
Sheets("工作表1").[A2] = 1
End Sub

TOP

        靜思自在 : 一個缺口的杯子,如果換一個角度看它,它仍然是圓的。
返回列表 上一主題