成人午夜激情影院,小视频免费在线观看,国产精品夜夜嗨,欧美日韩精品一区二区在线播放

Excel也能設置定時提醒

2010-08-28 10:45:15來源:西部e網作者:

    小余在交易中心工作,經常要打電話通知相應的評委參加工程評標工作,有時工作一忙,就忘記通知而影響正常開標。
   
    由于他每天都用Excel為登記相應的數據,于是,我就用Excel為他設置了一個定時提醒的功能。文章末尾提供原文件供大家下載參考。

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

    2、按“Alt+F11”組合鍵進入VBA編輯狀態(如圖1)。

\

(圖片較大,請拉動滾動條觀看)

    3、在左側“工程資源管理器”窗口中,選中“VBAProject(提醒.xls)”選項,執行“插入模塊”命令,插入一個新模塊(模塊1,參見圖1)。

  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

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

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

  6、以后,一上班,就啟動Excel,打開上述工作簿文檔。設定時間一到,系統即刻彈出如圖2所示的提示框,這下不會忘記了吧。原文件下載

\

 

 

 

關鍵詞:Excel
主站蜘蛛池模板: 霍邱县| 赫章县| 维西| 福鼎市| 岱山县| 溆浦县| 马鞍山市| 六枝特区| 公安县| 侯马市| 临漳县| 石首市| 房产| 鹰潭市| 德阳市| 安国市| 灵石县| 凤台县| 龙州县| 桐乡市| 木里| 桐城市| 东光县| 孝昌县| 湟源县| 曲水县| 武夷山市| 舞钢市| 龙江县| 平乐县| 衢州市| 荃湾区| 铜梁县| 库尔勒市| 彭泽县| 布拖县| 高尔夫| 桦甸市| 大悟县| 大洼县| 宕昌县|