VBAﬁüŒåŁÒver2

(1)

この手引きは、『Microsoft® Excel セミナーテキスト VBA 入門編［2000/2002 対応］』を使ってセミナーを実施される講師の方に、ご参考にしていただきたい各情報（セミナー実施の注意事項、所要時間、本文内容の補足）をまとめたものです。より良いセミナーを行うために、この手引きがお役に立てば幸いです。

日経BPソフトプレス

セミナー実施時の注意

以下の点に注意して、セミナーを実施しましょう。 ●テキストに記載されている名称で説明すること（講師がテキストに記載されている名称と異なる名称で説明すると受講者は混乱するため）。 ●受講者からの質問に対して自信のないことは即答を避け、調査後の折り返し回答を徹底すること。 ●英数字の入力は、特に指示がない限り、半角で入力するよう説明すること。セミナー実施前に、次の環境を確認しておきましょう。 ● Office アシスタント ……… オフ ●ツールバーとメニュー・ Excel 2000 の場合［［標準］と［書式設定］ツールバーを横に並べて配置する］……… オフ［最近使用したコマンドを最初に表示する］……… オフ・ Excel 2002 の場合［［標準］と［書式設定］ツールバーを 2 行に並べて配置する］……… オン［常にすべてのメニューを表示する］……… オン ●［標準］、［書式設定］ツールバーが表示された状態 ● Visual Basic のヘルプの機能を追加インストールした状態 ●プリンタをセットアップした状態

Microsoft

®

Excel

セミナーテキスト VBA 入門編

［2000/2002 対応］

講習の手引き

(2)

セミナーの所要時間

このセミナーテキストの標準セミナー時間は 6 時間です。なお、各章、各節の時間は、「はじめに」に記載されている対象者で行った場合の目安です。第 1 章 Excel VBA とは 15 分 1.1 マクロと VBA 5 分 1.2 マクロの構成要素について 5 分 1.3 マクロセキュリティについて 5 分第 2 章 Visual Basic Editor 20 分 2.1 Visual Basic Editor を起動するには 5 分 2.2 Visual Basic Editor の画面について 5 分 2.3 Visual Basic Editor を使うには 5 分 2.4 Visual Basic Editor を終了するには 5 分第 3 章マクロの記録による作成 35 分 3.1 マクロの記録とは 10 分 3.2 マクロを保存するには 5 分 3.3 マクロを実行するには 5 分 3.4 マクロを編集するには 10 分 3.5 マクロを削除するには 5 分第 4 章 Visual Basic Editor でのマクロ作成 60 分 4.1 標準モジュールを挿入するには 5 分 4.2 プロシージャを作成するには 20 分 4.3 エラーに対応するには 30 分 4.4 モジュールを削除するには 5 分第 5 章ワークシートやセルの操作 90 分 5.1 オブジェクトとは 10 分 5.2 セルを操作するには 40 分 5.3 ワークシートを操作するには 40 分第 6 章より高度な処理 80 分 6.1 変数とは 10 分 6.2 処理を繰り返すには 25 分 6.3 条件に応じて処理を実行するには 45 分第 7 章マクロの登録 60 分 7.1 図形に登録するには 25 分 7.2 ツールバーに登録するには 35 分

(3)

本文の注意点と参考情報

本文の章立てに沿って、主な注意点、参考情報をまとめました。セミナーを実施する際の参考としてください。第 1 章 Excel VBA とは 1.1 マクロと VBA VBA とは（p.2）

講習中に説明する必要はありませんが、VBA（Visual Basic for Application）と似たもので Visual Basic（VB）があります。

プログラミング言語には、Visual Basic、C、Java などさまざまな種類があります。VBA は Visual Basic を基にして作られた言語です。

Visual Basic と VBA は基本的な文法が同じです。ただし、Visual Basic はコンピュータに直接命令する言語で、Windows がインストールされていれば実行できますが、VBA はアプリケーションに対して命令するため、Excel などのアプリケーションがインストールされていないと実行することができません。 1.2 マクロの構成要素について ■プロシージャとは（p.3）プロシージャの種類は Sub プロシージャ以外にも "Function プロシージャ" 、"イベントプロシージャ" などがありますが、本テキストでは取り扱いません。 ■モジュールとは（p.3）モジュールの種類は 4 種類ありますが、本テキストでは "標準モジュール" のみ説明しましょう。参考までに他のモジュールを紹介します。・ユーザーフォーム独自のフォームを作成するときに使用します。フォーム上には、コマンドボタン、テキストボックス、コンボボックスなどを配置し、自由にデザインすることができます。・クラスモジュール新しいオブジェクトを作成するときに使用します。標準モジュールと同様に、マクロが保存されているオブジェクトですが、適用範囲が限られています。・ Excel オブジェクトワークシートやグラフシートがあり、挿入しなくても Excel 側でシートを挿入すれば増えていきます。ボタンのクリックやシートの切り替えなどのユーザーが行う操作を "イベント" といいます。イベントに反応するマクロ（イベントプロシージャ）はこのオブジェクトモジュールに記述します。 1.3 マクロセキュリティについて 2000 ： Excel 2000 のセキュリティレベルについて（p.4） Outlook 電子メールセキュリティアップデートが適用されていれば、初期状態で［高］になるため、変更が必要です。ヒント：デジタル署名について（p.4）

取得したデジタル署名を添付するには、Visual Basic Editor を起動し、署名するプロジェクトを選択して、［ツール］メニューの［デジタル署名］をクリックします。［デジタル署名］ダイアログボックスの［選択］をクリックして、取得した証明書を選択します。操作：マクロセキュリティを変更する Step3（p.5）直接操作に影響しませんが、［信頼のおける発行元］タブの名称は、Excel 2000 では［信

(4)

第 2 章 Visual Basic Editor

2.1 Visual Basic Editor を起動するには ■ Visual Basic Editor とは（p.8）

Visual Basic Editor は "エディタ" という独立した 1 つのアプリケーションです。文書を作成する時にはワープロソフトを使用しますが、プログラミングをする時にはエディタというアプリケーションを使用します。Visual Basic Editor はプログラミングしやすいようにさまざまな機能が搭載されたエディタです。

