プログラミング演習

Size: px

Start display at page:

Download "プログラミング演習"

ぜんまかやぬま
5 years ago
Views:

1 プログラミング入門 Ⅰ (No.10) Ⅰ10-1 [1]Excel VBA を使ってみる VBA とは Visual Basic for Applications の略で Microsoft 社が自社の Office 製品 (Word, Excel PowerPoint Aceess, Outlook など ) で簡単にマクロを作れるように開発したプログラミング言語です名前のとおり Visual Basic (VB) という言語に非常によく似たものになっています上に出てきたマクロとは Word や Excel などのアプリケーションで複雑な操作や定型的な作業を人間の手動でなく自動的に実行させる機能のことですマクロは VBA というプログラミング言語で書かれたプログラムですそのため VBA で書いたプログラムのことをマクロということもあります企業や事務所などビジネスの場面では Excel や Access を使う際にマクロ機能を利用することが多々あります VBA を知っておくことはそういう場面でも役に立つでしょう VBA は厳密には Office 製品ごとに違うところがありますがこの授業ではビジネスでも最もよく使われている Excel VBA を使うことにします Excel に組み込みの機能ですから Excel が入っているパソコンであればどれでも利用することができます Excel VBA は本来は Excel の操作を強化するものですから Excel の機能と組み合わせて使うものなのですがこの授業の最初のうちは Excel 自身の機能とは別に使ってみることにしますですから Excel 操作に慣れていない人でも安心しておいてください (1-1) VBE を開く Visual Basic Editor(VBE) とは Visual Basic でプログラムを作成するための専用ウィンドウです 1 [ スタート ] ボタン > Microsoft Excel 2013 を選ぶ Excel が開く 2 Excel のリボンの [ 開発 ] タブ > [ コード ] グループ > [Visual Basic] を選ぶ

2 Ⅰ Visual Basic Editor のウィンドウが開く 4 さしあたり Excel は使わないので Excel のウィンドウは邪魔にならないように最小化しておく 5 Visual Basic Editor の [ 挿入 ] メニュー > ユーザーフォームを選ぶ 6 フォームウィンドウが現れる

(1-2) VBE のウィンドウメニューバーツールバーフォームウィンドウ Ⅰ10-3 プロジェクトエクスプローラフォームツールボックスプロパティウィンドウ (1-3) コントロールの貼り付けと変更プログラムを作る土台フォーム (Form) 色々な部品をフォームに貼り付けて使うラベル (Label) テキストボックス (TextBox) 部品コントロール (control)

3 (1-2) VBE のウィンドウメニューバーツールバーフォームウィンドウ Ⅰ10-3 プロジェクトエクスプローラフォームツールボックスプロパティウィンドウ (1-3) コントロールの貼り付けと変更プログラムを作る土台フォーム (Form) 色々な部品をフォームに貼り付けて使うラベル (Label) テキストボックス (TextBox) 部品コントロール (control) ツールボックスコマンドボタン (CommandButton) 色々なコントロールがツールボックスにあるツールボックスのサイズによってコントロールの位置が変わるので注意するコントロールの貼り付けイメージ (Image) ツールボックスでクリックしてフォーム上でドラッグするとそのコントロールが貼り付けられる貼り付けた後フォーム上でクリックしてドラッグすると位置を変更できるまたハンドル ( ) をドラッグするとサイズを変更できるフォーム上でクリックして Delete キーを押すと削除できるツールボックスでダブルクリックするとアイコンが凹んだままになり続けて複数個貼り付けできるようになる取り消しはもう一度アイコンをクリックするか Esc キーを押すとよい

CommandButton1_Click( ) と End Sub という 2 行が自動的に入っているコードウィンドウ Private Sub CommandButton1_Click( ) とは

