Word VBA基本＆活用テクニック Part 1

(1)

1-1 VBAを利用する前の準備

■

マクロとVBA

アプリケーションの内部的な操作を自動化する機能のことを、マクロといいます。マクロを利用することで、毎日（あるいは毎週・毎月）のように繰り返し行われる一連の定型的な作業を、すべてアプリケーション任せで自動的に実行できるようになります。ただし、マクロ機能の具体的な仕様は、アプリケーションによっても異なります。すべての機能をマクロに登録できるアプリケーションもあれば、一部の機能しか登録できないアプリケーションもあります。マクロへの機能の登録方法も、実際に一連の操作を行って記録させる方式や、操作項目を選択して登録していく方式、一種の専用プログラミング言語を利用して登録していく方式など、アプリケーションによってさまざまです。 WordやExcelの場合、アプリケーションの中で行った操作の手順をそのまま記録して、マクロとして登録することができます。記録されたマクロは自動的にVBAという一種のプログラミング言語の形で記述され、ユーザーは専用の編集画面である「Visual Basic Editor」（VBE）で、そのプログラムを修正することも可能です。また、記録機能を利用することなく、VBEで直接新しいマクロプログラムを作成することもできます。

VBAというのはVisual Basic for Applicationsの略で、文字通り「アプリケーション用のVisual Basic」という意味です。プログラミング言語である Visual Basicの基本仕様を踏襲しつつ、アプリケーションの中でマクロ用の言語として使用できるようにしたものがVBAです。 Wordのマクロは、Wordの文書またはテンプレートのファイル内に保存されます。特に、複数の作業で共通して使用したいマクロは、Wordの標準テンプレート（Normal.dotm）に保存します。本書では、個々の文書に、その作業に関連したマクロを保存するという前提で、以降の解説を行っていきます。

■

Word 2010でVBAを使用する前の準備

Word 2010でVBAの機能を使用する場合、作業を開始する前に設定を変更しておいたほうがいい点がいくつかあります。VBA関連の操作は［開発］タブで行いますが、Office 2010の初期設定の状態では［開発］タブは表示されていないため、これが表示されるように設定を変更します。記述されたプログラムのことをコードとも呼びます。 Wordの場合、実際の作業では、個々の文書よりも複数の文書で使用したいマクロのほうが多いかもしれません。標準テンプレートの扱いについては、230 ページを参照してください。

(2)

［ファイル］タブをクリックし、［オプション］をクリックします。［Wordのオプション］ダイアログボックスが表示されます。［リボンのユーザー設定］をクリックし、右側の［メインタブ］の一覧の［開発］をクリックしてチェックをオンにし、［OK］ボタンをクリックします。 Word 2007 の場合は、［Office］ボタンから［Word のオプション］をクリックして［Word のオプション］ダイアログボックスを表示させ、［基本設定］の画面で［[開発] タブをリボンに表示する］のチェックをオンにすると、［開発］タブが表示されます。

(3)

これで、リボンに［開発］タブが表示されます。ここから、まずマクロのセキュリティに関する設定を確認しましょう。［開発］タブをクリックし、［コード］グループの［マクロのセキュリティ］をクリックします。［セキュリティセンター］ダイアログボックスの［マクロの設定］の画面が表示されます。［マクロの設定］が［警告を表示してすべてのマクロを無効にする］になっていることを確認します。これ以外の設定になっている場合は、この通りに変更してください。

(4)

さらに［メッセージバー］をクリックし、［メッセージバーの表示］で［ActiveXコントロールやマクロなどのアクティブコンテンツがブロックされた場合、すべてのアプリケーションにメッセージバーを表示する］が選択されていることを確認します。［OK］ボタンをクリックします。以上のような設定でマクロが含まれているWord文書を開くと、［セキュリティの警告］メッセージバーが表示されます。この文書のマクロを有効にするには、［コンテンツの有効化］ボタンをクリックします。メッセージバーが消えて、マクロが有効になります。また、この操作を実行すると、開いたWord文書が信頼済みドキュメントとして記録され、これ以降

Visual Basic Editor （28 ページ参照）を開いている状態で、マクロを含む文書を開こうとすると、［Microsoft Word のセキュリティに関する通知］ダイアログボックスが表示されます。安全性の確認されている文書であれば、［マクロを有効にする］ボタンをクリックして文書を開きます。

(5)

は常にマクロが有効な状態で開けるようになります。なお、一時的にマクロを有効にしたいが、信頼済みドキュメントとしては登録したくない（以後も［セキュリティの警告］メッセージバーが表示されるようにしたい）場合は、［ファイル］タブの［情報］の［セキュリティ警告］で、［コンテンツの有効化］から［詳細オプション］をクリックします。［Microsoft Officeセキュリティオプション］ダイアログボックスが表示されるので、［このセッションのコンテンツを有効にする］を選択し、［OK］ボタンをクリックします。ここで紹介した手順はWord 2010の場合です。Word 2007の場合、［セキュリティの警告］メッセージバーには［コンテンツの有効化］ボタンではなく［オプション］ボタンが表示され、クリックすると［Microsoft Officeセキュリティオプション］ダイアログボックスが表示されます。［このコンテンツを有効にする］を選択して［OK］ボタンをクリックすると、マクロが有効になります。 Word 2010のように「信頼済みドキュメント」として登録されるわけではなく、文書を開くたびにこの操作を行う必要があります。

(6)

■

信頼できる場所を設定する

いくつかのフォルダーは、あらかじめ信頼できる場所として設定されています。これらのフォルダーに保管されたVBAを含むファイルは、［セキュリティの警告］メッセージバーなどが表示されることなく、そのままマクロが有効な状態で開くことができます。また、ユーザーが指定したフォルダーを「信頼できる場所」として設定することも可能です。［開発］タブの［マクロのセキュリティ］をクリックします。［セキュリティセンター］ダイアログボックスが表示されます。［信頼できる場所］をクリックすると、信頼できる場所として設定されたフォルダーのパスが一覧表示されます。これら以外に信頼できる場所を追加するには、［新しい場所の追加］ボタンをクリックします。

(7)

［Microsoft Officeの信頼できる場所］ダイアログボックスが表示されたら、［参照］ボタンをクリックします。表示される［参照］ダイアログボックスで信頼できる場所に設定したいフォルダーを選択します。［OK］ボタンをクリックします。［Microsoft Officeの信頼できる場所］ダイアログボックスに選択したフォルダーのパスが入力されるので、［OK］ボタンをクリックします。［セキュリティセンター］ダイアログボックスに戻ります。［信頼できる場所］に指定したフォルダーが追加されているのを確認したら、［OK］ボタンをクリックします。これで、そのフォルダーが信頼できる場所として登録されます。

(8)

このフォルダーに保管されたマクロを含むWord文書は、常にVBAが有効な状態で開かれます。また、この信頼できる場所の設定は、Wordだけでなく Excelのブックなどでも共通です。信頼できる場所の設定を解除したい場合は、この［セキュリティセンター］ダイアログボックスの［信頼できる場所］で、登録されたパスをクリックして選択し、［削除］ボタンをクリックします。