操作： Visual Basic Editor を起動する Step2（p.8） 1 章の p.5 の「操作：マクロセキュリティを変更する」でセキュリティレベルを "中" に変更したため、マクロの警告メッセージが表示されたことを説明しましょう。 Step4（p.9）時間に余裕があれば、［Visual Basic］ツールバーのボタンについて説明しましょう。「3.1 マクロの記録とは」では、［マクロの実行］ボタンと［記録終了］ボタンを使用します。［Visual Basic］ツールバーの［セキュリティ］をクリックして、［セキュリティ］ダイアログボックスを表示することもできます。 Step5（p.9）

Visual Basic Editor は、以前の使用状況によって表示されるウィンドウやウィンドウサイズが異なります。表示されているウィンドウやウィンドウサイズ、ツールバーの位置など、受講者の画面を統一しましょう。

2.2 Visual Basic Editor の画面について

■ Visual Basic Editor の主なウィンドウ（p.10）

Visual Basic Editor を起動すると、初期状態ではプロジェクトエクスプローラとプロパティウィンドウのみ表示され、コードウィンドウは表示されません。ただし、ここでは実習用ファイルの状況に即し、一般的な 3 つのウィンドウについて説明しましょう。時間に余裕があれば、次の内容も説明しましょう。［標準］ツールバーの右端には、現在のカーソルの位置が表示されます。たとえば p.10 の図では、1 行 1 桁目（"Sub Macro1()" の "S"の前）にカーソルがあります。コードウィンドウの上部右側にある［プロシージャ］ボックスには、現在のマクロ名が表示され、一覧には現在の標準モジュールに存在するマクロ名が表示されます。一覧からマクロ名を選択すると、そのプロシージャ内にカーソルを移動することができます。ヒント：ウィンドウの配置を変更する、ヒント：ウィンドウの幅を変更する（p.11）ウィンドウの配置やウィンドウの幅は変更すると元の位置に戻すことができなくなることがあるため注意しましょう。変更してしまった場合には、再度講師が受講者の画面を確認するようにしましょう。操作：ツールバーを表示する Step2（p.12）［デバッグ］ツールバーは「4.3 エラーに対応するには」で使用します。また、p.40 の「ヒント：［デバッグ］ツールバー」にあるように、［Sub/ユーザーフォームの実行］や［リセット］など、［標準］ツールバーと同じボタンを持ちます。

(5)

2.3 Visual Basic Editor を使うには

ヒント：プロジェクトエクスプローラの表示/非表示を切り替えるには（p.15）

同様に、プロパティウィンドウも操作できます。閉じるボタンをクリックするとプロパティウィンドウを非表示にすることができます。もう一度表示するには、［表示］メニューの［プロパティウィンドウ］をクリックします。

2.4 Visual Basic Editor を終了するには操作： Visual Basic Editor を終了する Step2（p.18）受講者の操作によっては、ブックを閉じるときに変更の保存の確認メッセージが表示される場合があります。その場合は、保存しないで閉じましょう。第 3 章マクロの記録による作成 3.1 マクロの記録とは ■マクロの自動記録では記録されない操作（p.20）マクロの自動記録では文字が確定された結果が記録されます。IME の起動や変換途中の過程は記録されません。 Excel 2000 では、自動保存機能をオンにしている場合、マクロの自動記録で自動保存の操作も記録されてしまいます。ただし、Excel 2000 の自動保存はアドインのため、初期状態では利用できない機能です。 ③マクロの保存先（p.21）・個人用マクロブック個人用マクロブックに保存すると、Excel を終了するときに変更の保存の確認メッセージが表示されます。

個人用マクロブックは、OS が Windows 2000/XP の場合、［Documents and Settings ¥< ユーザー名 >¥Application Data¥Microsoft¥Excel¥XLSTART］フォルダの PERSONAL.xls として保存されます。Excel を起動すると自動的に開かれるため、個人用マクロブックに保存したマクロは、Excel を使用している間いつでも実行することができます。個人用マクロブックは非表示のブックです。ここに保存したマクロを編集するには、いったん PERSONAL.xls を再表示し、編集が終わったら再度非表示にして保存する必要があります。個人用マクロブックを削除するには、PERSONAL.xls を削除します。ただし、このファイルは隠しファイルのため、操作の前にファイルとフォルダの表示を変更する必要があります。 Visual Basic Editor のプロジェクトエクスプローラでは、PERSONAL.xls を確認することができます。・新しいブック新規ブックを作成してマクロを記録します。既存のブックに不必要なマクロが作成されないため安心です。操作：マクロを記録する（p.21）マクロの記録中に操作を間違えてしまうと、間違えた操作の内容も記録されてしまいます。時間に余裕がある場合や操作に不慣れな受講者がいる場合には、あらかじめ記録する操作を確認しましょう。

(6)

Step12（p.24）

［ツール］メニューの［マクロ］-［記録終了］をクリックしてもマクロの記録を終了することができます。

ヒント：［記録終了］ツールバー（p.24）

マクロの記録中に［記録終了］ツールバーを表示すると、その手順も記録されてしまいます。その場合には、Visual Basic Editor を起動し、コードウィンドウで次のステートメントを削除します。 3.4 マクロを編集するには（p.29）マクロの自動記録で作成されたステートメントを編集する理由として、ダイアログボックスを使って設定すると既定値まで記述される点があります。たとえば、［セルの書式設定］ダイアログボックスの［フォント］タブを使用して書式を設定すると、変更しなかった項目もすべて記録されてしまいます。既定値は省略できるため、 VBA に慣れてくれば不要なステートメントを削除すると読みやすくなり、処理速度も速くなります。ヒント：マクロの境界（p.31）

区分線の表示/非表示は変更できます。Visual Basic Editor で［ツール］メニューの［オプ

ション］をクリックし、［編集］の［プロシージャの区分線］チェックボックスで設定します。

