ケンジー（Ｋｅｎｇｇｙ）とＩＴ: エクセルＶＢＡについて

ＶＢＡとは Visual Basic for Application の略で、マイクロソフトのオフィースに搭載されているプログラム機能のことです。エクセルの作業を自動化するために広く用いられていますが、本家のVisual Basicに比べれば見劣りするところはあります。
ＶＢＡはエクセルの１機能であり、それそのものではありません。ただ、その重要度は増してきています。
エクセル９７以前はモジュールシートを追加してプログラムを書き込んでいましたが、以後はＶＢＥ（Visual Basic Editor）という本家Visual Basic顔負けの機能が搭載されました。
もちろんエクセルだけでなく、アクセスやワードひいてはアウトルックでも使用可能です。

（簡単なジャンケンゲームのサンプル）

Sub Sample()
    Dim com As Integer
    Dim you As Integer

     com = Int(3 * Rnd)
     you = InputBox("ジャンケン、ポン！！　(ｸﾞｰ=0：ﾁｮｷ=1：ﾊﾟｰ=2）")

     If com = you Then
        MsgBox "引き分けです・・・・"
     ElseIf (com = 0) And (you = 1) Then
         MsgBox "相手はグー、あなたの負けです・・・"
     ElseIf (com = 0) And (you = 2) Then
         MsgBox "相手はグー、あなたの勝ちです・・・"
     ElseIf (com = 1) And (you = 2) Then
         MsgBox "相手はチョキ、あなたの負けです・・・"
     ElseIf (com = 1) And (you = 0) Then
         MsgBox "相手はチョキ、あなたの勝ちです・・・"
     ElseIf (com = 2) And (you = 0) Then
         MsgBox "相手はパー、あなたの負けです・・・"
     ElseIf (com = 2) And (you = 1) Then
         MsgBox "相手はパー、あなたの勝ちです・・・"
     End If

End Sub

実行すると、以下のボックスが表示されます。グーなら0、チョキなら1、パーなら2。好きな番号を入力してＯＫボタンを押します・

↓

・エクセルで作成したジャンケンゲームをダウンロードできます。

ここからダウンロードしてください！！

またGoogle Spreadsheet Scriptでも同じようなものがつくれます。

これを実行すると・・・・

エクセルのVBAと同じく、InputBoxが表示され数字の”０（ゼロ）”：グーを入力しました。

と、勝ち負けのMsgBoxが表示されます。今回は相手がチョキだったので、私が勝ちました。

function janken_pon() {

    var you = Browser.inputBox("ジャンケン、ポン　！！　　　　 (ｸﾞｰ：0 ﾁｮｷ：1 ﾊﾟｰ：2)");
    var com = Math.floor(Math.random() * 3);


    if(you == com){Browser.msgBox("引き分けです・・・・");}
　　else if((com==0) && (you==1)){
      Browser.msgBox("相手はグーで、あなたの負けです・・・・");}　
　　else if((com==0) && (you==2)){
      Browser.msgBox("相手はグーで、あなたの勝ちです・・・・");}　
　　else if((com==1) && (you==2)){
      Browser.msgBox("相手はチョキで、あなたの負けです・・・・");}　
　　else if((com==1) && (you==0)){
      Browser.msgBox("相手はチョキで、あなたの勝ちです・・・・");}　
　　else if((com==2) && (you==0)){
      Browser.msgBox("相手はパーで、あなたの負けです・・・・");}　
　　else if((com==2) && (you==1)){
      Browser.msgBox("相手はパーで、あなたの勝ちです・・・・");}　
}

Google Spreadsheetでの実行の仕方は、