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

　　1、 先制作一個基礎的表格，用以制作后期的時鐘：

　　繪制一個表格，A列表示時鐘轉一圈60分鐘，每分鐘的刻度(0到59);B列表示12個小時的刻度(每5行一個數值);C\D\E分別代表時\分\秒。

　　表格內數據，大家照做就行，不多解釋。

　　2、 生成“時鐘”圖形：

　　1)選擇B、C、D、E單元格數據，插入——帶數據標記的雷達圖;

　　2)刪除自動生成的雷達圖多余的元素：標簽、坐標軸、網格、圖列等;

　　3)添加小時刻度的數據標簽(自己往上填寫1到12就可以了);

　　3、 下面進入關鍵性步驟，編制VBA代碼：

　　1)啟動編輯器，插入——模塊

　　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)保存、關閉，別忘了!!!

　　4、 添加控制按鈕：

　　1)菜單欄選擇“開發工具”，插入窗體控件，在表中繪制兩個矩形按鈕;

　　2)將兩個按鈕分別指定宏為“onClock”——命名為“開始計時”，“offClock”——停止計時。

　　5、 實現計時功能，美化時鐘：

　　點擊開始按鈕，則會發現時鐘開始走起來，點擊停止則會暫停計時。

　　剩下的，就是大家發揮創意，盡可能地美化一下這個時鐘就好了。

　　注意事項： 表格制作一定按照圖片所示。

總結

以上是生活随笔為你收集整理的EXCEL怎么制作计时器？的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。