第 4 章 Visual Basic Editor でのマクロ作成 4.1 標準モジュールを挿入するには（p.36） 1 つの標準モジュールに複数のマクロが保存できます。分類する必要があれば、複数の標準モジュールを用意するとよいことを補足しましょう。また、この章では新しい標準モジュールを挿入し、そこにマクロを作成することも説明しましょう。操作：標準モジュールを挿入する Step3（p.36）選択する場所は、実際には同一プロジェクト内であればプロジェクト名（［VBAProject（メッセージ表示.xls）］）の下の階層でもかまいません。ただし、プロジェクト名を選択した方が挿入先のプロジェクトを間違える心配が少なくなるため、ここではプロジェクト名を選択して挿入する方法で説明しましょう。 Step4（p.37）挿入された標準モジュールの名前の番号は、1 からの連番が割り当てられます。ただし、既に標準モジュールが複数存在し、途中のモジュール番号が抜けている場合は、抜けているモジュール番号が割り当てられます。ヒント：複数のプロジェクトが表示されている場合には（p.37）ボタンやメニューを使って標準モジュールを挿入する場合には、あらかじめ挿入先のプロジェクトを選択しておく必要があります。

(7)

4.2 プロシージャを作成するには 4.2.1 プロシージャを作成する操作：プロシージャを作成する（p.38）実習する前に、プロジェクトエクスプローラでモジュール "Module3" が選択されているか確認しましょう。 Step1（p.38） p.38 の「ヒント：大文字、小文字の自動変換」を参照し、大文字、小文字を意識せずに入力してもよいことを説明しましょう。VBA に定義されているキーワード、数値、空白は全角で入力しても自動的に半角になります。入力ミスがある場合は、エラーメッセージが表示されるか、大文字、小文字の自動変換が行われません。大文字、小文字の自動変換については、p.40 の「ヒント：自動構文チェック機能」で説明しています。今後、実習中に入力ミスなどのエラーがあるにも関わらず、原因がわからない場合は講師に知らせるように指示しておきましょう。 Step2（p.38）

"Sub" と "End Sub" の文字の色が青色になっていることを補足しましょう。VBA のキーワードには、青色で表示されるものがあります。

プロシージャは、Visual Basic Editor の［挿入］メニューの［プロシージャ］をクリックするか、［ユーザーフォームの挿入］ボタンの一覧の［プロシージャ］で作成することもできます。ただし、高度な知識を要する詳細設定が必要になるため、本テキストでは説明を省きます。 4.2.2 命令文を作成する ■ VBA 関数（p.39） VBA では Excel に用意されている関数を "ワークシート関数" と呼びます。ワークシート関数の中には VBA で使用できる関数もあります。ただし、VBA で使用するには、次のように Application オブジェクトの WorksheetFunction オブジェクトを指定する必要があります。

ワークシート関数を VBA で使用できるかどうかは、Visual Basic のヘルプ「Visual Basic Editor で使用できるワークシート関数一覧」を参照すると確認できます。 ■ MsgBox（メッセージボックス）関数（p.39）使用例を参照する際に、VBA では、文字列はダブルクォーテーション（"）で囲んで表現することを補足しましょう。 MsgBox 関数には、その他にも省略可能な引数があります。説明する必要はありませんが、参考までに引数を紹介します。 Range("A1").Value = WorksheetFunction.RoundDown(9.27, 0)

(8)

MsgBox 関数に限らず、戻り値がある場合は引数全体をかっこで囲む必要があります。 VBA では、複数の引数を記述する場合、引数どうしをカンマ（,）で区切ります。その際、引数そのものは省略できても、引数を区切るカンマ（,）は省略できません。引数の記述には次の 2 種類の方法があります。一般的に、②の方法は代入する値がどの引数に対するものかわかりづらい場合に記述する方法です。 ①各引数をカンマで区切り、構文どおりの位置に指定する ②各引数の名前を指定し、コロンと等号（:=）を使用して値を代入する本テキストでは、6 章の Worksheets コレクションの Add メソッドで②の形式を使用しています。操作： MsgBox 関数を利用する Step1（p.40）既定では、インデントは半角 4 文字分の間隔が空くように設定されています。Visual Basic Editor で［ツール］メニューの［オプション］をクリックし、［編集］の［タブ間隔］ボックスでインデントの文字数を変更できます。プロシージャの始まり、終わりと命令文の区別がしやすくなるように、命令文にはインデントを設定することを説明しましょう。また、複数行のステートメントを入力した場合、コードを入力してから Visual Basic Editor の［編集］ツールバーの［インデント］ボタンや［インデントを戻す］ボタンでまとめてインデントを設定できることを補足しましょう。

Step2（p.40）

改行するとインデントの設定が次の行に引き継がれることを説明しましょう。

modorichi = MsgBox(prompt:="シート名を変更しますか？", Title:="確認") modorichi = MsgBox("シート名を変更しますか？", , "確認") 書式 MsgBox(メッセージ, ボタン, タイトル, ヘルプファイル, コンテキスト) 引数ボタン：表示されるボタンの種類と個数、使用するアイコンのスタイルを指定します。ボタンとアイコンの種類は Visual Basic のヘルプを参照してください。タイトル：ダイアログボックスのタイトルバーに表示される文字列を指定します。ヘルプファイル：ダイアログボックスに状況依存のヘルプを設定するために、使用するヘルプファイルの名前を指定します。引数のコンテキストと一緒に指定します。コンテキスト：ヘルプトピックに指定したコンテキスト番号を表す数式を指定します。引数のヘルプファイルと一緒に指定します。使用例 modorichi = MsgBox( "シート名を変更しますか？", vbYesNo, "確認")

タイトルバーに "確認" を表示し、ダイアログボックス内に［はい］と［いいえ］ボタンを表示します。ユーザーがボタンをクリックすると、ボタン番号が返されるので、この値を変数 modorichi に代入します。

(9)

Step5（p.40）

メッセージは Excel 画面で表示され、［OK］をクリックすると制御が Visual Basic Editor に戻ることを補足しましょう。

本セミナーでは実習しませんが、実際に開発する際には、コードに対するコメントを記述するとよいことを補足しましょう。たとえば、マクロの先頭には使用目的や実行に関する条件などを記述し、また、複雑な処理のステートメントにも処理内容を記述します。

ヒント：自動構文チェック機能（p.40）

