excel定時提醒的代碼

1. 如何在excel中用vba實現定時提醒功能

用這個宏：
Sub auto_open() '設置一個自動運行的宏--auto_open
Application.OnTime TimeValue("09:30:00"), "tx"
'設置提醒時間為09:30:00（可以根據實際需要進行修改），設置調用提醒宏
Application.OnTime TimeValue("010:00:00"), "tx" '再設置提醒一次。
End Sub
Sub tx() '設置一個顯示提醒消息的宏。
msg = MsgBox("你需要起床了", vbInformation, "趕快起來")
End Sub

2. EXCEL用VBA實現預定時間彈窗提醒

在Excel中VBA的應用很多，今天我們將利用VBA設置提醒。
1．在Excel中新建一個文檔，並將它命名為「提醒.xls」。
2．執行菜單欄中的「工具」→「宏」→「Visual Basic編輯器」命令，進入VBA編輯狀態。
3．在「工程資源管理器」窗口中，選中「VBAProject（提醒.xls）」選項，然後執行菜單欄中的「插入」→「模塊」命令，插入一個名為「模塊1」的新模塊。
4．選中「模塊1」，執行菜單欄中的「視圖」→「屬性窗口」命令，在打開的「屬性」窗口中將它更改為「提醒」。
5．在「提醒」模塊的代碼窗口中輸入如下所示的代碼：
Sub auto_open() '設置一個自動運行的宏--auto_open
Application.OnTime TimeValue("09:30:00"), "tx"
'設置提醒時間為09:30:00（可以根據實際需要進行修改），設置調用提醒宏
Application.OnTime TimeValue("010:00:00"), "tx" '再設置提醒一次。
End Sub
Sub tx() '設置一個顯示提醒消息的宏。
msg = MsgBox("訂購一張2005年1月1日北京——海南的機票！", vbInformation, "趕快訂機票")
End Sub
提示：
可以設置多個提醒宏（tx1、tx2……），只需要在自動運行宏中分別設置調用的時間，即可實現多個消息的定時提醒。
6．保存代碼，並退出VBA編輯狀態。
7．當設定的時間到來時，系統將彈出提示框進行提醒。

3. 如何設置excel到期自動提醒功能

1.如下圖，在A2單元格輸入=TODAY()，該函數自動返回當前的日期。每次打開工作簿時都會自動更新。

4. 關於EXCEL 定時提醒問題

按「Alt+F11」組合鍵進入VBA編輯狀態
在左側「工程資源管理器」窗口中，選中「VBAProject(提醒.xls)」選項，執行「插入模塊」命令，插入一個新模塊
將下述代碼輸入到右側的編輯區域中：

Sub auto_open() '設置一個自動運行的宏——auto_open

Application.OnTime TimeValue("08:30:00"), "tx" '設置提醒時間——08:30:00（可以根據需要修改），設置調用提醒宏——tx。

Application.OnTime TimeValue("09:30:00"), "tx" '再設置提醒一次。

End Sub

Sub tx() '設置一個顯示提醒消息的宏（名稱要與上述自動運行宏中調用的名稱一致）。

msg = MsgBox("這里是輸入你要彈出的提示！", vbInformation, "趕快打電話") '設置提醒對話框中的消息和標題（前面是消息內容，後面是對話框標題，請根據需要輸入）。

End Sub

注意：①上述代碼中，英文單引號及其後面的字元是對代碼的解釋，在實際輸入時可以不需要（參見圖1）。②如果設置多個提醒宏（tx1、tx2……），並在自動運行宏中分別設置調用的時間，可以實現多個消息的定時提醒。

5、輸入完成後，退出VBA編輯狀態，保存工作簿文檔。

6、以後，一上班，就啟動Excel，打開上述工作簿文檔。設定時間一到，系統即刻彈出提示框.

5. EXCEL中，用VBA進行時間提醒設置的問題

1、在Excel中新建一個文檔，並將它命名為「提醒.xls」。
2、執行菜單欄中的「工具」→「宏」→「Visual Basic編輯器」命令，進入VBA編輯狀態。

3、在「工程資源管理器」窗口中，選中「VBAProject（提醒.xls）」選項，然後執行菜單欄中的「插入」→「模塊」命令，插入一個名為「模塊1」的新模塊。

4、選中「模塊1」，執行菜單欄中的「視圖」→「屬性窗口」命令，在打開的「屬性」窗口中將它更改為「提醒」。

