利用PowerPoint制作抽獎(jiǎng)幻燈片的方法

1、在PowerPoint 2007中，單擊【Office按鈕】，在隨即打開的下拉菜單中，單擊【PowerPoint選項(xiàng)】按鈕，打開“PowerPoint選項(xiàng)”對話框。

2、在“PowerPoint首選使用選項(xiàng)”選項(xiàng)區(qū)域中，選中“在功能區(qū)顯示‘開發(fā)工具’選項(xiàng)卡”復(fù)選框，單擊【確定】按鈕，如圖2所示。

圖2 在功能區(qū)顯 “開發(fā)工具”選項(xiàng)卡

3、在“開發(fā)工具”選項(xiàng)卡的“控件”選項(xiàng)組中，先后單擊【標(biāo)簽(ActiveX控件)】按鈕和【命令按鈕(ActiveX控件)】按鈕，在幻燈片中添加一個(gè)標(biāo)簽控件和一個(gè)命令按鈕控件，適當(dāng)調(diào)整控件屬性，并編輯按鈕的名稱，設(shè)置完成后如圖3所示。

圖3 向幻燈片中添加標(biāo)簽和命令按鈕

4、雙擊幻燈片中的添加的命令按鈕，打開VB編輯器窗口，輸入如下代碼，如圖4所示。

Private Sub CommandButton1_Click()

Label1.Caption = 1 + Int(99 * Rnd())

End Sub

圖4 輸入VBA代碼產(chǎn)生1~100之間的一個(gè)隨機(jī)整數(shù)

5、單擊【Office按鈕】，執(zhí)行下拉菜單中的【另存為】命令，打開“另存為”對話框，在“保存類型”設(shè)置為“啟用宏的PowerPoint演示文稿”，然后單擊【保存】按鈕，將其保存為后綴為“pptm”格式的文件即可。