EXCEL是常用的辦公軟件，它有內置的VBA編程語言，利用它可以製作一款能計時的 “電子錶” 。
製作步驟
第一步，獲取系統日期與時間。
先在A1單元格中輸入一個公式 =now() ，用於調取系統的日期和時間。
第二步，設置單元格格式
然後選中A1單元格，按“格式－單元格”，在出現的“數字”選項卡中，選左邊“自定義”，再在右邊“類型”框中輸入下面格式：
yyyy-mm-dd hh:mm:ss
這樣做是為了顯示的數字美觀。你也可以在此步中，設置其他樣式的格式。
第三步，插入文本框。
為了給電子錶做一個面板，需要插入一個文本框。選按“視圖－工具”，調出“繪圖”工具欄，在其中選中“文本框”，然後用鼠標在屏幕上畫一個大小適合的文本框。
選中這個畫好的文本框，在上面的編輯欄中輸入公式 =A1 ，使它能顯示A1單元格中的內容。再設置一下“居中”顯示，以便讓數字顯示在文本框的中間。
第四步，設置文本框格式
用鼠標點擊文本框的邊框（注意，不要點文本框中間），右鍵，選“設置文本框格式”，然後按下圖設置。
第五步，加入自動計時代碼。
這樣做好後，電子錶的模樣就出來了，但時間是靜止的，不能自動更新。這就需要加入一個VBA宏，使時間每秒鐘更新一次。
按ALT+F11調出VBA窗口，插入一個模塊，把下面兩段代碼複製進去。
Dim n
Sub 計時()
Application.Calculate '重算工作表
n = Now + TimeValue("00:00:01") '設定時間間隔為一秒
Application.OnTime n, "計時" '到指定時間後再執行本過程
End Sub
Sub 停止()
On Error Resume Next
Application.OnTime n, "計時", , False
End Sub
第六步，添加按鈕。
在電子錶的下面插入兩個“藝術字”做的按鈕，一個為“計時”，一個為“停止”。
用鼠標右健選中“計時”按鈕，指定一個宏，在出現的宏對話框中選“計時”宏，確定。
用鼠標右健選中“停止”按鈕，指定一個宏，在出現的宏對話框中選“停止”宏，確定。
現在就可以使用了，按一下“計時”按鈕，電子錶開始工作，按“停止”按鈕，電子錶停止計時。
這個計時宏還可加工一下，用在其他方面，比如讓表格的顏色每隔一段時間自動改變、自動修改單元格內容等等，有興趣的朋友可以試一下。
注意事項
注意：如果按“計時”後，電子錶不工作，需要按“工具－宏－安全性”，把安全級別設置為“中”，然後重新打開“電子錶”工作簿，會提示是否啟用宏，因為這個文件中的宏是自己添加的，是安全的，可選擇“啟用宏”。
只要工作簿中包含宏，打開時就會提示是否啟用宏，如果是不熟悉的文件，或從網上下載的文件，無法確定是否安全，請選擇“禁用宏”。