4 Ⅰ10-4 [2] プログラムを入力する (2-1) フォームのデザイン 1 フォームにコマンドボタン (Command Button) を貼り付ける (2-2) コードウィンドウを開くプログラム ( コード :code) を入力するためのウィンドウをコードウィンドウと呼ぶ 2 コマンドボタンをダブルクリックするコードウィンドウが現れ Private Sub CommandButton1_Click( ) と End Sub という 2 行が自動的に入っているコードウィンドウ Private Sub CommandButton1_Click( ) とは CommandButton1 をクリックしたときに実行させたいプログラムという意味であるフローチャートのはじめに相当すると思えばよい End Sub とは 1 つのプログラムの終わりを表しフローチャートのおわりに相当すると思えばよい

5 (2-3) プログラムを入力する Ⅰ Private Sub CommandButton1_Click( ) と End Sub の間の行に次のプログラムを入力する dim a as integer dim b as integer dim c as integer a=20 b=35 c=a+b msgbox(c) [ 入力のしかた ] プログラム部分は半角のアルファベット数字記号で書く入力は小文字でよい改行は Enter キーを押す改行すると自動的に大文字に変更されたり色が変わる部分があるこれは VB の予約語 (VB で決まっている言葉 ) である変わらないときはスペルを間違っている可能性がある式や書き方がおかしいときは赤字になって教えてくれる式の間など自動的にスペースが入れられることもあるキーボードから入力していると次に入力する言葉の候補がリストに表示されることがあるそのリストの中から選びたいときはマウスでダブルクリックするかキーでカーソルを合わせて Tab キー ( 改行なし ) か Space キー ( 空白 + 改行なし ) か Enter キー ( 改行あり ) を押す

6 Ⅰ10-6 [ 入力ができた状態 ] うまく入力できましたか??

7 (2-4) プログラムを実行する 4 プログラムを実行してみよう [ 実行 ] メニュー > Sub/ ユーザーフォームの実行を選ぶまたはツールバーのボタンをクリックしてもよい Ⅰ10-7 Visual Basic Editor のタイトルバーに [ 実行中 ] と表示されると実行状態である 5 実行状態になったらコマンドボタンをクリックする注意 [ 実行 ] を指定する際にウィンドウフォーカスがユーザーフォームやコードウィンドウにないとマクロ実行のダイアログボックスが現れるそれを避けるには一度ユーザーフォームをクリックしておいてから [ 実行 ] を指定するとよいどんな結果が出力されますか? (2-5) プログラムの実行を終了する 6 プログラムを終了してみよう [ 実行 ] メニュー > リセットまたはツールバーのボタンを選ぶユーザーフォーム右上のボタンをクリックしてもよい (Visual Basic ウィンドウ右上のではない!) プログラムを修正するときは一旦実行を終了してから行う

Ⅰ10-8 [ 入力したプログラム ] [ このプログラムのフローチャート ] はじめ a = 20 b = 35 c = a + b c 出力おわり (2-6) プログラムの説明変数の宣言プログラムの先頭部分でそのプログラムの中で使う変数について変数名と型を宣言しておく変数の名前 ( 変数名 ) は次の規則に従って自由に付けることができる変数名に使用できるのは半角英字

8 Ⅰ10-8 [ 入力したプログラム ] [ このプログラムのフローチャート ] はじめ a = 20 b = 35 c = a + b c 出力おわり (2-6) プログラムの説明変数の宣言プログラムの先頭部分でそのプログラムの中で使う変数について変数名と型を宣言しておく変数の名前 ( 変数名 ) は次の規則に従って自由に付けることができる変数名に使用できるのは半角英字半角数字日本語アンダースコア ( _ ) 名前の先頭は半角英字または日本語で始まること長さは最大半角 255 文字分大文字小文字に区別はない VB で決まっている予約語 (dim, as, if, など VB の命令で使う単語 ) は使えない変数やデータには型 (type) がある型の種類型名書き方サイズ値の範囲整数型 Integer 2 バイト ~32767 の整数長整数型 Long 4 バイト ~ の整数実数型 ( 単精度浮動小数点型 ) 文字列型 Single String 4 バイト文字列による ~ ( 負の数 ) 0( 零 ) ~ ( 正の数 ) 文字を入れるこの他にも倍精度浮動小数点型 (Double) 通貨型 (Currency) バイト型 (Byte) ブール型 (Boolean) 日付型 (Date) バリアント型 (Variant) などがある変数の宣言 Dim 変数名 As 型名 ( 例 ) Dim a As Integer a という変数を整数型として使うと宣言している ( 整数型変数 a を使う )

