EXCEL怎么制作計(jì)時(shí)器?
在搞活動(dòng)的時(shí)候,我們會用到一些計(jì)時(shí)器,有時(shí)需要顯示在投影上。大家都會選擇在網(wǎng)上下載各種計(jì)時(shí)小軟件,有免費(fèi)的、有破解的、還有收費(fèi)的,很是麻煩!其實(shí),我們用手頭上的EXCEL表格就可以制作比較簡單的計(jì)時(shí)器,稍微美化一下,還可以做出“手表”的感覺。

1、先制作一個(gè)基礎(chǔ)的表格,用以制作后期的時(shí)鐘:
繪制一個(gè)表格,如圖所示,A列表示時(shí)鐘轉(zhuǎn)一圈60分鐘,每分鐘的刻度(0到59);B列表示12個(gè)小時(shí)的刻度(每5行一個(gè)數(shù)值);C\D\E分別代表時(shí)\分\秒。
表格內(nèi)數(shù)據(jù),大家照做就行,不多解釋。

2、生成“時(shí)鐘”圖形:
1)選擇B、C、D、E單元格數(shù)據(jù),插入——帶數(shù)據(jù)標(biāo)記的雷達(dá)圖;
2)刪除自動(dòng)生成的雷達(dá)圖多余的元素:標(biāo)簽、坐標(biāo)軸、網(wǎng)格、圖列等;
3)添加小時(shí)刻度的數(shù)據(jù)標(biāo)簽(自己往上填寫1到12就可以了);


3、下面進(jìn)入關(guān)鍵性步驟,編制VBA代碼:
1)<ALT+F11>啟動(dòng)編輯器,插入——模塊
2)輸入以下代碼:
- Sub onClock()
- Dim h,m,s
- h=Hour(Now)
- m=Minute(Now)
- s=Second(Now)
- DoEvents
- Range("C2:E62").ClearContents
- Cells(s+2,5)=9:Cells(s+3,5)=0
- If s=59 Then Cells(2,5)=0
- Cells(m+2,4)=8:Cells(m+3,4)=0
- If m=59 Then Cells(2,4)=0
- If h>=12 Then h=h-12
- h=h*5+Int(m/12)
- Cells(h+2,3)=6:Cells(h+3,3)=0
- If h=59 Then Cells(2,3)=0
- Application.OnTime Now+TimeValue("00:00:01"),"onClock"
- End Sub
- Sub offClock()
- On Error Resume Next
- Application.OnTime Now+TimeValue("00:00:01"),"onClock",,False
- End Sub
3)保存、關(guān)閉,別忘了!??!


4、添加控制按鈕:
1)菜單欄選擇“開發(fā)工具”,插入窗體控件,在表中繪制兩個(gè)矩形按鈕;
2)將兩個(gè)按鈕分別指定宏為“onClock”——命名為“開始計(jì)時(shí)”,“offClock”——停止計(jì)時(shí)。


5、實(shí)現(xiàn)計(jì)時(shí)功能,美化時(shí)鐘:
點(diǎn)擊開始按鈕,則會發(fā)現(xiàn)時(shí)鐘開始走起來,點(diǎn)擊停止則會暫停計(jì)時(shí)。
剩下的,就是大家發(fā)揮創(chuàng)意,盡可能地美化一下這個(gè)時(shí)鐘就好了。

注意事項(xiàng):表格制作一定按照圖片所示。
相關(guān)文章

陽歷/農(nóng)歷轉(zhuǎn)換對照表怎么做? Excel制作日歷表/萬年歷的最終版
想要制作陽歷/農(nóng)歷轉(zhuǎn)換對照表,,通過這個(gè)對照表,你只需知道陽歷日期,就可以快速準(zhǔn)確的找到對應(yīng)的農(nóng)歷日期,下面我們就來看看詳細(xì)制作方法2025-04-10
三分鐘就搞定! Excel快速制作一個(gè)日歷表/萬年歷的技巧
工作上需要制作一個(gè)日歷表/萬年歷,該怎么制作呢?我們需要使用三個(gè)excel函數(shù)來實(shí)現(xiàn),詳細(xì)請看下文介紹2025-04-10
這個(gè)函數(shù)公式簡直太強(qiáng)了! excel按權(quán)重求和計(jì)算的技巧
Excel中有一個(gè)功能非常強(qiáng)大的函數(shù),它就是SUMPRODUCT函數(shù),既能求和、計(jì)數(shù)、權(quán)重計(jì)算,還能排名等,今天我們就來看看Excel根據(jù)權(quán)重求和的技巧2025-04-10
tocol函數(shù)哪個(gè)版本能用? excel中tocol函數(shù)的兩種高級用法
TOCOL函數(shù)公式非常強(qiáng)大,值得一學(xué),從字面意義可以理解出來,它是將數(shù)據(jù)轉(zhuǎn)換成一列的,今天分享TOCOL函數(shù)的2種高級用法2025-04-10
Excel隱藏行和折疊行有什么不同? 隱藏行和折疊使用方法和區(qū)別介紹
excel表格進(jìn)行操作的時(shí)候,發(fā)現(xiàn)有隱藏和和折疊行,看上去效果一樣,都隱藏了,但是兩者是有很大區(qū)別的,詳細(xì)請看下文介紹2025-03-21
Excel工齡計(jì)算不再愁! Excel隱藏函數(shù)DATEDIF輕松計(jì)算精確到天級的工齡
在日常工作中,我們經(jīng)常需要計(jì)算員工的工齡,以便進(jìn)行人事管理、薪資調(diào)整等工作,本文將詳細(xì)介紹如何在Excel表格中計(jì)算工齡,并提供多種實(shí)用方法供您選擇2025-03-13
快速提高工作效率! Excel高手的8個(gè)技巧勸你學(xué)學(xué)
Excel數(shù)據(jù)處理遇到的問題,99%都是由于奇葩的數(shù)據(jù)格式造成的,今天跟大家整理了幾個(gè)Excel表格構(gòu)建的規(guī)則,先不要問為什么,照著做就對了2025-03-06
Excel透視表1月到12月不能排序怎么辦? 數(shù)據(jù)透視表日期無法排序解決方法
如圖對數(shù)據(jù)透視表日期進(jìn)行升序排序后,仍不是我們想要的結(jié)果,有可能月份是文本,不能排列,下面我們就來看看詳細(xì)解決辦法2025-03-06
財(cái)務(wù)審計(jì)必會! 2分鐘搞定用excel做賬齡劃分的技巧
首先咱們得明確一下賬齡的概念,簡單來說,賬齡就是某個(gè)賬戶的余額從產(chǎn)生到現(xiàn)在的時(shí)間長度,比如,一年以內(nèi)的賬齡就是那些在過去一年內(nèi)產(chǎn)生的債權(quán)或債務(wù),下面我們就來看看2025-03-06
實(shí)現(xiàn)辦公自動(dòng)化! DeepSeek搭配Excel制作自定義按鈕的技巧
DeepSeek生成想要的代碼很方便,如果將生成的代碼放到excel中作為vba代碼使用,豈不是能實(shí)現(xiàn)辦公自動(dòng)化?下面我們就來看看實(shí)現(xiàn)方法2025-03-05