既定では自動構文チェックを行うように設定されています。Visual Basic Editor の［ツール］メニューの［オプション］をクリックし、［編集］の［自動構文チェック］チェックボックスで変更できます。 4.2.3 入力支援を利用して命令文を作成する操作：入力支援を利用する Step1（p.41） 3 行目のインデントされた位置にカーソルを移動するように指示しましょう。 Step2（p.41）入力候補の一覧はカーソルを移動すると消えてしまいます。その場合はカーソルを戻し、再度 Ctrl+Space キーを押して再表示します。入力候補の一覧は、その他に［編集］メニューの［プロパティ/メソッドの一覧］、ショートカットメニューの［プロパティ/メソッドの一覧］、および Ctrl+J キーを使って表示することもできます。 Step3（p.41）日本語入力をオフにして入力するように指示しましょう。 Step5（p.42）キーワードを Enter キーで確定すると、同時に改行されます。行末で確定する場合は Enter キー、入力が続く場合は Tab キー、と使い分けるとよいことを補足しましょう。操作：クイックヒントを利用する Step1（p.42）

既定では、クイックヒントはオンに設定されています。Visual Basic Editor の［ツール］メニューの［オプション］をクリックし、［編集］の［自動クイックヒント］チェックボックスで変更できます。クイックヒントは、その他に［編集］メニューの［クイックヒント］、ショートカットメニューの［クイックヒント］、および Ctrl+I キーを使って表示できます。クイックヒントでは、入力したキーワードの次にくる引数が太字で強調されることを補足しましょう。クイックヒントはカーソルを移動すると消えてしまいます。その場合は、再度 "Msgbox" の後に半角スペースを入力すると再表示できます。 4.3 エラーに対応するには 4.3.1 エラーについて（p.43）デバッグ作業を円滑に行うためのさまざまなデバッグ機能が［デバッグ］メニューや［デバ

(10)

4.3.2 コンパイルエラーに対応する操作：構文チェックで検出された、コンパイルエラーに対応する Step2（p.44） 3 章で説明したように、先頭がシングルクォーテーション（'）で始まり、緑色の文字であるステートメントはコメントであることを補足しましょう。 Step3（p.44） ↓キーを押して確定する方法は、p.42 の「ヒント：その他の確定方法」で説明しています。 Step4（p.44）文字列の後にダブルクォーテーション（"）がない場合はエラーになりません。ステートメント確定と同時にダブルクォーテーション（"）が自動的に追加されます。 Step5（p.45） MsgBox 関数で表示させるメッセージ内容をあらかじめ確認しておきましょう。 Step6（p.45）確定したときに、コンパイルエラーにならなかったことを強調しましょう。操作：実行時に検出された、コンパイルエラーに対応する Step5（p.46）コンパイルエラーメッセージのより詳しい情報を調べるには、メッセージの［ヘルプ］をクリックします。実行時にエラーとなるのは、プロシージャ実行前にもう一度構文チェックが行われるからです。構文エラーがあればプロシージャ実行前で中断されます。 Step8（p.47） MsgBox 関数で表示させるメッセージ内容をあらかじめ確認しておきましょう。 4.3.3 実行時エラーに対応する操作：実行時エラーに対応する Step5（p.48）実行時のエラーメッセージのより詳しい情報を調べるには、メッセージの［ヘルプ］をクリックします。 Step6（p.48）中断されたステートメントの直前のステートメントまで実行されていることを補足しましょう。 Step8（p.48） MsgBox 関数で表示させるメッセージ内容を確認しておきましょう。 4.3.4 論理エラーに対応する操作：エラーの位置を特定する Step1（p.50）ステップ実行をする前に、まず、マクロ "論理エラー" の実行前の状態に戻すことを説明しましょう。

(11)

Step6（p.51）間違っていると思われるステートメントで実行を中断してからステップ実行することもできます。実行を中断する位置を "ブレークポイント" と呼びます。ブレークポイントを設定するには、中断したいステートメントの左、余白インジケーターバーをクリックします。ブレークポイントを設定すると、余白インジケーターバーに茶色い丸が表示され、ステートメントが茶色く反転します。解除するには、再度ブレークポイントが設定されているステートメントの余白インジケーターバーをクリックします。 Step8（p.51）黄色く反転したステートメントの実行前で中断しているため、原因となったステートメントは、中断した 1 つ前のステートメントであることを補足しましょう。操作：論理エラーに対応する Step1（p.52）テキストのコード中の "：" はステートメントの省略を表しています。サンプルコードには実際には 2 か所に ColorIndex があるため、修正位置を間違えないように注意しましょう。 Step3（p.52）マクロ "論理エラー" を実行して確認する前に、マクロ "論理エラー実行前に戻す" を実行して、表の書式をマクロ実行前の状態に戻すことを説明しましょう。 4.4 モジュールを削除するには操作：標準モジュールを削除する Step2（p.53）エクスポートの確認メッセージで［キャンセル］をクリックすると削除を中止し、［ヘルプ］をクリックするとメッセージ内容のより詳しい情報を確認することができます。第 5 章ワークシートやセルの操作 5.1 オブジェクトとは 5.1.2 プロパティ ■プロパティの値を取得（p.59）プロパティの値を取得したら、MsgBox 関数で表示させるなどステートメント内で使用するか、6 章で学習する変数などを利用して保管しておき、別のステートメントで使用することを補足しましょう。ヒント：値を代入できないプロパティ（p.59）値を代入できないプロパティかどうかは、ヘルプに記述してあることを説明しましょう。たとえば、ワークシートの枚数を調べる Worksheets コレクションの Count プロパティは、値を代入できないプロパティです。 5.1.3 メソッドヒント：引数を指定できるメソッド（p.59）引数を指定したメソッドは、6 章で作成するマクロで使用します。時間に余裕があれば、 p.88 Step2 のマクロ "シート名変更" のコード 6 行目、Worksheets.Add ∼を参照しましょう。 5.2 セルを操作するには ■ Range（レンジ）オブジェクト（p.60） Range コレクションという概念はありません。複数のセルでも Range オブジェクトで表記することを強調しましょう。

(12)

