純 PowerPoint 打造比賽專用計時器，含動態數字、進度條、開始按鈕

前置設定

「工具」→「巨集」→「安全性」→ 將「安全等級」設為「低」，以允許 VBA 巨集執行。

一、動態倒數數字

1. 版面配置選「只有標題」，輸入標題「英語口語比賽計時系統」。
2. 插入 31 個文字方塊，內容依序為 30、29 … 1、0（第一個 30 秒對應延遲 0 秒）。
3. 全選文字方塊 → 置中對齊（水平/垂直）。
4. 逐一設定自訂動畫：
   • 效果：「進入」→「出現」。
   • 效果選項：「動畫後」→ 第 1-30 個選「下一次滑鼠單擊時隱藏」，第 31 個（0）選「不隱藏」。
   • 計時：「開始」→ 第 1 個選「單擊」，延遲 0 秒；其餘選「在上一個動畫之後」，延遲 1 秒。
5. 新增兩個修飾文字方塊：「距離結束還有」與「秒」，置於數字兩側。

二、進度條（15 格，每 2 秒顯示一格）

1. 繪製一個藍色無框線矩形 → 複製 15 個，排列成橫列。
2. 下方再加一深色矩形作背景，設為「最底層」。
3. 設定動畫順序：文字方塊 1、2 後接矩形 1，文字 3、4 後接矩形 2 … 以此類推（自訂動畫窗格中拖曳調整順序）。
4. 所有矩形：效果「出現」，「開始」→「在上一個動畫之前」，延遲 1 秒，「動畫後」→「不隱藏」。
5. 下方加上 0%、25%、50%、75%、100% 指標文字，水平分佈對齊。

三、開始按鈕（VBA 控制）

1. 「檢視」→「工具列」→「控制項工具箱」→ 選「命令按鈕」繪製。
2. 右鍵「屬性」→ Caption 改為「開始計時」。
3. 雙擊按鈕進入程式碼視窗，輸入：

Private Sub CommandButton1_Click()
    ActivePresentation.SlideShowSettings.Run
    SlideShowWindows(1).View.Next
End Sub

測試與提醒

按 F5 放映 → 點擊「開始計時」按鈕 → 倒數與進度條同步運行。播放前務必確認巨集安全性為「低」，否則無法運作。