Visual Basic for Application

VBAの基礎
(Visual Basic for Application)
国立教育政策研究所
坂谷内勝
１．ＥｘｃｅｌＶＢＡの起動（１）（２）
Excel2007のとき
※Excel2003以前のバージョ
ンは（７）のスライドから。
（１）Excel2007 を起動する。
（２）左上のボタン（Officeボタ
ン）をクリックする。
Office
ボタン
１．ＥｘｃｅｌＶＢＡの起動（３）
（３）「Excelのオプ
ション」をクリックす
る。
１．ＥｘｃｅｌＶＢＡの起動（４）
（４）「開発」の
先頭をマウ
スでチェック
を付ける。
１．ＥｘｃｅｌＶＢＡの起動（５）
（５）右下の「OK」
をクリックする。
１．ＥｘｃｅｌＶＢＡの起動（６）
（６）「開発」タブが表示されるので、マウ
スでクリックする。
１．ＥｘｃｅｌＶＢＡの起動（７）（８）
(Excel2003以前のバージョンでは、「ツール」
タブの「マクロ」をクリックする。）
（７）「マクロのセキュリティ」レベルを「中」以下、
または「すべてのマクロを有効にする」にする。
（８）マクロの「Visual Basic」 Editorを選択する。
１．ＥｘｃｅｌＶＢＡの起動（９）
（９）「挿入」で、
「標準モジュー
ル」を追加する。
以上で準備
ＯＫです。
２．マクロの作成
Sub test()
MsgBox “こんにちは”
End Sub
実行（横向きの
青い三角のボ
タン）をクリック
する
３．マクロの追加
Sub test()
MsgBox “こんにちは”
End Sub
Sub testend()
MsgBox “おしまいです”
End Sub
４．２つのマクロを実行する
Sub test2()
test
testend
End Sub
Sub test()
MsgBox “こんにちは”
End sub
Sub testend()
Msgbox “おしまいです”
End Sub
５．関数と引数（１）
Sub テスト（）
MsgBox “こんにちは”,vbYesNo
End Sub
※引数は、 vbYesNoの他に、いろいろある。
vbOKOnly, vbYesNoCancel, vbOKCancel,
vbRetryCancel, vbRetryCancelIgnore ・・・
６．関数と引数（２）
Sub テスト（）
MsgBox “こんにちは”,vbYesNo, “タイトル”
End Sub
※引数を省略することができる。
Msgbox “こんにちは”, , “タイトル”
７．変数
Sub 変数表示（）
kazu = 3
MsgBox kazu, , “変数ｋａｚｕの値を表示する”
MsgBox “ kazu ”, , “ｋａｚｕと表示する”
End Sub
８．四則演算
Sub 四則演算（）
kazu = 3
x=5
kekka= (kazu + x) / (kazu – x)
MsgBox kekka, , “計算結果”
End Sub
９．複数行
Sub 複数行（）
kazu = 3 : x = 5 : y = 2 : kekka= kazu + x + y
MsgBox kekka, , “計算結果”
MsgBox kekka, vbYesNo , _
“計算結果は１０になりましたか？”
End Sub
※複数行を１行に書くときは、：（コロン）を使う。
※1行を複数行に分割するときは、スペースと_（ア
ンダースコア）を使う。
１０．コメント
Sub 四則演算（） 'マクロ名です
kazu = 3 : x = 5
'変数です
'計算します
kekka= (kazu + x) / (kazu – x)
'表示します
MsgBox kekka, , “計算結果”
End Sub
１１．簡単なプログラム（１）
Sub pro01（）
'Excel の A1のセルを最初の位置とします
Range(“A1”).Activate
For a = 1 to 9 ' a は上から下へ行を移動する
kazu = a ^ a
' x ^ y は x の y 乗です
'Offset(a,0) とは、最初の位置からの相対位置です
ActiveCell.Offset(a,0).value = kazu
Next a
End Sub
１２． Offset(a,b)の場所について
Excel の A1のセルを最初
の位置とします
Range(“A1”).Activate
下に a
右にb
Offset(a,b) とは、最初の位
置からの相対位置です
ActiveCell.Offset(a,b).value
１３．簡単なプログラム（２）
Sub pro02（）
Range(“A1”).Activate
For a = 0 to 9 ' a は上から下へ行を移動する
For b = 0 to 5 ' b は左から右へ列を移動する
ActiveCell.Offset(a,b).value = a * b
Next b
Next a
End Sub
１４． For・・・ Next について
For a = 0 to 9
‘ a は 0 から 9 まで
For b = 0 to 5 ‘ b は 0 から 5 まで
・・・・・・・・・・・・
Next b
Next a
［解説］最初、 a は 0 で、 b は 0 から 5 まで。
次に、 a は 1 で、 b は 0 から 5 まで。
次に、 a は 2 で、 b は 0 から 5 まで。
(略)
最後に、 a は 9 で、 b は 0 から 5 まで。
１５．マクロ付きのExcelブックの
保存方法
通常の方法でExcelブックを保存してください。
保存したExcelブックを開くと、以前作成したマクロ
が付いています。
１６．ＢＡＳＩＣ（１）
• ＶＢＡでさらに複雑なプログラムを開発する
ためには、プログラムの基本を学習しなけ
ればいけません。
• プログラムの基本とは、入出力、変数、条
件分岐、繰り返し操作、関数、・・・です。
• プログラム言語の中で最もシンプルな言語
はＢＡＳＩＣです。
１７．ＢＡＳＩＣ（２）
• ＢＡＳＩＣを理解すれば（自分の思い通りのプログ
ラムを作ることができれば）、他のプログラミング
言語にもその基本は応用することができます。
• 例えば、ＶＢ（ＶｉｓｕａｌＢａｓｉｃ）、ＶＢＡ、Ｃ、Ｊａｖａ
等の言語でプログラミングすることができます。
• 後期のプログラミング２では、Ｃ、Ｊａｖａで少し複
雑なプログラミングを勉強します。
• 前期は、ＢＡＳＩＣ、ＶＢＡ、Ｌｉｓｐを使って、プログラ
ミングの基本を習得します。

Download Report