Excel でセルに "名前" が定義されていれば、セル範囲に指定することができます。名前はダブルクォーティション（"）で囲みます。アクティブでないブックやワークシートのセルを操作するには、コンテナの概念を利用してブックやワークシートのオブジェクトをたどって指定するか、または、ブックやワークシートをアクティブにする必要があることを補足しましょう。ワークシートをアクティブにする書式は、次の節（5.3 ワークシートを操作するには）で紹介します。本テキストでは扱いませんが、1 つのセルを指定するには、Cells プロパティでも指定できます。Cells プロパティだけでセル範囲や、セルに定義された名前の指定はできませんが、セル番地を数値で指定することができるため、高度な使い方が可能です。詳しくはヘルプを参照してください。たとえば、Range("A5")を Cells プロパティで記述すると、列、行の記述が逆になり、 Cells(5,1)、または、Cells(5,"A")となります。 5.2.1 プロパティの値の取得と代入 ■ Value（バリュー）プロパティ（p.61）本テキストでは、指定内容の "Range オブジェクト" は、p.60 の「■ Range（レンジ）オブジェクト」を参照して指定することを表しています。使用例を参照し、セルへ値を代入するときだけでなく、VBA では文字列、日付、時刻の場合は、ダブルクォーテーション（"）で囲み、数値はそのまま記述することを説明しましょう。操作：セルに入力されている値を取得する Step2（p.62） p.63 の「ヒント：操作の対象」を参照し、マクロ実行前に操作対象となるシート "発注伝票" がアクティブになっているか確認する必要があることを説明しましょう。セル A1 に "5 月発注伝票" と入力されていることも確認しましょう。 Step4（p.62）開いたブックには標準モジュールが用意されていないため、標準モジュールを挿入することを説明しましょう。 Step6（p.62）アクティブなブックやアクティブシート以外のセルを操作する場合、VBA でオブジェクトを指定するか、Excel でアクティブにする必要があります。ただし、セルそのものは Range でセル範囲を指定するため、アクティブにする必要がないことを補足しましょう。 MsgBox 関数でプロパティの値を表示できることを説明しましょう。操作：セルに文字列を入力する Step4（p.63）標準モジュールに複数のマクロを作成すると、マクロを区切る線が自動的に追加されることを補足しましょう。 Range("合計金額")

(13)

ヒント： Date 関数（p.65）

VBA 関数には、日付、時刻に関する関数が数多く用意されていることを補足しましょう。時間に余裕があれば、Date 関数は Excel の関数（ワークシート関数）の Today 関数と同じ値を返すことを補足しましょう。Excel の関数にも Date 関数はありますが、使い方が異なります。ワークシート関数と VBA 関数とが同じ名前でも、中には操作内容が異なる場合があるため注意しましょう。操作：セルに今日の日付を入力する Step10（p.65）セル B4 の値を確認する際に、Date 関数によって返された今日の日付が入力されていることを強調しましょう。 5.2.2 メソッドの実行 ■ Select（セレクト）メソッド（p.66）本テキストでは、指定内容の "Range オブジェクト" は、p.60 の「■ Range（レンジ）オブジェクト」を参照して指定することを表しています。 1 つのセルを選択する場合は、Activate メソッドでもセルを選択することができます。複数セルを選択する場合に Activate メソッドを使ってもエラーにはなりませんが、VBA では Activate メソッドは単一オブジェクトにのみ使うように定められています。 ■ Copy（コピー）メソッド（p.66） Copy メソッドではコピーのみ行い、Paste メソッドを使って貼り付けることもできます。その場合は、Copy メソッドでコピー元のみ指定します。また、PasteSpecial メソッドを使うと形式を選択して貼り付けることができます。詳しくはヘルプを参照してください。その他、移動を行うには、Cut メソッドを使います。詳しくはヘルプを参照してください。 "離れた複数セルは指定できません" とありますが、実際は、Copy メソッドの引数のコピー元の Range オブジェクトのみ離れた複数セルの指定をして、コピー先の Range オブジェクトで単一セルを指定すればエラーになりません。ただし、通常は使用しない方法です。操作：セルを選択する Step1（p.66）現在のアクティブセルを確認し、Select メソッドで選択するセルではないことを説明しましょう。操作：セルをコピーする Step8（p.68）ワークシートの G 列にはあらかじめ数式が入力されていることを説明しましょう。 5.3 ワークシートを操作するには（p.69）グラフシートとワークシートをまとめて、シート全体を指す場合は "Sheets コレクション" と表現します。シートの種類の区別なく操作する場合に使います。アクティブでないブックのワークシートを操作するには、コンテナの概念を使用してブックのオブジェクトからたどって指定するか、または、ブックをアクティブにする必要があることを補足しましょう。時間に余裕があれば、ブックをアクティブにする書式を紹介してもよいでしょう。

(14)

・ブックをアクティブにする 5.3.1 プロパティの値の取得と代入 ■ Count（カウント）プロパティ（p.70） Count プロパティは Worksheets コレクションに対して使うことを強調しましょう。 ■ Visible（ビジブル）プロパティ（p.70）本テキストでは、指定内容の "Worksheet オブジェクト" は、p.69 の「■ Worksheet（ワークシート）オブジェクト」を参照して指定することを表しています。 Visible プロパティは Worksheet オブジェクトに対して使うことを強調しましょう。 True、False の代わりに、定数 xlSheetVisible、xlSheetHidden を代入しても結果は同じです。ただし、この定数は Excel 2002 で追加されたため、Excel 2000 以前のバージョンでマクロを実行する場合は、使用できません。操作：ワークシートの枚数を取得する Step1（p.70）ワークシートの枚数も確認しておきましょう。操作：ワークシートを非表示にする Step1（p.72）シートが非表示になったことが確認しやすいように、シート "発注伝票" をアクティブにしておくことを説明しましょう。 Step4（p.72） True は真（-1）を、False は偽（0）を表すキーワードです。画面上では青色の文字で表示されています。ヒント： Excel でシートの表示/非表示の状態を切り替えるには（p.74） VBA でシートを非表示にしても Excel で表示できてしまうため、実際に実務で使用する場合には注意が必要です。シートの V i s i b l e プロパティに定数 x l V e r y H i d d e n または xlSheetVeryHidden を代入して非表示にすると、Excel でシートの表示/非表示が切り替えられなくなります。ただし、定数 xlSheetVeryHidden は Excel 2002 で追加されたため、 Excel 2000 以前のバージョンでマクロを実行する場合は、使用できません。 5.3.2 メソッドの実行（p.75） VBA のメソッドでワークシートの選択を行うと、Excel でアクティブシートにする必要がないことを強調しましょう。 ■ Activate（アクティベート）メソッド（p.75）本テキストでは、指定内容の "Worksheet オブジェクト" は、p.69 の「■ Worksheet（ワークシート）オブジェクト」を参照して指定することを表しています。 Activate メソッドは Worksheet オブジェクトに対して使うことを強調しましょう。書式 Workbook オブジェクト.Activate 引数 Workbook オブジェクト：選択したいブックを指定します。使用例 Workbooks("集計.xls").Activate ブック "集計" をアクティブにします。