■

Word 2007以降の文書形式について

Word 2003までは、マクロを含む文書も含まない文書も、すべて「.doc」という拡張子の同一形式のファイルとして保存されていました。 Word 2007以降では、通常の文書は「.docx」という拡張子で保存されますが、このファイル形式ではマクロを含めて保存することはできません。マクロを含む文書は、以下のような手順で、マクロ有効文書として保存します。［ファイル］タブをクリックし、［名前を付けて保存］をクリックします。 Word 2007 と Word 2010の文書のファイル形式も、まったく同じというわけではありません。詳しくは 71 ページを参照してください。

(9)

ファイルを保存する場所（フォルダ）とファイル名を指定し、［ファイルの種類］で［Wordマクロ有効文書］を選択して、［保存］ボタンをクリックします。これで、マクロが使用可能な「.docm」という拡張子の文書として保存されます。

■

マクロを記録する

Wordでは、文書上でユーザーが行った一連の操作を記録して、マクロの「実体」であるVBAのプログラムコードを自動的に生成させることができます。ここでは、Word 2010で作成した新規文書に、文章を入力してその一部の書式を変更するマクロを、記録機能を使って登録します。［開発］タブの［コード］グループの［マクロの記録］をクリックします。

(10)

［マクロの記録］ダイアログボックスで、［マクロ名］として「InputWords」と入力します。そして、［マクロの保存先］を［すべての文書（Normal.dotm）］から［文書 1（文書）］に変更し、［OK］ボタンをクリックします。マクロとして登録したい操作を行います。ここでは、まず「新しいマクロを作成します。」と入力します。マクロの記録中は、カーソルの移動や文字列の選択にマウスを使用することはできません。［←］キーを使用してカーソルを左に移動し、さらにShiftキーと［←］キーを同時に押して「マクロ」という文字列を選択します。「新しい」「マクロを」「作成します」「。」のように 1 文節ずつ区切って入力し、そのつどEnterキーで確定していかないと、正しく記録されないので、注意が必要です。「文書 1」の部分は、実際には作業中の文書ファイル名になります。また、［マクロを割り当てる対象］については23ページで改めて説明します。

(11)

［ホーム］タブの［フォント］グループの［太字］をクリックして、選択した文字を太字に変更します。［開発］タブの［コード］グループの［記録終了］をクリックします。これで、マクロの記録が終了します。なお、ここでは［マクロの保存先］として現在作業中の文書を選んだため、作成したマクロはこの文書でしか使用できませんが、［すべての文書（Normal.dotm）］を選択すると、どの文書を開いているときでも作成したマクロを使用することができます。 Nomal.dotm については254ページを参照してください。本書の Word 2007 版では、ここでフォントの色を変更していますが、Word 2010では、文字色を変更する操作をマクロとして記録することができなくなっています。

(12)

■

マクロを割り当てる

［マクロの記録］ダイアログボックスで、［マクロを割り当てる対象］の［ボタン］をクリックするとクイックアクセスツールバーのボタンから、［キーボード］をクリックするとショートカットキーから、それぞれ登録したマクロを実行できるようになります。まず、［ボタン］をクリックした場合について説明します。［Wordのオプション］ダイアログボックスの［クイックアクセスツールバー］の画面が表示されます。［クイックアクセスツールバーのユーザー設定］の部分を「文書1に適用」に変更し、左側のフィールドで新規作成するマクロ名をクリックして選択し、［追加］ボタンをクリックします。「文書 1」の部分は、実際には作業中の文書ファイル名になります。また、マクロの保存先を［すべての文書（Normal.dotm）］にした場合、［クイックアクセスツールバーのユーザー設定］の部分は「すべてのドキュメントに適用（既定）」のままにします。

(13)

選択したマクロ名が右側のフィールドに追加されます。［OK］ボタンをクリックしてこのダイアログボックスを閉じると、マクロの記録が開始されます。以下、マクロ化したい一連の操作を実行し、マクロの記録を終了します。クイックアクセスツールバーに表示されているマクロ実行用のボタンをクリックすると、記録したマクロを実行することができます。次に、［マクロの記録］ダイアログボックスで［キーボード］をクリックした場合について説明します。このボタンをクイックアクセスツールバーから削除したい場合は、ボタンを右クリックして［クイックアクセスツールバーから削除］をクリックします。

(14)

［キーボードのユーザー設定］ダイアログボックスが表示されます。ここで、マクロの実行に割り当てたいキーを実際に押します。マクロを割り当てることができるキーとしては、Ctrlキーと文字キーの組み合わせや、一部の機能キーなどがあります。また、［保存先］として「文書1」を選択し、［割り当て］ボタンをクリックします。さらに［閉じる］ボタンをクリックすると、マクロの記録が開始されます。以下、マクロ化したい一連の操作を実行し、マクロの記録を終了します。 Wordでの作業中に、割り当てたキーを押すと、記録したマクロを実行することができます。

■

記録後にマクロを割り当てる

作成済みのマクロを、後からボタンやキーボードに登録することも可能です。マクロの記録時に登録するのを忘れていた場合や、直接コードを記述して作成したマクロを簡単に実行したい場合などにこの操作を行います。「文書 1」の部分は、実際には作業中の文書ファイル名になります。また、マクロの保存先を［すべての文書（Normal.dotm）］にした場合、［保存先］は「Normal」のままにします。

(15)

ボタンやキーボードに登録したいマクロが含まれている文書で作業している状態で、クイックアクセスツールバーを右クリックし、［クイックアクセスツールバーのユーザー設定］をクリックします。［Wordのオプション］ダイアログボックスの［クイックアクセスツールバー］の画面が表示されます。［コマンドの選択］で「マクロ」を、［クイックアクセスツールバーのユーザー設定］で「文書1に適用」を選択します。そして、左側のフィールドに表示されるマクロをクリックして選択し、［追加］ボタンをクリックします。選択したマクロが右側のフィールドに追加されたら、［ＯＫ］ボタンをクリックします。これで、マクロ実行ボタンがクイックアクセスツールバーに追加されます。また、Word 2010では、同様の手順で、マクロをリボンの任意のタブにボタ「文書 1」の部分は、実際には作業中の文書ファイル名です。また、Normal.dotm のマクロの場合、［クイックアクセスツールバーのユーザー設定］の部分は「すべてのドキュメントに適用（既定）」にします。

(16)

ンとして追加することができます。一方、マクロをキーボードに登録したい場合は、［Wordのオプション］ダイアログボックスの［リボンのユーザー設定］の画面で、ショートカットキーの［ユーザー設定］ボタンをクリックします。［キーボードのユーザー設定］ダイアログボックスが表示されます。［保存先］として「文書1」を、［コマンドの指定］の［分類］で「マクロ」を選択し、［マクロ］でキーボードを登録したいマクロを選択します。［割り当てるキーを押してください］というフィールドをクリックして、登録したいキーを実際に押し、［割り当て］ボタンをクリックします。さらに［閉じる］ボタンをクリックすると、設定したショートカットキーでマクロを実行できるようになっています。

