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

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
主站蜘蛛池模板: 三江| 临汾市| 绥宁县| 南昌县| 昆山市| 纳雍县| 聂荣县| 高碑店市| 顺昌县| 滦平县| 东乡族自治县| 峨山| 黑龙江省| 木里| 南乐县| 玛多县| 富顺县| 老河口市| 淳化县| 黄骅市| 玉屏| 磐石市| 阿巴嘎旗| 嘉黎县| 承德县| 瑞安市| 松桃| 赤水市| 吉林市| 武夷山市| 兴义市| 图木舒克市| 临洮县| 文化| 蕉岭县| 兴安县| 白银市| 德昌县| 博乐市| 若羌县| 西乌珠穆沁旗|