(15)

ヒント：その他の選択方法（p.75）

Activate メソッドと Select メソッドの違いは、複数シートの選択です。Activate メソッドでは、複数シートの選択はできません。複数シートの選択は Select メソッドを使います。詳しくは、Visual Basic のヘルプを参照してください。 ■ Add（アド）メソッド（p.75） Add メソッドは Worksheets コレクションに対して使うことを強調しましょう。注意：ワークシートの挿入場所（p.75） Add メソッドには、省略可能な引数があります。引数を紹介しますので参考にしてください。 6 章 p.87 の「操作：シート数が 12 枚より少なければワークシートを追加する」で作成するマクロ "シート名変更" で使用します。・ Add メソッドの引数上記の使用例は、使用する引数名を指定して値を代入する記述方法です。引数名を記述しない場合は Worksheets.Add , Worksheets(3), 9 となります。ただし、引数名を指定した方がわかりやすいため、一般的に引数名を記述します。操作：ワークシートを選択する Step1（p.75）現在のアクティブシートは、Activate メソッドでアクティブにするシートではないことを説明しましょう。ヒント：オブジェクトの階層構造と指定方法（p.78）オブジェクトの階層構造の全体図はヘルプ「Microsoft Excel のオブジェクト」で参照することができます。第 6 章より高度な処理 6.1 変数とは（p.80）本テキストでは、変数を Dim ステートメントで明示的に宣言する方法や、データ型についての説明を省きます。ヒント：変数の名前の付け方（p.80）変数名は簡潔な名前を付けるように補足しましょう。また、2 文字目以降には、数字、アルファベット、全角文字が入力できることを説明しましょう。ただし、日本語など、全角文字で変数の名前を付けることができますが、入力に手間がかかるということもあり、一般的に全角文字は使わないということも補足しましょう。

書式 Worksheets.Add Before, After, Count

引数 Before ：シートの挿入場所を Worksheet オブジェクトで指定します。指定したシートの左に挿入されます。 After ：シートの挿入場所を Worksheet オブジェクトで指定します。指定したシートの右に挿入されます。 Count ：挿入するシート枚数を指定します。省略すると 1 枚挿入されます。使用例 Worksheets.Add After:=Worksheets(3),Count:=9 3 枚目のワークシートの右に 9 枚ワークシートを挿入します。

(16)

時間に余裕があれば、名前の規則を説明する際に、具体例を挙げましょう。下記に例を示します。・アンダースコア（_）以外の記号やスペースは使えない。（例）name.1 ・先頭に数字やアンダースコア（_）は使えない。（例）1name 同じような変数名を複数使いたいときは、記号ではなく name1、name2...と数値を後ろに付けるようにしましょう。・関数名など、VBA で既に定義されている単語は使えない。（例）msgbox VBA の定数（既に定められた名前の付いた値）の先頭に "vb" と "xl" が付くものが多いため、これらの文字は変数名の先頭に使わないようにしましょう。ヒント：文字列と変数を連結するには（p.80）文字列と変数を "&" でつなぐときは、ダブルクォーテーション（"）で囲む範囲に注意することを説明しましょう。誤って "&" や変数まで囲む場合があります。操作：セルの値を変数に代入する Step6（p.81）マクロ "シート名変更" に入力するステートメントの処理内容を説明しましょう。 ① 1 枚目のワークシートをアクティブにする ②変数 shiten にセル A1 の値を代入する ③文字列と変数 shiten の値を連結してメッセージを表示する 6.2 処理を繰り返すには（p.83）ループを行うステートメントは、本テキストで扱う "For...Next ステートメント" の他に "For Each...Next ステートメント" と "Do...Loop ステートメント" があります。・ For Each...Next ステートメント配列やコレクションの要素に対して、要素がなくなるまで処理を繰り返す。・ Do...Loop ステートメント条件を指定して、条件が満たされるまで、または、条件が満たしている間に処理を繰り返す。 ■ For...Next（フォーネクスト）ステートメント（p.83）カウンタの変数名は、一般的に "i" や "n" など短い名前を付けることを補足しましょう。また、 Next の後のカウンタ変数は省略できることも補足しましょう。引数の増加分に負の数値を指定すると、カウンタを減少させながら繰り返すことができます。使用例を参考にし、繰り返し実行されるステートメントの中で、カウンタが使用できることを説明しましょう。ヒント：その他の引数（p.83） "Exit For" を使用することができます。説明する必要はありませんが、参考までに紹介します。 Exit For ステートメントを使うと、最終値とは関係なく状況に応じてループを終了できます。一般的に、Exit For ステートメントは終了するための条件と組み合わせて使用します。 Worksheets(1).Activate ････････① shiten = Range("A1").Value ････････② MsgBox "支店名は「" & shiten & "」です" ････････③

(17)

For...Next ステートメントはステートメントの中に For...Next ステートメントを記述しネスト（入れ子）にすることができます。

操作：シート名の変更を 3 枚分繰り返す Step2（p.84）