■

マクロを実行する

マクロをクイックアクセスツールバーやショートカットキーから実行できるように設定した場合はそれらを使えば簡単ですが、ここでは基本的な手順として、リボンの［マクロ］コマンドからマクロを実行する方法を紹介します。マクロを実行したい位置にカーソルを移動して、［開発］タブの［コード］グ「文書 1」の部分は、実際には作業中の文書ファイル名です。また、Normal.dotm のマクロの場合、［保存先］は「Normal」にします。なお、マクロに登録したキーボードの設定を解除したい場合は、ここで「現在のキー」の設定を選択して、［削除］ボタンをクリックします。 Word 2007 でもリボンにマクロ実行用のボタンを表示させることは可能ですが、手順がやや複雑になります。

(17)

ループの［マクロ］をクリックします。

［マクロ］ダイアログボックスが表示されます。［マクロ名］欄に表示されるマクロの一覧から、実行したいマクロをクリックして選択し、［実行］ボタンをクリックします。

これで、選択したマクロが実行されます。

■

Visual Basic Editorを開く

マクロの「内容」であるVBAのソースコードを確認するには、Visual Basic Editor（VBE）を表示させます。VBEでは、記録機能で作成されたマクロを確認・編集するだけでなく、新しいマクロを一から作成することも可能です。［開発］タブの［コード］グループの［Visual Basic］をクリックします。 AltキーとF8キーを同時に押しても、［マクロ］ダイアログボックスが表示されます。

(18)

これで、VBEが、Wordのウィンドウとは別のウィンドウで表示されます。

■

Visual Basic Editorの構成

Visual Basic Editor（VBE）を開くまでの操作はWord 2007以降と2003 以前で異なりますが、一度開いてしまえば、ほとんど同様の手順で操作を行うことができます。VBEの画面は、下のような構成になっています。・プロジェクトエクスプローラー「プロジェクト」とはVBAのプログラムを記録する単位で、Wordの場合はほぼ1つの文書に相当します。プロジェクトには、実際にVBAのプログラムを書くことができる場所である「モジュール」が含まれており、プロジェクトエクスプローラーでは各モジュールをアイコンで表しています。同じ種類のモジュールは、通常、フォルダーでグループ化されて表示されます。・プロパティウィンドウ選択されている「オブジェクト」の「プロパティ」の値を表示するものです。ここでプロパティの値を変更することも可能です。・コードウィンドウプロジェクトエクスプローラーで選択されたモジュールの内容を表すウィンドウです。テキストエディターと同様の感覚で、コードを入力・編集できます。コードウィンドウプロジェクトエクスプローラープロパティウィンドウ「オブジェクト」と「プロパティ」については、いずれも37ページを参照してください。 AltキーとF11キーを同時に押しても、 Visual Basic Editor が表示されます。

(19)

1-2 VBAの基本構造

■

プロジェクトとモジュール

Visual Basicの用語で、1つのまとまった処理を行うためのプログラムの集合体をプロジェクト（Project）といいます。Word VBAの場合は、とりあえず、 Wordの文書ファイルやテンプレートをVBAの側から見たものをプロジェクトと呼ぶ、と理解しておけばいいでしょう。プロジェクトの中で、実際にVBAのコードを記述する場所のことをモジュールといい、Visual Basic Editor（VBE）のプロジェクトエクスプローラーで確認することができます。モジュールにもいくつか種類がありますが、Wordのマクロ記録機能などで作成されるマクロ、つまりVBAのプログラムは、標準モジュールに記述します。標準モジュールは、初期状態ではWordのプロジェクト（文書ファイル／テンプレート）には含まれていません。マクロ記録機能でマクロを作成した場合は自動的に標準モジュールも作成されますが、一からVBAのプログラムを記述する場合は、まず新しい標準モジュールを作成する必要があります。複数の文書（プロジェクト）が開かれている場合は、プロジェクトエクスプローラーで目的の文書、またはその文書の中のいずれかのモジュールをクリックして選択し、VBEの［挿入］メニューから［標準モジュール］をクリックします。選択されたプロジェクトの中に新しい標準モジュールが作成され、そのコードウィンドウが表示されます。このコードウィンドウに、VBAのコードを記述していきます。マクロを含めて保存できる文書の形式については19ページを参照してください。

(20)

VBAのコードは、主として各種のキーワードと、処理対象となるデータによって構成されます。キーワードというのはVBAであらかじめ定義された、命令などに用いられる語のことです。また、データとしては、数値などがコード中にそのまま記述される場合と、変数などの名前を使って記述される場合とがあります。なお、VBEの画面で行った操作は、対象のプロジェクトである文書ファイルまたはテンプレートに保存されます。VBEのツールバーの［上書き保存］ボタンをクリックして保存することもできますが、Wordの通常画面を開いて文書を保存しても、VBEでの変更内容も併せて保存されます。

■

Subプロシージャの作成

VBAのプログラムは、1つの処理のまとまりをプロシージャという単位で扱います。プロシージャにもいくつか種類がありますが、Wordのマクロは「Sub」というキーワードで始まるSubプロシージャです。新しいSubプロシージャは［挿入］メニューから作成することもできますが、ここでは直接コードウィンドウに入力して、「MyMacro」という名前のSubプロシージャを作成しましょう。標準モジュールのコードウィンドウに「Sub MyMacro」と入力し、Enterキーを押します。変数については 41 ページを参照してください。作成された標準モジュール標準モジュールのコードウィンドウ

(21)

プロシージャ名である「MyMacro」の後に自動的に「()」が付き、さらに1行空けて「End Sub」という行が入力されます。この「Sub MyMacro()」と「End Sub」の間の行に、VBAのコードを入力していきます。なお、この「MyMacro」というプロシージャ名は、そのままマクロ名として Wordの［マクロ］ダイアログボックスにも表示されます。つまり、1つのSubプロシージャはVBAにおける1つの処理のまとまりであり、1つのマクロとして実行することができます。「Sub」はVBAのキーワードですが、「MyMacro」のようなプロシージャ名（マクロ名）の部分には、プログラム作成者が好きな名前を付けることができます。ただし、文字数は半角255文字以内で、スペースや「.」、「!」、「@」などほとんどの記号類は使用できず、先頭文字を数字にすることもできません。なお、日本語は使用可能です。プロシージャ名以外にも、VBAではユーザーが名前を付けられるものがいくつかありますが（変数、定数など）、そのいずれの場合でも命名の規則はほぼ同様です。マクロ名を入力してEnter 「_」（アンダースコア）は使用可能ですが、この記号には特定の役割もあるため、使用する際は注意が必要です。

(22)

■

VBAのコードの基本ルール

