不卡AV在线|网页在线观看无码高清|亚洲国产亚洲国产|国产伦精品一区二区三区免费视频

學(xué)習(xí)啦>學(xué)習(xí)電腦>工具軟件>辦公軟件學(xué)習(xí)>Excel教程>Excel基礎(chǔ)>

excel如何設(shè)置日期提醒

時(shí)間: 嘉銘873 分享

  日常使用excel表格時(shí)經(jīng)常需要對(duì)快到期的內(nèi)容進(jìn)行提醒如何在excel中設(shè)置到期日自動(dòng)提醒,下面讓學(xué)習(xí)啦小編為你帶來excel設(shè)置日期提醒的方法。

  excel設(shè)置日期提醒步驟:

  1、啟動(dòng)Excel,新建一文檔,取名保存(如“提醒.xls”)。

  2、按“Alt+F11”組合鍵進(jìn)入VBA編輯狀態(tài)

  3、在左側(cè)“工程資源管理器”窗口中,選中“VBAProject(提醒.xls)”選項(xiàng),執(zhí)行“插入模塊”命令,插入一個(gè)新模塊

  4、將下述代碼輸入到右側(cè)的編輯區(qū)域中:

  Sub auto_open()  '設(shè)置一個(gè)自動(dòng)運(yùn)行的宏——auto_open

  Application.OnTime TimeValue("08:30:00"), "tx"  '設(shè)置提醒時(shí)間——08:30:00(可以根據(jù)需要修改),設(shè)置調(diào)用提醒宏——tx。

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

  End Sub

  Sub tx()  '設(shè)置一個(gè)顯示提醒消息的宏(名稱要與上述自動(dòng)運(yùn)行宏中調(diào)用的名稱一致)。

  msg = MsgBox("通知張三、李四、王五評(píng)委參加下午評(píng)標(biāo)!", vbInformation, "趕快打電話") '設(shè)置提醒對(duì)話框中的消息和標(biāo)題(前面是消息內(nèi)容,后面是對(duì)話框標(biāo)題,請(qǐng)根據(jù)需要輸入)。

  End Sub

  注意:①上述代碼中,英文單引號(hào)及其后面的字符是對(duì)代碼的解釋,在實(shí)際輸入時(shí)可以不需要(參見圖1)。②如果設(shè)置多個(gè)提醒宏(tx1、tx2……),并在自動(dòng)運(yùn)行宏中分別設(shè)置調(diào)用的時(shí)間,可以實(shí)現(xiàn)多個(gè)消息的定時(shí)提醒。

  5、輸入完成后,退出VBA編輯狀態(tài),保存工作簿文檔。

  6、以后,一上班,就啟動(dòng)Excel,打開上述工作簿文檔。設(shè)定時(shí)間一到,系統(tǒng)即刻彈出

1389297