VBA 增加固定時間

vba 增加固定時間

tkoper963 2021-08-08 22:26:46 ‧ 643 瀏覽

Private Sub CommandButton1_Click()
Range("B12:BQ459").Select
Selection.ClearContents
Range("A6").Select
End Sub

想請問大大，我想在這清除裡面再加入每日固11:00時間做自動清除，該如何寫呢!

slime iT邦大師 1 級 ‧ 2021-08-09 01:49:17 檢舉

主要功能:
1. 有一個 Sub 來自動清除 .
2. 這個 Sub 用 Application.Ontime 11:00 , "自己" , , True 重複呼叫自己執行.

直播研討會

{{ item.channelVendor }} {{ item.webinarstarted }} |

直播中

Neish

iT邦研究生 1 級 ‧ 2021-08-09 09:22:47

最佳解答

下方這個例子是9:00執行clear_sub

Private Sub Workbook_Open()

    '特定時間執行clear_sub
    Application.OnTime TimeValue("09:00:00"), "clear_sub"

End Sub

clear_sub內容

Sub clear_sub()

    Range("B12:BQ459").Select
    Selection.ClearContents
    Range("A6").Select
    
End Sub

blanksoul12

iT邦研究生 5 級 ‧ 2021-08-10 11:49:00

不建議在 excel 入面做,因為你要長開這個 excel file. 最好做法是把這個放在 open 內,打開便自動運行,另外在 windows 排程做定時開啓這個檔案便可.又或做個 windows 排程自己給自己 send e-mail, 在 outlook 內做打開該 file 的動作便可

立即登入回答