「Sub マクロ名()」と「End Sub」の間には、原則として1行に1つの処理を記述していきます。このSubプロシージャを実行すると、基本的には、上から1行ずつ順番に実行されていきます。マクロ記録で生成されたSubプロシージャでは、「Sub マクロ名()」と「End Sub」の間の行は、通常、インデント（字下げ）されていますが、ユーザーが一からSubプロシージャを作成する場合も、Tabキーを使って同様にインデントしたほうがわかりやすくなります。コードの内容によっては、処理のまとまりを表すために、さらにもう1段階インデントする場合もあります。コードの中で、見やすくするために空白行を空けることも可能です。この場合も、やはり上から順番に、記述された行の処理が実行されていきます。空白行は無視されます。コードの実行順インデント空白行具体的にどのような場合にインデントのレベルを変えるかについては、後の節の解説で、自然とわかっていくと思います。

(23)

1行が長くなりすぎた場合、適当な位置に改行を入れて2行に分けることができます。その場合、改行する位置の末尾には行継続文字として「 _」（半角スペースとアンダースコア）を入れます。VBAでは、行継続文字で終わっている行は、次の行とつながっているものと見なされます。コードウィンドウには、コードとしての意味のある単語以外に、ちょっとした説明や覚え書きを入れるためのコメントを書き込むことができます。「Rem」というキーワードで始まる行は、その行全体がコメントと見なされます。また、行の中に「'」（シングルクォーテーション）が出てきた場合、その位置以降がコメントと見なされます。

■

VBAで扱えるデータ

VBAのコードの中で扱えるデータは、大きく分けて、数値、文字列、オブジェクトの3種類です。いずれも実際にはより細分化されて扱われますし、これ以外の種類のデータもないわけではありませんが、VBAの勉強を始めた最初の段階ではとりあえずこの3つに分けて理解しておけばいいでしょう。数値は、コードの中に直接指定できます。たとえば、次のコードは、メッセージボックスに「12」と表示します。キーワードなどの語句の途中や、「” “」で囲まれた文字列の途中などに行継続文字を入れて改行することはできません。コメントは、コードウィンドウ内では通常、緑色の文字で表示されます。行継続文字データの種類は、41 ページでもう少し詳しく説明します。また、オブジェクトについては37ページ以降で詳しく説明します。 MsgBox 12 Sample file Pt1P034_01.docm

(24)

「MsgBox」は、「組み込み関数」と呼ばれる種類のVBAのキーワードですが、ここでは「指定したデータをメッセージボックスに表示する命令」とでも理解しておいてください。一方、文字列は、前後を「" "」で囲んで指定します。次のコードは、メッセージボックスに「こんにちは！」と表示します。

■

ステートメントと式

ステートメントというのは、コードにおける処理の実行単位です。通常、1行が1つのステートメントになりますが、複数の行がセットで1つのステートメントとなる場合もあります。たとえば、Subプロシージャの開始と終了を表す「Sub マクロ名()」と「End Sub」も、この2行がセットになって1つの「Subステートメント」と呼ばれます。また、1行のステートメントの中でも、実際にはさまざまな処理が行われて MsgBox 関数については56ページでも説明します。組み込み関数は、厳密に言うと Global オブジェクトのメソッドです。

MsgBox "こんにちは！" Sample file Pt1P035_01.docm

(25)

います。その部分だけではコードとして実行できないが、演算などの処理の結果として何らかのデータを返す部分を式といいます。式によって返されるデータとしては、数値や文字列、またはオブジェクトなどがあります。式を処理してその結果を求めることを、式を「評価する」ともいいます。式を使って、コードの中で数値の計算を行うこともできます。たとえば、次のコードは、「2 + 3」という式の計算結果をメッセージボックスに表示します。この式で使われている「+」のような記号を演算子といい、特に数値同士の計算に使用するものを算術演算子といいます。VBAの式で使用できる算術演算子には、以下のようなものがあります。また、「&」という記号は、2つの文字列を結合する機能を持った文字列演算子です。 MsgBox 2 + 3 演算子使い方機能 + 数値1 + 数値2 数値1と数値2の和を返す - 数値1 – 数値2 数値1から数値2を引いた差を返す * 数値1 * 数値2 数値1と数値2の積を返す / 数値1 / 数値2 数値1を数値2で割った商を返す \ 数値1 ¥ 数値2 数値1を数値2で割った商の整数部分を返す Mod 数値1 Mod 数値2 数値1を数値2で割った商の余りを返す ^ 数値1 ^ 数値2 数値1を数値2でべき乗した値を返す Sample file Pt1P036_01.docm

(26)

VBAの演算子の種類は算術演算子と文字列演算子だけではありませんが、これら以外の演算子については、以降の解説の中で、具体的な用例とともに紹介していきます。

■

VBAのオブジェクト操作の基本

VBAのステートメントの書式にはいくつかのパターンがありますが、主に使用されているのは、「オブジェクト」を使用する次の2つのパターンです。オブジェクトというのは、ここでは、いわば処理の対象となる「モノ」とでも理解しておいてください。オブジェクトにはどのようなものがあり、どのように指定するかについては、後の節で詳しく説明します。メソッドというのは、いわば対象の「モノ」に対して行う「操作」のことです。たとえば、選択された文字列の範囲をオブジェクトとして指定し、これに対して「削除する」という操作を表すメソッドを指定することで、選択範囲の文字列を削除することができます。このようなコードでは、オブジェクトとそのメソッドを「.」（ドット）でつなぎます。実行可能なメソッドの種類は、対象のオブジェクトによって異なります。また、処理で使うデータや、処理内容の細かい設定を指定する必要がある場合は、メソッド名の後に引数として指定します。一方、プロパティというのは、対象の「モノ」の属性や設定を表します。「=」は代入演算子で、左辺に指定されたプロパティや変数に、右辺に指定された値を代入します。たとえば、対象のオブジェクトに属する文字列を表すプロパティに文字列を代入することで、その文字列を変更するという操作になります。やはり、オブジェクトとそのプロパティは「.」（ドット）でつなぎます。また、プロパティを使用した式で、現在の設定値を調べることも可能です。使用可能なプロパティの種類は、やはり対象のオブジェクトによって異なります。各パターンの具体的なサンプルは、次の項で紹介します。

■

オブジェクトの取得

オブジェクト名と、そのオブジェクトのコード中での指定方法の関係は、少々面倒です。オブジェクト.メソッドオブジェクト.プロパティ = 設定値【書式】パターン1 パターン2 変数については 41 ページを参照してください。プロパティでも引数を指定する場合はありますが、40ページで説明するインデックスのようなものがほとんどです。

(27)

