辦公軟件學(xué)習(xí)技巧：Excel版倒計時牌_第1頁
辦公軟件學(xué)習(xí)技巧：Excel版倒計時牌_第2頁
辦公軟件學(xué)習(xí)技巧：Excel版倒計時牌_第3頁
全文預(yù)覽已結(jié)束

下載本文檔

版權(quán)說明：本文檔由用戶提供并上傳，收益歸屬內(nèi)容提供方，若內(nèi)容存在侵權(quán)，請進(jìn)行舉報或認(rèn)領(lǐng)

文檔簡介

1、 Excel版倒計時牌 在Excel中制作倒計時牌，先來看效果： 在日常工作中，常常會有一些倒計時的應(yīng)用，例如常見的距高考還有n天、距項目結(jié)束還有n天等。使用Excel中的日期函數(shù)結(jié)合按指定時間刷新的VBA代碼，即可制作出倒計時牌。 步驟1 假設(shè)假期結(jié)束日期為2021年12月27日0時，在C2單元格輸入以下公式，得到剩余的整數(shù)天數(shù)。 =INT(2021-12-27-NOW()天 步驟2 設(shè)置D2單元格自定義格式為： hh小時mm分ss秒 然后在D2單元格中輸入以下公式： =2021-12-27-NOW() 雖然NOW函數(shù)屬于易失性函數(shù)，但是假如在工作表中沒有執(zhí)行能夠引發(fā)重新計算的操作，公式結(jié)果

2、并不能自動實時刷新，因此需要添加定時刷新的VBA代碼。 步驟3 按Alt+F11組合鍵打開VBE編輯器，依次單擊【插入】【模塊】命令，在【工程資源管理器】中單擊選中剛剛插入的“模塊1”，在右側(cè)的代碼窗口中輸入以下代碼。 Sub Macro1() Application.OnTime Now + TimeValue(00:00:01),Macro1CalculateEnd SubPrivate Sub workbook_open()Macro1End Sub 代碼中的00:00:01，表示刷新時間為1秒，實際使用時可依據(jù)需要設(shè)置。例如要設(shè)置刷新時間為1分鐘，可將此部分修改為00:01:00。 步驟4 在【工程資源管理器】中單擊選中“ThisWorkbook”，在右側(cè)的代碼窗口中輸入以下代碼，然后按F5鍵，即可在單元格中實現(xiàn)倒計時效果。 Private Sub workbook_open() Call Macro1End Sub 最終將文件保存為Excel啟用宏的工作簿，即xlsm格式。 再次打開文件時，假如消失如圖 所示的平安警告，記得要點擊【啟用內(nèi)容】按鈕哦。 制作完成

溫馨提示

  • 1. 本站所有資源如無特殊說明，都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等，如果需要附件，請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙，網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽，若沒有圖紙預(yù)覽就沒有圖紙。
  • 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
  • 5. 人人文庫網(wǎng)僅提供信息存儲空間，僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理，對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯，并不能對任何下載內(nèi)容負(fù)責(zé)。
  • 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容，請與我們聯(lián)系，我們立即糾正。
  • 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

評論

0/150

提交評論