9 Ⅰ10-9 代入変数に値を代入するには = を使う = の右辺の値を左辺の変数に代入する値の代入変数名 = 値や数式フローチャートプログラム S = 0 S = 0 (0 = S は間違い!) N = N+1 N = N + 1 (N+1 = N は間違い!) フローチャートもプログラムも = の左右が重要計算式計算式を書くとき掛け算割り算では計算記号 ( 演算子 ) に注意する演算子の種類計算数学記号 VB で使う記号足し算 + + 引き算 - - 掛け算 * ( 星印アスタリスク ) 割り算 / ( スラッシュ ) 出力変数の値を出力するには MsgBox 関数を使う MsgBox はメッセージボックス (message box) の略である値の出力 MsgBox ( 変数名 ) フローチャートとの関係例 W 出力 MsgBox (W) A, B 出力 MsgBox (A) MsgBox (B) 2 つの変数 A と B の値を出力したいとき MsgBox (A,B) と書くのはダメ一度に複数の変数の値を出力する方法は No.13 の授業で説明する予定です出力しないと計算結果は表示されないことに注意!

10 Ⅰ10-10 (2-7) 練習問題問題 1 変数 d,e,f を追加しそれぞれ a と b の引き算掛け算割り算を計算して答を出力させてみようまず手で書いて考える Dim a As Integer Dim b As Integer Dim c As Integer Dim d a = 20 b = 35 c = a + b d = MsgBox (c) どんな結果が出力されますか? ( チェックポイント ) 割り算の答が小数点付きになっていますか? 問題 2 a,b の値を色々変えて実行してみよう [a= b= ] とすると [ ] [a= b= ] とすると [ ] [a= b= ] とすると [ ] 発展問題ユーザーフォームの色やコマンドボタンを変えてみようユーザーフォームの色はフォームを選択しておいてプロパティウィンドウの BackColor で設定できる BackColor 欄のをクリックし現れるウィンドウで [ パレット ] タブを指定するコマンドボタンの色はコマンドボタンを選択しておいてプロパティウィンドウの BackColor で設定できる BackColor 欄のをクリックし現れるウィンドウで [ パレット ] タブを指定する

[3] プログラムを保存するせっかく作ったプログラムなので保存しておこう Excel VBA

今回保存するファイル名は prog1-10 とすることにする (3-1) VBA プログラムの保存

用のフォルダーを作っておく [ ドキュメント ] を開きリボンの [ ホーム ] タブから

$(ckgfile\ckc-home) (Z:) は同じものになっている$ どちらから開いても同じものが見える 2 Visual Basic のウィンドウに戻り

のウィンドウから Excel のボタンをクリックするとよいリボンの [ ファイル ] タブ >