Word VBAでは、オブジェクトをその名前を使って直接指定することはほとんどありません。通常は、プロパティやメソッドを使った式で、その戻り値として間接的にオブジェクトを指定します。このようにしてオブジェクトを求めることを、オブジェクトを取得するといいます。たとえば、Word文書（ドキュメント）を表すオブジェクトは「Documentオブジェクト」ですが、いきなりコードウィンドウに「Document」と書いてもオブジェクトは取得できません。Wordでは一度に複数の文書を開いている場合もあるため、操作対象となるDocumentオブジェクトを特定する必要があります。現在作業中の（最前面で開かれている）文書を表すDocumentオブジェクトを取得したい場合は、「ActiveDocumentプロパティ」を使用します。 ActiveDocumentプロパティは、その値として数値や文字などではなく「オブジェクト」を持っており、プロパティの値を取り出す式によって、オブジェクトを取得することができます。 ActiveDocumentプロパティの対象オブジェクトはWordアプリケーションを表すApplicationオブジェクトまたはGlobalオブジェクトです。Globalオブジェクトのメンバー（プロパティまたはメソッド）は、オブジェクトの指定を省略して記述することができます。ActiveDocumentプロパティのように、対象のオブジェクトを省略してコードの先頭に記述できるプロパティをトップレベル（最上位）のプロパティと呼びます。Word VBAのコードは、多くの場合、トップレベルのプロパティまたはメソッドから記述を開始します。次の例は、作業中の文書を表すDocumentオブジェクトに対し、保存の操作を行うSaveメソッドを実行するステートメントです（パターン1の例）。また、文書中の選択範囲を表すSelectionオブジェクトも、トップレベルのプロパティであるSelectionプロパティで取得できます。Selectionオブジェクトの Textプロパティに値を設定するという操作で、選択範囲の文字列を変更することができます。次の例は、選択範囲の文字列を「Office」に変更するステートメントです（パターン2の例）。なお、ここではプロパティを使用してオブジェクトを取得する方法を紹介し ActiveDocument.Save Selection.Text = "Office" この2ページで紹介しているコードは、単なる書式の例なので、サンプルファイルは用意していません。

(28)

ましたが、オブジェクトによっては、プロパティではなくメソッドで取得する場合もあります。メソッドの中には、単にオブジェクトを操作するだけでなく結果として値を返すものもあり、その戻り値として数値や文字列ではなくオブジェクトを返す場合もあるのです。また、あるオブジェクトを取得する方法が1つだけとは限りません。ここで例に挙げたDocumentオブジェクトについても、ActiveDocumentプロパティ以外にもいろいろな取得方法が用意されています。

■

オブジェクトの階層構造

ActiveDocumentプロパティはトップレベルのプロパティなので対象のオブジェクトを省略することができますが、作業中の文書を保存するコードを、対象のApplicationオブジェクトを指定して書くと次のようになります。このコード中の「Application」は、やはりGlobalオブジェクトのプロパティで、 Applicationオブジェクトを返します。つまり、このコードはApplicationオブジェクトとそこに含まれるDocumentオブジェクトとが、階層構造になっているわけです。同様に、Documentオブジェクトのプロパティを使って、Documentオブジェクトに含まれるオブジェクトを取得することができます。このようにプロパティ（またはメソッド）を重ねて指定していくことで、最終的に操作したいオブジェクトを特定します。たとえば、DocumentオブジェクトのPageSetupプロパティで、その文書のページ設定を表すPageSetupオブジェクトを取得できます。次のコードは、 PageSetupオブジェクトのLeftMarginプロパティで、作業中のドキュメントの左側の余白の大きさを指定するものです。なお、最初の「Application.」は省略可能です。オブジェクトが階層構造になっている場合、上位のオブジェクトを親オブジェクト、それに含まれるオブジェクトを子オブジェクトと呼びます。 Application.ActiveDocument.Save Application.ActiveDocument.PageSetup.LeftMargin = 10

(29)

■

オブジェクトとコレクション

プロパティによって取得できるオブジェクトの中には、「同じ種類のオブジェクトの集合」とでもいうべきものがあります。たとえば、トップレベルのプロパティであるDocumentsプロパティを使用することで、現在Wordで開かれているすべての文書を表すDocumentsオブジェクトを取得できます。Documents オブジェクトは単体のDocumentオブジェクトの集合であり、このようなオブジェクトのことをコレクション（コレクションオブジェクト）ともいいます。コレクションに含まれている単体のオブジェクトは、通常、後ろに付けたカッコの中にインデックスを指定して取り出すことが可能です。インデックスも引数の一種ですが、特にオブジェクト（または配列の要素）を特定するために使用する番号または名前のことをいいます。たとえば、現在Wordで3つの文書が開かれているとして、次のような式では、そのうち2番目に開かれた文書をDocumentオブジェクトとして取得できます。また、「MyDoc01.docx」というファイル名の文書をDocumentオブジェクトとして取得したい場合は、次のような式を指定します。なお、ここで指定できるのはあくまでも現在開かれている文書ファイル名なので、開かれていない状態の文書を指定することはできません。 Documents(2) Documents("MyDoc01.docx") インデックスを使って特定のオブジェクトを取り出すことができるのは、厳密に言うと、ほぼすべてのコレクションに用意されている「Item」というメソッド（またはプロパティ）の機能によるものです。ただ、Itemは多くの場合、省略することが可能なので、実際にはあまり意識することはありません。

(30)

1-3 データの種類と変数・定数

■

変数と定数の基礎知識

VBAのコードの中では、数値や文字列といったデータを直接指定できるだけでなく、「変数」や「定数」といった名前を使って処理することが可能です。いずれにも「数」という字が付いていますが、数値だけでなく文字列のデータも、変数や定数を利用して処理することができます。変数というのは、いわばデータの入れ物のようなものです。プログラム作成者が適当な名前を付けて作った変数に任意のデータを代入し、以後、元のデータの代わりにその変数を使って処理を行います。変数にどのようなデータが入るかは、処理のたびに変わる可能性があります。また、変数はあくまでもデータの一時的な入れ物なので、処理の途中でその内容が変更される場合もあります。要するに、処理における「役割」を表すものといえます。一方、定数というのは、特定のデータに付ける名前のことです。変数とは違い、コードの中で一度その名前に対応するデータを決めたら、以後、その定数の値が変わることはありません。元のデータを直接使ってもいいのですが、定数を利用することで、数値などよりもそのデータの持つ「意味」がわかりやすくなります。たとえば、「0.05」という数値に「zeiritu」という名前を付けておけば、この数値が税率を表すものとすぐにわかります。数値そのものを複数の箇所で使用していた場合、後で税率が変更になったときには、そのすべての箇所を修正する必要がありますが、定数を使用していた場合は、最初に定数を定義している箇所だけを修正すれば済みます。変数や定数として使用する名前の作成ルールは、プロシージャ名の命名規則と同様です。

■

変数の使用方法

変数は、コードの中で直接使い始めることが可能です。VBAのキーワードではない語がコード中に出現すると、多くの場合、その語は変数と見なされます。たとえば、次のコードでは、「a」という変数に演算の結果を代入し、その変数の値をメッセージボックスに表示します。プロシージャ名の命名規則は、32ページを参照してください。 a = 2 + 3 MsgBox a 1 2 Sample file Pt1P041_01.docm

(31)