シート名やシート数の状態は、Visual Basic Editor のプロジェクトエクスプローラでも確認できますが、本テキストではわかりやすくするため、Excel に切り替えて確認しています。 Step4（p.84）入力する For...Next ステートメントの処理内容を説明しましょう。また、Worksheet オブジェクトの Name プロパティについても p.85 の「ヒント： Worksheet オブジェクトの Name（ネーム）プロパティ」を参照して説明しましょう。 ①ループが 3 回になるよう、カウンタに使う変数 i の値を 1 から 3 に指定する ②変数 i で何枚目のワークシートか指定し、変数 shiten とカウンタの変数 i と文字 "月" を結合してシート名に代入する処理を繰り返す ③カウンタの変数 i の値を 1 加算して、For ステートメントに戻す For...Next ステートメント内の変数 i を "1" と間違えずに入力するよう注意するように説明しましょう。また、メッセージ内容も忘れずに変更するように説明しましょう。 For...Next ステートメントの "For"、"To"、"Next" は青色の文字で表示されるキーワードです。ヒント： Worksheet オブジェクトの Name（ネーム）プロパティ（p.85）本テキストでは、指定内容の "Worksheet オブジェクト" は、p.69 の「■ Worksheet（ワークシート）オブジェクト」を参照して指定することを表しています。本テキストではデータ型を特に意識してはいませんが、Name プロパティの値は文字列型です。そのため、取得して返される値、代入する値は文字列型の値です。 For i = 1 To 3 ････････①

Worksheets(i).Name = shiten & i & "月" ････････②

Next i ････････③ 書式 For カウンタ = 初期値 To 最終値 Step 増加分ステートメント Exit For ステートメント Next カウンタ使用例 For i = 1 To 3 MsgBox i & "回目のメッセージ表示"

owari = MsgBox ( "終了しますか？",vbYesNo) If owari = vbYes then

Exit For End If Next i

メッセージを表示する処理を 3 回繰り返します。"終了しますか？"というメッセージで［はい］が選択されたときは、直ちにループを終了します。

(18)

6.3 条件に応じて処理を実行するには（p.86）条件分岐を行うステートメントは他に、Select Case ステートメントがあります。・ Select Case ステートメント 1 つの条件に対して、複数の条件分岐ができる。 ■ If...Then...Else（イフゼンエルス）ステートメント（p.86） If...Then...Else ステートメントはステートメントの中に If...Then...Else ステートメントを記述し、ネスト（入れ子）することができます。書式には、ブロック形式と単一行形式があります。単一行形式は短く簡単な条件判断を行うときに使用しますが、本テキストでは、一般的によく使われるブロック形式のみ紹介しています。また、ElseIf 節を指定して複数の条件を指定することもできます。ElseIf 節は複数使用することができます。説明する必要はありませんが、参考までに書式を紹介します。書式 ■単一行形式 If 条件式 Then 真の場合 Else 偽の場合 ■ブロック形式 If 条件式 Then 真の場合

ElseIf ElseIf の条件式 Then ElseIf の真の場合 Else 偽の場合 End If 引数 ElseIf の条件式：引数の条件式と同じように、条件式を指定します。 ElseIf の真の場合：引数の ElseIf の条件式を満たす場合に実行させたい処理を指定します。偽の場合：ElseIf 節を指定した場合には、条件式と ElseIf の条件式共に満たしていないときに処理を実行します。

使用例 If Range("C5") = "男" Then Msgbox "男性" Else Msgbox "女性"

セル C5 の値が、"男" ならば "男性"、"男" でなければ "女性"とメッセージを表示します。

If Range("E5") >= 70 Then Msgbox "優"

ElseIf Range("E5") >= 50 Then Msgbox "良" Else Msgbox "可" End If セル E5 の値が、70 以上ならば "優"、50 以上 70 未満ならば "良"、50 未満ならば "可" とメッセージを表示します。

(19)

条件式で使われる演算子です。 ■比較演算子演算子意味演算子意味 < より小さい > より大きい <= 以下 >= 以上 = 等しい <> 等しくない ■論理演算子演算子意味使用例

Not 論理否定 Not(kazu >=2) 変数 kazu が 2 以上でない And 論理積 kazu >=2 And kazu <= 10 変数 kazu が 2 以上かつ 10 以下 Or 論理輪 kazu <=3 Or kazu >=5 変数 kazu が 3 以下または 5 以上

6.3.1 条件が真のときのみ実行操作：シート数が 12 枚より少なければワークシートを追加する Step2（p.88）入力する If...Then...Else ステートメントの処理内容を説明しましょう。また、Worksheets コレクションの Add メソッドの引数についても、p.88 の「ヒント：条件を指定してワークシートを挿入する」を参照して説明しましょう。 ①"既存のシート数が 12 より小さければ" という条件式を指定する ② 3 枚目のワークシートの右に 9 枚のワークシートを追加する ③ If...Then...Else ステートメントを終了する For...Next ステートメントの引数の終了値を "12" に変更し忘れないように注意するよう説明しましょう。

If...Then...Else ステートメントの "If"、"Then"、"Else"、"End If" は青色の文字で表示されるキーワードです。なお、通常は現在のシート数との差分をブックに追加するように作成しますが、ここでの学習目的である「条件式」のポイントを明確にするために、既存のシートが 3 枚という前提にしています。ヒント：条件を指定してワークシートを挿入する（p.88）引数を 2 つ以上指定する場合は、カンマ（,）で区切ることを再度補足しましょう。操作：シート数が 12 枚の場合の動作を確認する Step6（p.89）ブック "月別部門売上" は引き続き 7 章で使用するため、閉じないように説明しましょう。 6.3.2 条件の真偽に応じて処理を分岐操作：パスワードチェック機能を作成する Step3（p.91）入力する If...Then...Else ステートメントの処理内容を説明しましょう。また、InputBox 関数についても、p.92 の「ヒント： InputBox（インプットボックス）関数」を参照して説明しましょう。 If Worksheets.Count < 12 Then ････････① Worksheets.Add After:=Worksheets(3), Count:=9 ････････②

(20)

