如何利用EXCEL製件開口中_3 @ 飛航模式

標題:

如何利用EXCEL製件開口中

發問:

我想好像獎門人中玩開口中, 請問如何利用EXCEL製作呢..

最佳解答:

以下為一個比較間單的製作方法： 1. 先製作以下工作表 (如圖): START按鈕暫不需要圖片參考：http://imgcld.yimg.com/8/n/HA00726953/o/20130212013521.jpg 2. 輸入公式： B3 輸入 =IF(OR(E2="",F2="bingo"),"",IF(E2>D2,B2,E2+1)) C3 輸入 =IF(OR(E2="",F2="bingo"),"",IF(E2>D2,E2-1,C2)) F2 輸入 =IF(E2>0,IF(OR(E2C2),"out of range",IF(E2=D2,"bingo","guess again")),"") 3. 將公試COPY，即 B3 COPY至B4-B10 C3 COPY至C4-C10 F2 COPY至F3-F10 4. 按 VISUAL BASIC,插入模組,再輸入以下程式碼：(如圖) Sub startgame() Randomize [D2] = Round(Rnd() * ([C2] - [B2]) + 1, 0) [D2:D11] = [D2] [E2:E11] = "" [E2].Select End Sub 圖片參考：http://imgcld.yimg.com/8/n/HA00726953/o/20130212015311.jpg 圖片參考：http://imgcld.yimg.com/8/n/HA00726953/o/20130212015352.jpg 5. 返回工作表畫面，插入一個START按鈕來啟動startgame巨集圖片參考：http://imgcld.yimg.com/8/n/HA00726953/o/20130212020104.jpg 6. 將Answer (Column D) 的欄寬縮至 0，完成。本人之前用USERFORM也做過一個較精美版本，由於比較複雜，暫不提供。圖片參考：http://imgcld.yimg.com/8/n/HA00726953/o/20130212020939.jpg 2013-02-12 02:19:08 補充：修正第3步 3. 將公式COPY，即 B3 COPY至B4-B11 C3 COPY至C4-C11 F2 COPY至F3-F11