ただし、特に長いプロシージャの場合、変数は直接使い始めるのではなく、最初に宣言してから使用することをお勧めします。変数の宣言にもいくつか種類がありますが、Dimステートメントを使う方法が一般的です。たとえば、整数を扱うための変数aは、次のように宣言します。変数を宣言するステートメントは、その変数を使用する前であればコード中のどこに置いても構いませんが、通常はプロシージャの冒頭部分で、使用する変数をすべてまとめて宣言しておくとわかりやすいでしょう。このステートメントの「As」の後の部分は、変数のデータ型を表しています。「Integer」は整数（比較的桁数の少ないもの）のデータを意味します。数値を扱うデータ型としては、これ以外にも、より桁数の多い整数を扱える「Long」、小数点以下の桁が扱える「Single」、より高い精度で小数点以下の桁が扱える「Double」などがあります。True／Falseの論理値や、日付・時刻データも数値の一種ですが、VBAでは前者は「Boolean」、後者は「Date」というデータ型として扱います。また、文字列を扱うためのデータ型は「String」、オブジェクトを扱うためのデータ型は「Object」です。さらに、これらすべてのデータを代入することができる「Variant」というデータ型もあります。Dimステートメントで「As」以下を省略した場合や、変数を宣言せずに使用した場合も、Variant型の変数として扱われます。ただし、この型を指定した変数は他のデータ型よりも余計にメモリを消費し、またプログラムの問題点を発見しにくくなるなどのデメリットもあるため、変数にはできるだけ適切なデータ型を指定するようにしましょう。オブジェクトを扱う変数については43ページを参照してください。 Dim a As Integer 必要以上に対象範囲の広いデータ型を指定すると、それだけ余分にメモリを消費することになります。コードウィンドウ内に「Option Explicit」という1行を入力しておくと、変数の宣言が必頇となります。これにより、変数の入力ミスを減少させることができます。

(32)

■

オブジェクト変数

変数に収めることができるのは、数値や文字列のデータだけではありません。取得するための処理が複雑なオブジェクトを変数に「代入」しておくことで、一度取得したオブジェクトを、以降のコード中で手軽に再利用できるようになります。ただし、オブジェクトを変数に「代入」する操作は、普通の変数の場合とは少し勝手が違います。オブジェクト変数の場合、通常の代入ステートメントではなく、Setというキーワードを使ったSetステートメントを使用する必要があります。また、この操作は、厳密にいうと変数への「データの代入」ではなく、変数に対する「オブジェクトへの参照のセット」です。次の例は、Wordで開かれている「MyWork.docx」という文書を表す Documentオブジェクトを「Dc」というオブジェクト変数にセットするステートメントです。なお、オブジェクト変数の宣言を行う場合、データ型は「As Object」とします。ただし、この例のようにオブジェクトの種類がはっきりしている場合は、そのオブジェクトの種類の名前そのものをデータ型として指定できます。このようなデータ型を固有オブジェクト型といいます。たとえば、この場合のオブジェクト変数Dcを固有オブジェクト型で宣言すると、次のようになります。固有オブジェクト型で宣言することで、コードの中にそのオブジェクト変数を入力するだけで自動的にメソッドやプロパティの候補が表示されるといったメリットがあります。

■

定数の使い方

VBAの定数には組み込み定数とユーザー定義定数の2種類があります。組み込み定数とは、文字通りVBAにあらかじめ組み込まれている定数で、たとえば、コード中に「1」と書く代わりに「vbOK」のように記述できます。ただ、こうした定数は使うべき状況が決まっており、特定の状況で使えばコードの意味がわかりやすくなりますが、それ以外の状況で使うのはかえってわかりにくく Set Dc = Documents("MyWork.docx") Dim Dc As Document

(33)

なるので注意が必要です。一方、ユーザー定義定数とは、プログラム作成者がコードの中で自由に定義して使える定数のことです。ユーザー定義定数を使う場合は、Constステートメントを使ってコードの中で宣言します。たとえば、「ninzu」という定数に「5」という数値を設定したい場合は、次のようにします。「Const」に続けて定数名を書き、その後「As」に続けてデータ型を指定するところまでは変数のDimステートメントと同様です。定数の場合は、さらに「=」に続けて、その定数に設定するデータまで指定します。

■

配列について

VBAでは、一般的な数値や文字列といった単体のデータのほかに、複数のデータをまとめて取り扱えるデータ構造を利用できます。このようなデータ構造のことを配列といい、配列を収めることのできる変数を配列変数といいます。実際には、VBAで単に「配列」といったときには、ほとんどの場合、配列変数を意味しています。配列変数には、固定長配列（静的配列）と動的配列とがあります。固定長配列とは、配列変数を宣言する際、その配列に含まれるデータ要素の数をあらかじめ決めてしまう配列変数のことです。たとえば、次のように宣言すると、3つの整数型のデータ要素を持った「hairetu」という固定長配列が利用できるようになります。配列変数は、通常、末尾に「()」を付けて表します。固定長配列の宣言は、この中に要素番号（インデックス）の最大値を指定します。ここでは「2」としていますが、配列のインデックスは通常0から始まるため、0、1、2というインデックスで表される3つのデータ要素が含まれることになります。ただし、この時点ではまだ配列変数を宣言しただけであり、「部屋は3つ用意したがまだ誰も入居していない」という状態です。たとえば、この配列変数の2番目の部屋に「5」という数値を代入したい場合は、次のようにします。

Const ninzu As Integer = 5

Dim hairetu(2) As Integer 組み込み定数の具

体的な例は、57ページなどを参考にしてください。

(34)

一方、動的配列とは、宣言した時点では要素の数を決めず、コードの実行中、状況に応じて要素数を変える配列変数のことです。動的配列の場合、宣言時に「()」の中には何も入れません。この状態ではまだ、配列変数hairetuにインデックスを指定して使用することはできません。コードの実行中、Redimステートメントで、配列の要素数を適宜設定・変更することができます。たとえば、次のステートメントを記述すると、それ以降の行では配列変数Hairetuを4要素の配列として使用できるようになります。この後も、Redimステートメントを使って何度でも配列の要素数を再設定することができます。ただし、普通にRedimステートメントを使った場合、配列の各要素に代入されたデータはすべて失われてしまいます。代入されたデータを残したまま要素数を変更したい場合は、Preserveキーワードを使って、次のように記述します。なお、ここで紹介した形式の配列は1次元配列と呼ばれます。インデックス番号を2つ指定した場合は、それぞれがいわば行番号と列番号を表し、行数 ×列数分の要素を配列で処理できるようになります。このような配列を2次元配列といいます。 hairetu(1) = 5

Dim hairetu() As Integer

Redim hairetu(3)

Redim Preserve hairetu(5)

VBAでは仕様的には 60次元までの配列を扱えます。2 次元以上の配列については、ここでは説明を省略します。

(35)

1-4 条件分岐

■

比較演算子と論理演算子