11 [3] プログラムを保存するせっかく作ったプログラムなので保存しておこう Excel VBA では作成したプログラムは Excel のファイル ( ブック ) の中に保存される今回保存するファイル名は prog1-10 とすることにする (3-1) VBA プログラムの保存 Ⅰ 実際に保存する前に自分の [ ドキュメント ] 内にプログラミング入門用のフォルダーを作っておく [ ドキュメント ] を開きリボンの [ ホーム ] タブから新しいフォルダーを選ぶフォルダー名をプログラミング入門としておくフォルダーの名前をプログラミング入門とする学内の PC ではドキュメントと個人用フォルダー 111xxxx (ckgfile\ckc-home) (Z:) は同じものになっているどちらから開いても同じものが見える 2 Visual Basic のウィンドウに戻りプログラムを保存する Excel のウィンドウを開く (Visual Basic Editor のウィンドウから Excel のボタンをクリックするとよいリボンの [ ファイル ] タブ > 名前をつけて保存を選ぶ保存する場所をドキュメント (Z:) のプログラミング入門フォルダーにするドキュメントまたは Z: を選ぶ見つからないときは参照から捜すプログラミング入門フォルダーをダブルクリックして開く

Ⅰ10-12 [ ファイルの種類 ] ボックス右端のをクリックして種類を Excel マクロ有効ブックに変更する [ ファイル名 ] ボックスに保存するファイル名 ( 今回は prog1-10 ) を入力して保存するプログラミング入門フォルダーになっていることを確認するファイル名を入力する [ ファイルの種類 ] が Excel マクロ有効ブックになっていることを確認する 3

12 Ⅰ10-12 [ ファイルの種類 ] ボックス右端のをクリックして種類を Excel マクロ有効ブックに変更する [ ファイル名 ] ボックスに保存するファイル名 ( 今回は prog1-10 ) を入力して保存するプログラミング入門フォルダーになっていることを確認するファイル名を入力する [ ファイルの種類 ] が Excel マクロ有効ブックになっていることを確認する 3 保存できたかどうか確認する [ ドキュメント ] で保存したフォルダを開いてみる今保存した Excel のファイルがあることを確認する今保存した VBA プログラムが入った Excel のファイル (3-2) VBE の終了と Excel の終了 4 Visual Basic ウィンドウ右上のをクリックするまたは [ ファイル ] メニュー > 終了して Microsoft Excel へ戻るを選ぶ 5 Excel のウィンドウを元に戻して Excel ウィンドウ右上のをクリックするまたは [ ファイル ] タブ > 閉じるを選ぶ忘れずに Excel も終了しておくこと!

(3-3) ファイルの形式について Ⅰ10-13 マクロ有効ブック Excel 2013 では VBA プログラム ( マクロ ) を含んだ Excel ファイルはセキュリティのために特別扱いをすることになっているこれはマクロを利用してコンピュータウィルスが作られることがあるのでマクロが入ったファイルをはっきりと区別できるようにするためである VBA プログラム ( マクロ ) を含んだ

13 (3-3) ファイルの形式について Ⅰ10-13 マクロ有効ブック Excel 2013 では VBA プログラム ( マクロ ) を含んだ Excel ファイルはセキュリティのために特別扱いをすることになっているこれはマクロを利用してコンピュータウィルスが作られることがあるのでマクロが入ったファイルをはっきりと区別できるようにするためである VBA プログラム ( マクロ ) を含んだ Excel ファイルはマクロ有効ブックとして保存するマクロ有効ブックはファイル名の後に.xlsm の拡張子が自動的につけられる VBA プログラム ( マクロ ) を含まない通常の Excel ファイルはただのブックとして保存する通常のブックはファイル名の後に.xlsx の拡張子がつけられる Excel 2003 まではどちらのファイルもただのブックとして保存されファイル名の後に.xls の拡張子がつけられる保存形式を間違えた場合 VBA プログラム ( マクロ ) を含んだ Excel ファイルを保存する際に間違えて [ ファイル ] タブ > 名前をつけて保存 > Excel ブック (.xlsx) を選ぶと [ 保存 ] ボタンをクリック後に警告が表示される [ はい ] ボタンをクリックするとプログラムは削除され通常の Excel ブックとして保存されるプログラムを消さずに保存したいときは [ いいえ ] ボタンをクリックして [ 名前をつけて保存 ] ダイアログボックスに戻り [ ファイルの種類 ] を Excel マクロ有効ブックに変更して保存し直す [ ファイルの種類 ] を Excel マクロ有効ブックに変更する

プログラミング演習

プログラミング演習プログラミング入門 Ⅰ (No.11) Ⅰ11-1 [1] プログラムを修正する (1-1) 既にあるプログラムを開く前回作ったプログラム prog1-10.xlsm を開いてみよう既に保存してある VBA プログラムを開くには以下のようにするドキュメントから開く 1 Excel VBA のプログラムは Excel ファイルの中に入っているので Excel ファイルをダブルクリックする 2