5、在「提醒」模塊的代碼窗口中輸入如下所示的代碼：

Sub auto_open() '設置一個自動運行的宏--auto_open

Application.OnTime TimeValue("09:30:00"), "tx"
'設置提醒時間為09:30:00（可以根據實際需要進行修改），設置調用提醒宏
Application.OnTime TimeValue("010:00:00"), "tx"'再設置提醒一次。
End Sub
Sub tx()'設置一個顯示提醒消息的宏。
msg = MsgBox("訂購一張2005年1月1日北京——海南的機票！", vbInformation, "趕快訂機票")
End Sub
提示：

可以設置多個提醒宏（tx1、tx2……），只需要在自動運行宏中分別設置調用的時間，即可實現多個消息的定時提醒。

6、保存代碼，並退出VBA編輯狀態。

7、當設定的時間到來時，系統將彈出提示框進行提醒。

6. excel表格怎麼設置到期日前自動提醒功能

Excel表格中設置到期日前自動提醒功能，需要用函數datedif來設置。
此外如果想要在手機或電腦上設置到期自動提醒，在雲便簽上設置待辦事項自定義年月日、時分的定時提醒就可以了。

7. Excel 如何實現鬧鍾功能

1、啟動Excel，新建一文檔，取名保存（如「提醒.xls」）。

2、按「Alt+F11」組合鍵進入VBA編輯狀態。

3、在左側「工程資源管理器」窗口中，選中「VBAProject(提醒.xls)」選項，執行「插入模塊」命令，插入一個新模塊。

4、將下述代碼輸入到右側的編輯區域中：

Sub auto_open() '設置一個自動運行的宏——auto_open

Application.OnTime TimeValue("08:30:00"), "tx" '設置提醒時間——08:30:00（可以根據需要修改），設置調用提醒宏——tx。

Application.OnTime TimeValue("09:30:00"), "tx" '再設置提醒一次。

End Sub

Sub tx() '設置一個顯示提醒消息的宏（名稱要與上述自動運行宏中調用的名稱一致）。

msg = MsgBox("通知張三、李四、王五評委參加下午評標！", vbInformation, "趕快打電話") '設置提醒對話框中的消息和標題（前面是消息內容，後面是對話框標題，請根據需要輸入）。

End Sub

注意：①上述代碼中，英文單引號及其後面的字元是對代碼的解釋，在實際輸入時可以不需要。②如果設置多個提醒宏（tx1、tx2……），並在自動運行宏中分別設置調用的時間，可以實現多個消息的定時提醒。

5、輸入完成後，退出VBA編輯狀態，保存工作簿文檔。

6、以後，一上班，就啟動Excel，打開上述工作簿文檔。設定時間一到，系統即刻彈出提示框。

8. 如何設置excel到期自動提醒功能

1、啟動Excel，新建一文檔，取名保存（如「提醒.xls」）。
2、按「Alt+F11」組合鍵進入VBA編輯狀態。
3、在左側「工程資源管理器」窗口中，選中「VBAProject(提醒.xls)」選項，執行「插入模塊」命令，插入一個新模塊。
4、將下述代碼輸入到右側的編輯區域中：
Sub auto_open() '設置一個自動運行的宏——auto_open
Application.OnTime TimeValue("08:30:00"), "tx" '設置提醒時間——08:30:00（可以根據需要修改），設置調用提醒宏——tx。
Application.OnTime TimeValue("09:30:00"), "tx" '再設置提醒一次。
End Sub
Sub tx() '設置一個顯示提醒消息的宏（名稱要與上述自動運行宏中調用的名稱一致）。
msg = MsgBox("通知張三、李四、王五評委參加下午評標！", vbInformation, "趕快打電話") '設置提醒對話框中的消息和標題（前面是消息內容，後面是對話框標題，請根據需要輸入）。
End Sub
注意：①上述代碼中，英文單引號及其後面的字元是對代碼的解釋，在實際輸入時可以不需要。②如果設置多個提醒宏（tx1、tx2……），並在自動運行宏中分別設置調用的時間，可以實現多個消息的定時提醒。
5、輸入完成後，退出VBA編輯狀態，保存工作簿文檔。
6、以後，一上班，就啟動Excel，打開上述工作簿文檔。設定時間一到，系統即刻彈出提示框。