何らかの条件、たとえば文書に何らかの文章が入力されているかどうかといった条件を設定し、それをチェックした結果に応じてそれぞれ異なる処理を実行するといったことが可能です。このような条件分岐の処理には、通常、 Ifというキーワードと、比較演算子や論理演算子、または条件判断に利用できるVBAの組み込み関数などを使用します。 VBAで使用できる比較演算子には、以下のような種類があります。いずれも、2つの式を比較してTrueまたはFalseを返します。また、比較演算子などを使った論理式に対して、さらに次のような論理演算子が使用できます。演算子使い方機能 = 式1 = 式2 式1と式2が等しければTrue > 式1 > 式2 式1が式2より大きければTrue < 式1 < 式2 式1が式2より小さければTrue >= 式1 >= 式2 式1が式2以上であればTrue <= 式1 <= 式2 式1が式2以下であればTrue <> 式1 <> 式2 式1と式2が等しくなければTrue

Like 文字列式 Like パターン文字列式がパターンにマッチすればTrue

Is オブジェクト1 Is オブジェクト2 両者が同じオブジェクトを参照していればTrue 演算子使い方機能 And 式1 And 式2 式1と式2の論理積（式1かつ式2） Or 式1 Or 式2 式1と式2の論理和（式1または式2） Not Not 式式の論理否定 Xor 式1 Xor 式2 式1と式2の排他的論理和 Eqv 式1 Eqv 式2 式1と式2の論理等価演算 Imp 式1 Imp 式2 式1と式2の論理包括演算 VBAでは論理値True は -1、False は 0 と等価です。

(36)

なお、条件判断に利用できるVBAの組み込み関数としては、数値かどうかを調べるIsNumeric関数、日付かどうかを調べるIsDate関数など、「Is」で始まるいくつかの関数が存在します。

■

1行のIfステートメント

Ifキーワードを使って条件分岐を行うIfステートメントには、1行だけで終わる記述方法と、複数行に渡る記述方法とがあります。1行のステートメントには、以下のようなパターンがあります。パターン1では、条件式の評価結果がTrueであれば、Thenの後の処理を実行します。次の例は、現在Wordで複数の文書が開かれていれば「OK」というメッセージを表示するステートメントです。なお、このコードのCountは、コレクション（この場合は開かれているすべての文書を表すDocumentsコレクション）に含まれているオブジェクトの数を表すプロパティです。パターン2では、条件式の評価結果がTrueであれば処理1を、Falseであれば処理2を実行します。次の例は、文書が1つだけ開かれていれば「OK」、そうでなければ「NG」というメッセージを表示するステートメントです。

■

複数行のIfステートメント

条件判断を行って実行したい処理が1つだけであれば1行のIfステートメントで記述できますが、ある条件を満たす場合に実行したい処理が複数であることもあります。そのような場合には、Ifステートメントを複数行に渡って記述することもできます。この方法としては、次の3つのパターンがあります。これらの関数は、いずれも結果をTrue／ Falseで返します。 If 条件式 Then 処理 If 条件式 Then 処理1 Else 処理2 【書式】パターン1 パターン2

If Documents.Count > 1 Then MsgBox "OK"

If Documents.Count = 1 Then MsgBox "OK" Else MsgBox "NG"

Count プロパティは、ほとんどのコレクションで使用できます。 Sample file Pt1P047_01.docm Sample file Pt1P047_02.docm

(37)

いずれのパターンも、処理グループの部分には1行以上のステートメントを記述することができます。パターン1は条件式の評価結果がTrueの場合に処理グループを実行するだけですが、パターン2では評価結果がTrueであれば処理グループ1を、Falseであれば処理グループ2を実行します。パターン3は、最初の条件式の評価結果がFalseだった場合に、さらに別の条件式を設定できる記述方法です。ここでは「ElseIf」の行は1つだけですが、さらにElseIfを重ねて複数の条件式を設定することができます。また、設定した条件式のいずれにも該当しない場合の処理を設定したい場合、最後に「Else」の処理を付けることも可能です。次の例は、開かれているドキュメントの数に応じて異なるメッセージを表示するコードです。いずれの場合にも複数の処理を記述できますが、サンプルが長くなりすぎるので、ここではそれぞれ1行ずつの処理にしています。 If 条件式 Then 処理グループ End If If 条件式 Then 処理グループ1 Else 処理グループ2 End If If 条件式1 Then 処理グループ1 ElseIf 条件式2 Then 処理グループ2 End If 【書式】パターン1 パターン2 パターン3 If Documents.Count > 5 Then MsgBox "多い"

ElseIf Documents.Count > 3 Then 1

2 3 Sample file

(38)

■

Select Caseステートメント

条件に応じて行いたい処理の種類が多い場合、「If」と「ElseIf」を組み合わせて記述することもできますが、前述の例でいうと「Document.Count」のような部分を何度も重複して記述する必要があります。

このようなときに使うと便利なのがSelect Caseステートメントです。Select Caseは、次のような書式で使用します。評価式には、評価したい値を求める式を指定します。その結果が値1であれば処理グループ1を、値2であれば処理グループ2を……といった具合で、いくつでも処理のグループを追加できます。各処理グループには、いずれも1 行以上のステートメントを記述可能です。また、「Case」の後の各値には、以下のような指定方法があります。 ①値そのもの評価式の結果が指定した値そのものだった場合に、その処理グループを実行します。 ②範囲指定 MsgBox "やや多め"

ElseIf Documents.Count > 1 Then MsgBox "普通" Else MsgBox "少ない" End If 4 5 6 7 8 9 Select Case 評価式 Case 値1 処理グループ1 Case 値2 処理グループ2 ： End Select 【書式】同じ内容の式であれば、その評価は一度で済ませたほうがコードの処理効率も向上します。

(39)

「To」キーワードを使って範囲を指定することができます。たとえば、「Case 2 To 4」のように指定すると、評価式の結果が2から4の範囲内だった場合に、その処理グループを実行します。 ③比較「Is」キーワードと比較演算子を使用して、評価式の結果を特定の値と比較するような条件を設定することができます。この場合のIsキーワードは比較演算子のIsとは異なり、評価式の結果の値そのものを表しています。たとえば、「Case Is >= 3」のように指定すると、評価式の結果が3以上であった場合に、その処理グループを実行します。 ④複数の値「,」（カンマ）で区切って複数の値を並べると、評価式の結果がそのいずれかであった場合に、その処理グループを実行します。また、この場合の「値」は、上の①～③の方法で指定することも可能です。 ⑤その他「Case Else」とすると、評価式の結果が上記のいずれにも当てはまらない場合に、その処理グループを実行します。また、各Caseは上から順番にチェックされていきます。評価式の結果がいずれかのCaseに該当した場合は、その処理グループが実行され、それ以降のCaseはチェックされません。したがって、評価式の結果が複数のCase に該当する場合でも、より上にあるCaseの処理しか実行されないので注意してください。次のコードは、Select Caseステートメントの使用例です。

Select Case Documents.Count Case 1 MsgBox "少ない" Case 2 To 5 MsgBox "普通" Case 10, 15, 20 To 30 MsgBox "特定の数" Case Is > 30 MsgBox "多い" Case Else MsgBox "特定の数以外" End Select 1 2 3 4 5 6 7 8 9 10 11 12 Sample file Pt1P050_01.docm

