|
一寸光陰一寸金，寸金難買寸光陰。浪費(fèi)時間就等于浪費(fèi)生命，所以時間的重要性不言而喻。我們經(jīng)常會為一些重要的日子倒計(jì)時，準(zhǔn)備著重要時刻的來臨，例如考試，紀(jì)念日等。 #excel技巧# 實(shí)例1 高考倒計(jì)時
1、如圖所示：表格內(nèi)輸入相應(yīng)文字另一單元格輸入=INT("2022-6-7"-NOW())&"天"  =INT("2022-6-7"-NOW())&"天"
2、如果要精確到秒：則如圖輸入=”2022-6-7”-now()后設(shè)定單元格樣式為Hh小時mm分ss秒；  =”2022-6-7”-now()
 設(shè)定單元格樣式
3、此時你會發(fā)現(xiàn)倒計(jì)時并不動，這需要啟用宏；ALT+F11調(diào)出VBA窗體，然后點(diǎn)插入模塊，輸入Sub Macro1()
Application.OnTime Now + TimeValue("00:00:01"),"Macro1"
Calculate
End Sub
Private Sub workbook_open()
Macro1
End Sub  在模塊1內(nèi)輸入
然后雙擊ThisWorkbook輸入： Private Sub workbook_open()
Call Macro1
End Sub 再保存，若出現(xiàn)下圖所示：  ThisWorkbook輸入，保存時選否
點(diǎn)否，另存為xlsm格式； 再次重新打開，會出現(xiàn)警示提示啟用宏，點(diǎn)啟用就可以了； 
實(shí)例2 元旦倒計(jì)時 在Excel中怎么計(jì)算精確到秒，并動態(tài)更新呢？ 
步驟： 1、原始數(shù)據(jù)信息： 
(1)單元格A2輸入“2021年元旦”，B2中輸入2021年1月1日； (2)單元格A3輸入“現(xiàn)在時間”，B3中輸入公司“=now()”； (3)設(shè)置B2、B3單元格格式：選擇B2、B3單元格，右鍵“設(shè)置單元格格式”，“數(shù)字”標(biāo)簽－“分類”框中“自定義”－“類型”框中輸入yyyy"年"m"月"d"日"hh"時"mm"分"ss"秒"，則B2、B3單元格顯示為年、月、日、時、分、秒的數(shù)值； 
(4)設(shè)計(jì)A2：B3單元格格式。 2、倒計(jì)時牌設(shè)計(jì)： 
(1)合并A5、B5單元格，輸入“2021年元旦倒計(jì)時”； (2)合并A6、A7單元格，輸入“距離2021年元旦還?！?，并按Alt+回車換行； (3)設(shè)計(jì)A5：B7格式。 3、倒計(jì)時計(jì)算： (1)天數(shù)計(jì)算：B6單元格中輸入函數(shù)“=INT(B2-B3)&"天"”； (2)時分秒計(jì)算：B7單元格中輸入函數(shù)“=TEXT((B2-B3)-INT(B2-B3),"h時m分s秒")”。 4、動態(tài)更新時間： (1)按Alt+F11調(diào)出宏編輯器，單擊“插入”－“模塊”，在彈出的代碼編輯區(qū)輸入下列代碼后，退出； 
Sub Olympic() ActiveSheet.Calculate Application.OnTime Now + TimeValue("00:00:01"), "Olympic" End Sub 5、隱藏第2、第3行原始數(shù)據(jù)。 ※函數(shù)釋義： 1、Now：返回當(dāng)前系統(tǒng)日期和時間； 2、Int：取整數(shù)； 3、Text：將數(shù)值轉(zhuǎn)化為文本格式。 ※小貼士： 用VBA編輯器實(shí)現(xiàn)動態(tài)更新，當(dāng)重新打開文件后即實(shí)時更新倒計(jì)時數(shù)據(jù)。 實(shí)例3 國慶倒計(jì)時 1，在c2單元格輸入=INT("2020-10-1"-NOW())&"天" 這個函數(shù)公式的含義：里面的"2020-10-1"-NOW()，意思就是我們指定的日期減去現(xiàn)在的時間，NOW()返回的是現(xiàn)在的時間，然后在利用INT進(jìn)行取整，最后用連接符&和天進(jìn)行連接。 2，在d2單元格輸入 ="2020-10-1"-NOW() 3，按鼠標(biāo)右鍵設(shè)置單元格格式，選擇hh"時"mm"分"ss"秒"，按確定，就可以精確到小時，分鐘，秒了。 4，現(xiàn)在是靜止的時間，那么想要設(shè)置動態(tài)顯示時間呢？可以通過設(shè)置宏來得到。下面是全部gif圖片顯示出來，大家學(xué)習(xí)一下： 按下快捷鍵ALT+F11進(jìn)入宏，在模塊中輸入如下代碼 Sub Macro1() Application.OnTime Now + TimeValue("00:00:01"),"Macro1" Calculate End Sub 在左邊"ThisWorkbook"輸入代碼 Private Sub workbook_open() Macro1 End Sub 然后按F5運(yùn)行，另存為宏格式的excel表格，這樣就可以一打開，就可以顯示 動態(tài)的倒計(jì)時時間了，現(xiàn)在你學(xué)會了嗎？
|