①シート "パスワード" のセル B2 の値を変数 sheetPass に代入する ②"パスワードを入力してください" というメッセージボックスを表示して、入力された値を変数 inputPass に代入する ③変数 sheetPass の値と変数 inputPass の値が等しいか判断する条件式を指定 ④真ならばシート "パスワード" を表示する ⑤真ならばシート "東京年間売上" を表示する ⑥ Else 節を指定して偽の処理を分ける ⑦偽ならば "パスワードが間違っています" とメッセージを表示する ⑧ If...Then...Else ステートメントを終了する "True"、"False" は青色の文字で表示されるキーワードです。ヒント： InputBox（インプットボックス）関数（p.92） InputBox 関数には、その他にも省略可能な引数があります。説明する必要はありませんが、参考までに引数を紹介します。InputBox 関数は戻り値があるため、必ず引数をかっこで囲む必要があることを説明しましょう。 sheetPass = Worksheets("パスワード").Range("B2").Value ････････① inputPass = InputBox("パスワードを入力してください") ････････② If sheetPass = inputPass Then ････････③ Worksheets("パスワード").Visible = True ････････④ Worksheets("東京年間売上").Visible = True ････････⑤ Else ････････⑥ MsgBox "パスワードが間違っています" ････････⑦ End If ････････⑧ 書式 InputBox(メッセージ, タイトル, 既定値, 水平位置, 垂直位置, ヘルプ, コンテキスト) 引数タイトル：ダイアログボックスのタイトルバーに表示される文字列を指定します。既定値：テキストボックスに、既定値として表示する文字列式を指定します。水平位置：画面の左端からダイアログボックスの左端までの水平方向の距離を、twip 単位で示す数式を指定します。垂直位置：画面の上端からダイアログボックスの上端までの垂直方向の距離を、twip 単位で示す数式を指定します。ヘルプ：ダイアログボックスに状況依存のヘルプを設定するために、使用するヘルプファイルの名前を指定します。引数のコンテキストと一緒に指定します。コンテキスト：ヘルプトピックに指定したコンテキスト番号を表す数式を指定します。引数のヘルプファイルと一緒に指定します。使用例 bumon = InputBox("部門名を入力してください", "部門名入力", "東京") タイトルバーにタイトルを表示し、テキストボックスに既定値を割り当てます。

(21)

操作：パスワードが一致した場合を確認する Step3（p.92）半角で入力するよう説明しましょう。操作：パスワードが不一致だった場合を確認する Step2（p.93）条件が偽の場合の動作を確認する前準備として、再びシート "パスワード" とシート "東京年間売上" を非表示にすることを説明しましょう。 Step14（p.94）ブック "年間部門売上" は引き続き 7 章で使用するため、閉じないように説明しましょう。第 7 章マクロの登録 7.1 図形に登録するには操作：図形に文字を追加する Step5（p.98）図形に文字列を追加するまでは、図形をクリックすれば選択ができますが、文字列を追加した後は、図形をクリックするとカーソルが表示され、文字列が選択されます。図形の外枠をクリックするように補足しましょう。 Step8（p.99）図形の選択の解除は、任意のセルをクリックするか、Esc キーを押すことを補足しましょう。操作：図形にマクロを登録する Step2（p.100）図形にマクロを登録すると、図形をクリックしてもマクロが実行されるようになり、図形の選択ができません。図形を選択するには、Ctrl キーを押しながら図形をクリックするか、［図形描画］ツールバーの［オブジェクトの選択］ボタンを使います。 7.2 ツールバーに登録するには 7.2.1 ボタンにマクロを登録する操作：新規ツールバーを作成する Step5（p.104）作成した［パスワードチェック］ツールバーが［ユーザー設定］ダイアログボックスと重なる場合があります。必要に応じて、移動するように説明しましょう。次の操作でも［ユーザー設定］ダイアログボックスを使用します。閉じないように説明しましょう。ツールバーの名前は、ツールバー上では確認できません。［ユーザー設定］ダイアログボックスで確認するように説明しましょう。新規ツールバーの名前が間違っていた場合には、［ユーザー設定］ダイアログボックスの［ツールバー］の［名前の変更］をクリックして書き換えます。操作：ツールバーにボタンを追加する Step2（p.105）間違えて異なるボタンを追加してしまった場合は、まずツールバーからボタンを削除し、再度正しいボタンを追加し直します。次の操作でも［ユーザー設定］ダイアログボックスを使用します。閉じないように説明しましょう。

(22)

操作：ボタンイメージを変更する Step1（p.107）ツールバーのボタンイメージをコピーすることもできます。 ①コピー元となるボタンを含むツールバーと［ユーザー設定］ダイアログボックスが表示されていることを確認する。 ②コピー元のボタンのショートカットメニューの［ボタンイメージのコピー］でコピーする。 ③コピー先のボタンのショートカットメニューの［ボタンイメージの貼り付け］で貼り付ける。 Step2（p.107）ボタンイメージを元に戻すには、［ユーザー設定］ダイアログボックスを表示した状態で、対象となるボタンを右クリックし、ショートカットメニューの［ボタンイメージを元に戻す］をクリックします。次の操作でも［ユーザー設定］ダイアログボックスを使用します。閉じないように説明しましょう。操作：ボタンに登録したマクロを実行する（p.109）［ユーザー設定］ダイアログボックスを閉じると、登録したマクロが実行できることを強調しましょう。 7.2.2 メニューにマクロを登録する操作：ツールバーにメニューを追加する Step6（p.111）追加する位置を間違えた場合には、［ユーザー設定］ダイアログボックスを表示した状態で、メニューコマンドをドラッグし、位置を移動します。 Step10（p.112）次の操作でも［ユーザー設定］ダイアログボックスを使用します。閉じないように説明しましょう。 7.2.3 ツールバーをブックに添付する操作：ツールバーをブックに添付する Step3（p.115）添付したツールバーをブックから削除するには、［ユーザー設定］ダイアログボックスで［添付］をクリックして［ブックへのツールバーの登録］ダイアログボックスを表示します。［ツールバーの登録］ボックス（Excel 2000 の場合は［登録ツールバー］ボックス）の一覧から削除するツールバーを選択します。［コピー］ボタンが［削除］ボタンに変わったことを確認し、クリックします。ブックに添付したツールバーに変更が生じた場合は、ツールバーを添付し直す必要があります。その場合はツールバーをブックから削除し、再度添付し直します。ヒント：ユーザー設定ツールバーの削除（p.115）時間に余裕があれば、実際に［パスワードチェック］ツールバーを削除しましょう。セミナーの後処理で［パスワードチェック］ツールバーを削除する手間が省けます。

(23)

Microsoft®_{Excel セミナーテキスト VBA 入門編［2000/2002 対応］} 講習の手引き 2003 年 5 月 12 日発行 2003 年 12 月 22 日第 2 版発行著作・制作日経 BP ソフトプレス発行日経 BP ソフトプレス東京都千代田区平河町 2 − 7 − 1 〒 102-0093 FAX （03）3221-6138 電子メール [email protected]