(40)

1-5 繰り返し処理

■

Do...Loopステートメント

繰り返し処理とは、同じ処理を何度も連続して実行するものです。処理の内容そのものを記述するのは一度だけで、指定した条件に応じた回数だけ、その処理が繰り返されます。VBAで繰り返し処理を実現する方法はいくつかありますが、まずDo...Loopステートメントから紹介します。このステートメントの最もシンプルな使用方法は次のようなものです。このように記述することで、処理グループの部分（複数行も可）を無制限に繰り返します。ただ、本当に無制限に実行させてしまってはプログラムが終了しないので、何らかの仕組みで繰り返し処理を終了する必要があります。

通常、これにはDoキーワード（またはLoopキーワード）と、Whileキーワード

またはUntilキーワードを組み合わせます。上の書式の「Do」の行を次のように変更すると、条件式の評価結果がTrueである間は繰り返し処理を実行します。逆に言うと、条件式がFalseになったところで繰り返しを終了し、処理をその次の行へ進めます。たとえば、次のコードは、変数iの値が5未満である間、iの値をメッセージボックスに表示します。 Do 処理グループ Loop 【書式】 Do While 条件式【書式】 Do While i < 5 i = i + 1

MsgBox "変数iの値：" & i Loop 1 2 3 4 Sample file Pt1P051_01.docm 掲載したサンプルコードでは変数を宣言なしで使用していますが、宣言を行わなくても実行は可能です。サンプルファイル中のコードでは、変数の宣言を行っています（以下同）。

(41)

変数iの初期値は0なので、最初の「i = i + 1」でiの値が1になり、以後、この処理が繰り返されるたびにiの値が1ずつ増えていきます。一方、「Do」の行を次のように変更すると、条件式の評価結果がTrueになったところで繰り返し処理を終了します。次のコードは、変数iの値が5になるまで、iの値をメッセージボックスに表示します。結果として、先のコードと同じ内容の処理になります。なお、WhileやUntilは、Doの側ではなくLoopの側に付けることもできます。どちらもほぼ同じ結果になりますが、処理の内容によっては違いが生じる場合もあるので注意が必要です。また、より複雑な条件で繰り返し処理を終了したい場合は、DoとLoopの中でIfステートメントなどを使用し、条件を満たした場合のみ繰り返し処理を抜けるという方法もあります。このような目的には、「Exit Do」という命令を使用します。次の例も、やはり変数iの値が5になったときに繰り返し処理を終了するものです。

■

For...Nextステートメント

繰り返し処理を行う回数が最初から決まっている場合は、For...Nextス Do Until 条件式【書式】 Do Until i = 5 i = i + 1

MsgBox "変数iの値：" & i Loop 1 2 3 4 Do i = i + 1

MsgBox "変数iの値：" & i If i = 5 Then Exit Do Loop 1 2 3 4 5 Sample file Pt1P052_01.docm Sample file Pt1P052_02.docm

(42)

テートメントを利用するのが便利です。For...Nextステートメントは、次のような書式で使用します。変数に指定された変数に、初期値から終了値までの値が自動的に1ずつ変化して、処理グループの内容が繰り返し実行されます。次のコードは、変数iの値が1から5になるまで、iの値を繰り返しメッセージボックスに表示するものです。 Do...Loopステートメントの例と同じ処理ですが、こちらの場合は、変数iに1 を加えるという操作を行う必要はありません。また、「i」という変数名を「Next」の後にも付けていますが、これは省略することもできます。ただ、For...Nextステートメントを二重に使用した場合などに、繰り返し処理の始まりと終わりの対応関係がわかりやすくなるので、付けておくことをお勧めします。また、初期値から終了値までは、特に指定しない場合は自動的に1ずつ増加しますが、この変化の量を指定することも可能です。このような目的には Stepキーワードを使用します。1行目を次のように変えると、変数iの値は2から14まで、3ずつ増加していきます。この場合、iの値は2、5、8、11、14に変化します。初期値を終了値よりも大きくし、Stepにマイナスの値を指定することで、変数の値を順番に減らしていくこともできます。1行目を次のようにすると、変数iの値は6から0まで、2ずつ減っていきます。 For 変数 = 初期値 To 終了値処理グループ Next 変数【書式】 For i = 1 To 5

MsgBox "変数iの値：" & i Next i 1 2 3 For i = 2 To 14 Step 3 1 Sample file Pt1P053_01.docm Sample file Pt1P053_02.docm

(43)

この場合、iの値は6、4、2、0に変化します。

■

For Each...Nextステートメント

コレクションに含まれている各オブジェクトに対して同じ処理を繰り返し実行したい場合は、For Each...Nextステートメントを利用するのが便利です。また、このステートメントは、配列の各要素に対して同じ処理を実行したい場合にも利用できます。For Each...Nextステートメントは、次のような書式で使用します。変数に指定された変数に、コレクションに含まれる各オブジェクトがセットされ、処理グループの内容が繰り返されます。コレクションではなく配列の場合は、その各要素が変数に代入されて、やはり繰り返し処理が実行されます。次のコードは、Wordで開かれているすべての文書のファイル名をメッセージボックスに表示するものです。なお、「Next」側の変数名（ここではDc）は省略も可能ですが、For...Next ステートメントと同じ理由で、付けておくことをお勧めします。 For i = 6 To 0 Step -2 1 For Each 変数 In コレクション（または配列）処理グループ Next 変数【書式】

For Each Ds In Documents MsgBox Ds.Name Next Ds

1 2 3

For Each Dc In Documents MsgBox Dc.Name Next Dc Sample file Pt1P054_01.docm Sample file Pt1P054_02.docm

(44)

1-6 同一オブジェクトの処理

■

Withステートメントの利用

同じオブジェクトに対するプロパティやメソッドを何度も利用する場合、With ステートメントを使用して、そのオブジェクトを取得する操作を1つにまとめてしまうことができます。これによって、コードの記述が整理されるとともに、各処理のつどオブジェクトを取得しなくても済むため、処理効率も向上します。 Withステートメントは、次のような書式で使用します。オブジェクトの部分に、対象のオブジェクトを取得する式を記述します。また、処理グループの中で「.」（ドット）に続けてプロパティやメソッドを記述した場合、そのオブジェクトのプロパティやメソッドと見なされます。別のオブジェクトについても、処理グループの中でそのオブジェクトを取得する式を記述すれば、問題なく使用できます。たとえば、次のコードは、作業中の文書のファイル名をメッセージボックスに表示し、その文書を保存するものです。なお、同様にオブジェクトの取得操作を1つにまとめてしまうテクニックとしては、オブジェクト変数もあります。 With オブジェクト処理グループ End With 【書式】 1 2 3 4 With ActiveDocument MsgBox .Name .Save End With オブジェクト変数については43ページを参照してください。 Sample file Pt1P055_01.docm