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

Transcription

1 1-1 VBAを 利 用 する 前 の 準 備 マクロとVBA 記 述 されたプログラ ムのことをコードとも 呼 びます Wordの 場 合 実 際 の 作 業 では 個 々の 文 書 よりも 複 数 の 文 書 で 使 用 したいマクロの ほうが 多 いかもしれま せ ん 標 準 テ ン プ レートの 扱 いについて は 230 ペ ー ジ を 参 照 してください アプリケーションの 内 部 的 な 操 作 を 自 動 化 する 機 能 のことを マクロといい ます マクロを 利 用 することで 毎 日 (あるいは 毎 週 毎 月 )のように 繰 り 返 し 行 われる 一 連 の 定 型 的 な 作 業 を すべてアプリケーション 任 せで 自 動 的 に 実 行 できるようになります ただし マクロ 機 能 の 具 体 的 な 仕 様 は アプリケーションによっても 異 なりま す すべての 機 能 をマクロに 登 録 できるアプリケーションもあれば 一 部 の 機 能 しか 登 録 できないアプリケーションもあります マクロへの 機 能 の 登 録 方 法 も 実 際 に 一 連 の 操 作 を 行 って 記 録 させる 方 式 や 操 作 項 目 を 選 択 して 登 録 していく 方 式 一 種 の 専 用 プログラミング 言 語 を 利 用 して 登 録 していく 方 式 など アプリケーションによってさまざまです 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の 初 期 設 定 の 状 態 では[ 開 発 ]タブは 表 示 さ れていないため これが 表 示 されるように 設 定 を 変 更 します 12

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

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

4 1-1 VBAを 利 用 する 前 の 準 備 さらに[メッセージバー]をクリックし [メッセージバーの 表 示 ]で[ActiveXコ ントロールやマクロなどのアクティブコンテンツがブロックされた 場 合 すべて のアプリケーションにメッセージバーを 表 示 する]が 選 択 されていることを 確 認 します [OK]ボタンをクリックします 以 上 のような 設 定 でマクロが 含 まれているWord 文 書 を 開 くと [セキュリ ティの 警 告 ]メッセージバーが 表 示 されます この 文 書 のマクロを 有 効 にする には [コンテンツの 有 効 化 ]ボタンをクリックします Visual Basic Editor (28 ペ ー ジ 参 照 )を 開 いている 状 態 で マクロを 含 む 文 書 を 開 こ う と す る と [Microsoft Word の セキュリティに 関 する 通 知 ]ダイアログボッ ク ス が 表 示 さ れ ま す 安 全 性 の 確 認 さ れている 文 書 であれ ば [マクロを 有 効 に する]ボタンをクリック して 文 書 を 開 きます メッセージバーが 消 えて マクロが 有 効 になります また この 操 作 を 実 行 すると 開 いたWord 文 書 が 信 頼 済 みドキュメントとして 記 録 され これ 以 降 15

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

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

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

8 1-1 VBAを 利 用 する 前 の 準 備 このフォルダーに 保 管 されたマクロを 含 むWord 文 書 は 常 にVBAが 有 効 な 状 態 で 開 かれます また この 信 頼 できる 場 所 の 設 定 は Wordだけでなく Excelのブックなどでも 共 通 です 信 頼 できる 場 所 の 設 定 を 解 除 したい 場 合 は この[セキュリティセンター]ダイアログボックスの[ 信 頼 できる 場 所 ]で 登 録 されたパスをクリックして 選 択 し [ 削 除 ]ボタンをクリックします Word 2007 以 降 の 文 書 形 式 について Word 2003までは マクロを 含 む 文 書 も 含 まない 文 書 も すべて.doc と いう 拡 張 子 の 同 一 形 式 のファイルとして 保 存 されていました Word 2007 以 降 では 通 常 の 文 書 は.docx という 拡 張 子 で 保 存 されま すが このファイル 形 式 ではマクロを 含 めて 保 存 することはできません マクロ を 含 む 文 書 は 以 下 のような 手 順 で マクロ 有 効 文 書 として 保 存 します [ファイル]タブをクリックし [ 名 前 を 付 けて 保 存 ]をクリックします Word 2007 と Word 2010の 文 書 のファイ ル 形 式 も まったく 同 じというわけではあり ま せ ん 詳 し く は 71 ページを 参 照 してくだ さい 19

9 ファイルを 保 存 する 場 所 (フォルダ)とファイル 名 を 指 定 し [ファイルの 種 類 ]で[Wordマクロ 有 効 文 書 ]を 選 択 して [ 保 存 ]ボタンをクリックします これで マクロが 使 用 可 能 な.docm という 拡 張 子 の 文 書 として 保 存 され ます マクロを 記 録 する Wordでは 文 書 上 でユーザーが 行 った 一 連 の 操 作 を 記 録 して マクロの 実 体 であるVBAのプログラムコードを 自 動 的 に 生 成 させることができます ここでは Word 2010で 作 成 した 新 規 文 書 に 文 章 を 入 力 してその 一 部 の 書 式 を 変 更 するマクロを 記 録 機 能 を 使 って 登 録 します [ 開 発 ]タブの[コード]グループの[マクロの 記 録 ]をクリックします 20

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

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

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

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

14 1-1 VBAを 利 用 する 前 の 準 備 [キーボードのユーザー 設 定 ]ダイアログボックスが 表 示 されます ここで マクロの 実 行 に 割 り 当 てたいキーを 実 際 に 押 します マクロを 割 り 当 てることが できるキーとしては Ctrlキーと 文 字 キーの 組 み 合 わせや 一 部 の 機 能 キー などがあります また [ 保 存 先 ]として 文 書 1 を 選 択 し [ 割 り 当 て]ボタンをクリックしま す さらに[ 閉 じる]ボタンをクリックすると マクロの 記 録 が 開 始 されます 文 書 1 の 部 分 は 実 際 には 作 業 中 の 文 書 ファイル 名 になりま す また マクロの 保 存 先 を[すべての 文 書 (Normal.dotm)]に した 場 合 [ 保 存 先 ] は Normal の ま ま に します 以 下 マクロ 化 したい 一 連 の 操 作 を 実 行 し マクロの 記 録 を 終 了 します Wordでの 作 業 中 に 割 り 当 てたキーを 押 すと 記 録 したマクロを 実 行 する ことができます 記 録 後 にマクロを 割 り 当 てる 作 成 済 みのマクロを 後 からボタンやキーボードに 登 録 することも 可 能 で す マクロの 記 録 時 に 登 録 するのを 忘 れていた 場 合 や 直 接 コードを 記 述 し て 作 成 したマクロを 簡 単 に 実 行 したい 場 合 などにこの 操 作 を 行 います 25

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

16 1-1 VBAを 利 用 する 前 の 準 備 ンとして 追 加 することができます 一 方 マクロをキーボードに 登 録 したい 場 合 は [Wordのオプション]ダイア ログボックスの[リボンのユーザー 設 定 ]の 画 面 で ショートカットキーの[ユー ザー 設 定 ]ボタンをクリックします Word 2007 でもリボ ンにマクロ 実 行 用 の ボタンを 表 示 させるこ とは 可 能 ですが 手 順 がやや 複 雑 になり ます [キーボードのユーザー 設 定 ]ダイアログボックスが 表 示 されます [ 保 存 先 ]として 文 書 1 を [コマンドの 指 定 ]の[ 分 類 ]で マクロ を 選 択 し [マク ロ]でキーボードを 登 録 したいマクロを 選 択 します [ 割 り 当 てるキーを 押 してください]というフィールドをクリックして 登 録 した いキーを 実 際 に 押 し [ 割 り 当 て]ボタンをクリックします さらに[ 閉 じる]ボタ ンをクリックすると 設 定 したショートカットキーでマクロを 実 行 できるようになっ ています 文 書 1 の 部 分 は 実 際 には 作 業 中 の 文 書 ファイル 名 です ま た Normal.dotm のマ ク ロ の 場 合 [ 保 存 先 ]は Normal にしま す なお マクロに 登 録 したキーボードの 設 定 を 解 除 したい 場 合 は ここで 現 在 の キー の 設 定 を 選 択 して [ 削 除 ]ボタンを クリックします マクロを 実 行 する マクロをクイックアクセスツールバーやショートカットキーから 実 行 できるよう に 設 定 した 場 合 はそれらを 使 えば 簡 単 ですが ここでは 基 本 的 な 手 順 とし て リボンの[マクロ]コマンドからマクロを 実 行 する 方 法 を 紹 介 します マクロを 実 行 したい 位 置 にカーソルを 移 動 して [ 開 発 ]タブの[コード]グ 27

17 ループの[マクロ]をクリックします AltキーとF8キーを 同 時 に 押 して も [マク ロ]ダイアログボックス が 表 示 されます [マクロ]ダイアログボックスが 表 示 されます [マクロ 名 ] 欄 に 表 示 されるマ クロの 一 覧 から 実 行 したいマクロをクリックして 選 択 し [ 実 行 ]ボタンをクリッ クします これで 選 択 したマクロが 実 行 されます Visual Basic Editorを 開 く マクロの 内 容 であるVBAのソースコードを 確 認 するには Visual Basic Editor(VBE)を 表 示 させます VBEでは 記 録 機 能 で 作 成 されたマクロを 確 認 編 集 するだけでなく 新 しいマクロを 一 から 作 成 することも 可 能 です [ 開 発 ]タブの[コード]グループの[Visual Basic]をクリックします 28

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

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

20 1-2 VBAの 基 本 構 造 標 準 モジュールの コードウィンドウ 作 成 された 標 準 モジュール VBAのコードは 主 として 各 種 のキーワードと 処 理 対 象 となるデータに よって 構 成 されます キーワードというのはVBAであらかじめ 定 義 された 命 令 などに 用 いられる 語 のことです また データとしては 数 値 などがコード 中 にそのまま 記 述 される 場 合 と 変 数 などの 名 前 を 使 って 記 述 される 場 合 とが あります なお VBEの 画 面 で 行 った 操 作 は 対 象 のプロジェクトである 文 書 ファイル またはテンプレートに 保 存 されます VBEのツールバーの[ 上 書 き 保 存 ]ボタ ンをクリックして 保 存 することもできますが Wordの 通 常 画 面 を 開 いて 文 書 を 保 存 しても VBEでの 変 更 内 容 も 併 せて 保 存 されます 変 数 に つ い て は 41 ページを 参 照 してくだ さい Subプロシージャの 作 成 VBAのプログラムは 1つの 処 理 のまとまりをプロシージャという 単 位 で 扱 い ます プロシージャにもいくつか 種 類 がありますが Wordのマクロは Sub と いうキーワードで 始 まるSubプロシージャです 新 しいSubプロシージャは[ 挿 入 ]メニューから 作 成 することもできますが ここでは 直 接 コードウィンドウに 入 力 して MyMacro という 名 前 のSubプロシージャを 作 成 しましょう 標 準 モジュールのコードウィンドウに Sub MyMacro と 入 力 し Enterキー を 押 します 31

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

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

23 キーワードなどの 語 句 の 途 中 や で 囲 まれた 文 字 列 の 途 中 などに 行 継 続 文 字 を 入 れて 改 行 すること はできません 1 行 が 長 くなりすぎた 場 合 適 当 な 位 置 に 改 行 を 入 れて2 行 に 分 けることが できます その 場 合 改 行 する 位 置 の 末 尾 には 行 継 続 文 字 として _ ( 半 角 スペースとアンダースコア)を 入 れます VBAでは 行 継 続 文 字 で 終 わって いる 行 は 次 の 行 とつながっているものと 見 なされます 行 継 続 文 字 コメントは コードウィ ンドウ 内 では 通 常 緑 色 の 文 字 で 表 示 され ます コードウィンドウには コードとしての 意 味 のある 単 語 以 外 に ちょっとした 説 明 や 覚 え 書 きを 入 れるためのコメントを 書 き 込 むことができます Rem とい うキーワードで 始 まる 行 は その 行 全 体 がコメントと 見 なされます また 行 の 中 に ' (シングルクォーテーション)が 出 てきた 場 合 その 位 置 以 降 がコメント と 見 なされます VBAで 扱 えるデータ データの 種 類 は 41 ページでもう 少 し 詳 し く 説 明 します また オブジェクトについて は37ページ 以 降 で 詳 しく 説 明 します Sample file Pt1P034_01.docm VBAのコードの 中 で 扱 えるデータは 大 きく 分 けて 数 値 文 字 列 オブ ジェクトの3 種 類 です いずれも 実 際 にはより 細 分 化 されて 扱 われますし こ れ 以 外 の 種 類 のデータもないわけではありませんが VBAの 勉 強 を 始 めた 最 初 の 段 階 ではとりあえずこの3つに 分 けて 理 解 しておけばいいでしょう 数 値 は コードの 中 に 直 接 指 定 できます たとえば 次 のコードは メッセー ジボックスに 12 と 表 示 します MsgBox 12 34

24 1-2 VBAの 基 本 構 造 MsgBox は 組 み 込 み 関 数 と 呼 ばれる 種 類 のVBAのキーワードです が ここでは 指 定 したデータをメッセージボックスに 表 示 する 命 令 とでも 理 解 しておいてください 一 方 文 字 列 は 前 後 を " " で 囲 んで 指 定 します 次 のコードは メッ セージボックスに こんにちは! と 表 示 します MsgBox "こんにちは!" MsgBox 関 数 に つ い ては56ページでも 説 明 します 組 み 込 み 関 数 は 厳 密 に 言 う とGlobal オブ ジェクト のメソッドです Sample file Pt1P035_01.docm ステートメントと 式 ステートメントというのは コードにおける 処 理 の 実 行 単 位 です 通 常 1 行 が1つのステートメントになりますが 複 数 の 行 がセットで1つのステートメントと なる 場 合 もあります たとえば Subプロシージャの 開 始 と 終 了 を 表 す Sub マクロ 名 () と End Sub も この2 行 がセットになって1つの Subステートメン ト と 呼 ばれます また 1 行 のステートメントの 中 でも 実 際 にはさまざまな 処 理 が 行 われて 35

25 います その 部 分 だけではコードとして 実 行 できないが 演 算 などの 処 理 の 結 果 として 何 らかのデータを 返 す 部 分 を 式 といいます 式 によって 返 されるデー タとしては 数 値 や 文 字 列 またはオブジェクトなどがあります 式 を 処 理 して その 結 果 を 求 めることを 式 を 評 価 する ともいいます 式 を 使 って コードの 中 で 数 値 の 計 算 を 行 うこともできます たとえば 次 のコードは という 式 の 計 算 結 果 をメッセージボックスに 表 示 します Sample file Pt1P036_01.docm MsgBox この 式 で 使 われている + のような 記 号 を 演 算 子 といい 特 に 数 値 同 士 の 計 算 に 使 用 するものを 算 術 演 算 子 といいます VBAの 式 で 使 用 できる 算 術 演 算 子 には 以 下 のようなものがあります 演 算 子 使 い 方 機 能 + 数 値 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でべき 乗 した 値 を 返 す また & という 記 号 は 2つの 文 字 列 を 結 合 する 機 能 を 持 った 文 字 列 演 算 子 です 36

26 1-2 VBAの 基 本 構 造 VBAの 演 算 子 の 種 類 は 算 術 演 算 子 と 文 字 列 演 算 子 だけではありません が これら 以 外 の 演 算 子 については 以 降 の 解 説 の 中 で 具 体 的 な 用 例 とと もに 紹 介 していきます VBAのオブジェクト 操 作 の 基 本 VBAのステートメントの 書 式 にはいくつかのパターンがありますが 主 に 使 用 されているのは オブジェクト を 使 用 する 次 の2つのパターンです 書 式 パターン1 パターン2 オブジェクト.メソッド オブジェクト.プロパティ = 設 定 値 オブジェクトというのは ここでは いわば 処 理 の 対 象 となる モノ とでも 理 解 しておいてください オブジェクトにはどのようなものがあり どのように 指 定 するかについては 後 の 節 で 詳 しく 説 明 します メソッドというのは いわば 対 象 の モノ に 対 して 行 う 操 作 のことです た とえば 選 択 された 文 字 列 の 範 囲 をオブジェクトとして 指 定 し これに 対 して 削 除 する という 操 作 を 表 すメソッドを 指 定 することで 選 択 範 囲 の 文 字 列 を 削 除 することができます このようなコードでは オブジェクトとそのメソッドを. (ドット)でつなぎます 実 行 可 能 なメソッドの 種 類 は 対 象 のオブジェクトに よって 異 なります また 処 理 で 使 うデータや 処 理 内 容 の 細 かい 設 定 を 指 定 する 必 要 がある 場 合 は メソッド 名 の 後 に 引 数 として 指 定 します 一 方 プロパティというのは 対 象 の モノ の 属 性 や 設 定 を 表 します = は 代 入 演 算 子 で 左 辺 に 指 定 されたプロパティや 変 数 に 右 辺 に 指 定 され た 値 を 代 入 します たとえば 対 象 のオブジェクトに 属 する 文 字 列 を 表 すプロ パティに 文 字 列 を 代 入 することで その 文 字 列 を 変 更 するという 操 作 になりま す やはり オブジェクトとそのプロパティは. (ドット)でつなぎます また プロ パティを 使 用 した 式 で 現 在 の 設 定 値 を 調 べることも 可 能 です 使 用 可 能 な プロパティの 種 類 は やはり 対 象 のオブジェクトによって 異 なります 各 パターンの 具 体 的 なサンプルは 次 の 項 で 紹 介 します プロパティでも 引 数 を 指 定 する 場 合 はあり ますが 40ページで 説 明 するインデックス のようなものがほとん どです 変 数 に つ い て は 41 ページを 参 照 してくだ さい オブジェクトの 取 得 オブジェクト 名 と そのオブジェクトのコード 中 での 指 定 方 法 の 関 係 は 少 々 面 倒 です 37

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

28 1-2 VBAの 基 本 構 造 ましたが オブジェクトによっては プロパティではなくメソッドで 取 得 する 場 合 もあります メソッドの 中 には 単 にオブジェクトを 操 作 するだけでなく 結 果 とし て 値 を 返 すものもあり その 戻 り 値 として 数 値 や 文 字 列 ではなくオブジェクトを 返 す 場 合 もあるのです また あるオブジェクトを 取 得 する 方 法 が1つだけとは 限 りません ここで 例 に 挙 げたDocumentオブジェクトについても ActiveDocumentプロパティ 以 外 にもいろいろな 取 得 方 法 が 用 意 されています オブジェクトの 階 層 構 造 ActiveDocumentプロパティはトップレベルのプロパティなので 対 象 のオブ ジェクトを 省 略 することができますが 作 業 中 の 文 書 を 保 存 するコードを 対 象 のApplicationオブジェクトを 指 定 して 書 くと 次 のようになります Application.ActiveDocument.Save このコード 中 の Application は やはりGlobalオブジェクトのプロパティで Applicationオブジェクトを 返 します つまり このコードはApplicationオブジェ クトとそこに 含 まれるDocumentオブジェクトとが 階 層 構 造 になっているわけ です 同 様 に Documentオブジェクトのプロパティを 使 って Documentオブ ジェクトに 含 まれるオブジェクトを 取 得 することができます このようにプロパ ティ(またはメソッド)を 重 ねて 指 定 していくことで 最 終 的 に 操 作 したいオブ ジェクトを 特 定 します たとえば DocumentオブジェクトのPageSetupプロパティで その 文 書 の ページ 設 定 を 表 すPageSetupオブジェクトを 取 得 できます 次 のコードは PageSetupオブジェクトのLeftMarginプロパティで 作 業 中 のドキュメントの 左 側 の 余 白 の 大 きさを 指 定 するものです なお 最 初 の Application. は 省 略 可 能 です Application.ActiveDocument.PageSetup.LeftMargin = 10 オブジェクトが 階 層 構 造 になっている 場 合 上 位 のオブジェクトを 親 オブ ジェクト それに 含 まれるオブジェクトを 子 オブジェクトと 呼 びます 39

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

30 1-3 データの 種 類 と 変 数 定 数 1-3 データの 種 類 と 変 数 定 数 変 数 と 定 数 の 基 礎 知 識 VBAのコードの 中 では 数 値 や 文 字 列 といったデータを 直 接 指 定 できるだ けでなく 変 数 や 定 数 といった 名 前 を 使 って 処 理 することが 可 能 です いずれにも 数 という 字 が 付 いていますが 数 値 だけでなく 文 字 列 のデータ も 変 数 や 定 数 を 利 用 して 処 理 することができます 変 数 というのは いわばデータの 入 れ 物 のようなものです プログラム 作 成 者 が 適 当 な 名 前 を 付 けて 作 った 変 数 に 任 意 のデータを 代 入 し 以 後 元 の データの 代 わりにその 変 数 を 使 って 処 理 を 行 います 変 数 にどのようなデー タが 入 るかは 処 理 のたびに 変 わる 可 能 性 があります また 変 数 はあくまで もデータの 一 時 的 な 入 れ 物 なので 処 理 の 途 中 でその 内 容 が 変 更 される 場 合 もあります 要 するに 処 理 における 役 割 を 表 すものといえます 一 方 定 数 というのは 特 定 のデータに 付 ける 名 前 のことです 変 数 とは 違 い コードの 中 で 一 度 その 名 前 に 対 応 するデータを 決 めたら 以 後 その 定 数 の 値 が 変 わることはありません 元 のデータを 直 接 使 ってもいいのです が 定 数 を 利 用 することで 数 値 などよりもそのデータの 持 つ 意 味 がわかり やすくなります たとえば 0.05 という 数 値 に zeiritu という 名 前 を 付 けて おけば この 数 値 が 税 率 を 表 すものとすぐにわかります 数 値 そのものを 複 数 の 箇 所 で 使 用 していた 場 合 後 で 税 率 が 変 更 になったときには そのすべて の 箇 所 を 修 正 する 必 要 がありますが 定 数 を 使 用 していた 場 合 は 最 初 に 定 数 を 定 義 している 箇 所 だけを 修 正 すれば 済 みます 変 数 や 定 数 として 使 用 する 名 前 の 作 成 ルールは プロシージャ 名 の 命 名 規 則 と 同 様 です プロシージャ 名 の 命 名 規 則 は 32ページ を 参 照 してください 変 数 の 使 用 方 法 変 数 は コードの 中 で 直 接 使 い 始 めることが 可 能 です VBAのキーワード ではない 語 がコード 中 に 出 現 すると 多 くの 場 合 その 語 は 変 数 と 見 なされま す たとえば 次 のコードでは a という 変 数 に 演 算 の 結 果 を 代 入 し その 変 数 の 値 をメッセージボックスに 表 示 します 1 2 a = MsgBox a Sample file Pt1P041_01.docm 41

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

32 1-3 データの 種 類 と 変 数 定 数 オブジェクト 変 数 変 数 に 収 めることができるのは 数 値 や 文 字 列 のデータだけではありませ ん 取 得 するための 処 理 が 複 雑 なオブジェクトを 変 数 に 代 入 しておくこと で 一 度 取 得 したオブジェクトを 以 降 のコード 中 で 手 軽 に 再 利 用 できるよう になります ただし オブジェクトを 変 数 に 代 入 する 操 作 は 普 通 の 変 数 の 場 合 とは 少 し 勝 手 が 違 います オブジェクト 変 数 の 場 合 通 常 の 代 入 ステートメントで はなく Setというキーワードを 使 ったSetステートメントを 使 用 する 必 要 があり ます また この 操 作 は 厳 密 にいうと 変 数 への データの 代 入 ではなく 変 数 に 対 する オブジェクトへの 参 照 のセット です 次 の 例 は Wordで 開 か れ て い る MyWork.docx と い う 文 書 を 表 す Documentオブジェクトを Dc というオブジェクト 変 数 にセットするステートメン トです Set Dc = Documents("MyWork.docx") なお オブジェクト 変 数 の 宣 言 を 行 う 場 合 データ 型 は As Object としま す ただし この 例 のようにオブジェクトの 種 類 がはっきりしている 場 合 は そ のオブジェクトの 種 類 の 名 前 そのものをデータ 型 として 指 定 できます このよう なデータ 型 を 固 有 オブジェクト 型 といいます たとえば この 場 合 のオブジェク ト 変 数 Dcを 固 有 オブジェクト 型 で 宣 言 すると 次 のようになります Dim Dc As Document 固 有 オブジェクト 型 で 宣 言 することで コードの 中 にそのオブジェクト 変 数 を 入 力 するだけで 自 動 的 にメソッドやプロパティの 候 補 が 表 示 されるといったメ リットがあります 定 数 の 使 い 方 VBAの 定 数 には 組 み 込 み 定 数 とユーザー 定 義 定 数 の2 種 類 があります 組 み 込 み 定 数 とは 文 字 通 りVBAにあらかじめ 組 み 込 まれている 定 数 で た とえば コード 中 に 1 と 書 く 代 わりに vbok のように 記 述 できます ただ こ うした 定 数 は 使 うべき 状 況 が 決 まっており 特 定 の 状 況 で 使 えばコードの 意 味 がわかりやすくなりますが それ 以 外 の 状 況 で 使 うのはかえってわかりにくく 43

33 組 み 込 み 定 数 の 具 体 的 な 例 は 57ペー ジなどを 参 考 にしてく ださい なるので 注 意 が 必 要 です 一 方 ユーザー 定 義 定 数 とは プログラム 作 成 者 がコードの 中 で 自 由 に 定 義 して 使 える 定 数 のことです ユーザー 定 義 定 数 を 使 う 場 合 は Constス テートメントを 使 ってコードの 中 で 宣 言 します たとえば ninzu という 定 数 に 5 という 数 値 を 設 定 したい 場 合 は 次 のようにします Const ninzu As Integer = 5 Const に 続 けて 定 数 名 を 書 き その 後 As に 続 けてデータ 型 を 指 定 す るところまでは 変 数 のDimステートメントと 同 様 です 定 数 の 場 合 は さらに = に 続 けて その 定 数 に 設 定 するデータまで 指 定 します 配 列 について VBAでは 一 般 的 な 数 値 や 文 字 列 といった 単 体 のデータのほかに 複 数 のデータをまとめて 取 り 扱 えるデータ 構 造 を 利 用 できます このようなデータ 構 造 のことを 配 列 といい 配 列 を 収 めることのできる 変 数 を 配 列 変 数 といいま す 実 際 には VBAで 単 に 配 列 といったときには ほとんどの 場 合 配 列 変 数 を 意 味 しています 配 列 変 数 には 固 定 長 配 列 ( 静 的 配 列 )と 動 的 配 列 とがあります 固 定 長 配 列 とは 配 列 変 数 を 宣 言 する 際 その 配 列 に 含 まれるデータ 要 素 の 数 を あらかじめ 決 めてしまう 配 列 変 数 のことです たとえば 次 のように 宣 言 する と 3つの 整 数 型 のデータ 要 素 を 持 った hairetu という 固 定 長 配 列 が 利 用 できるようになります Dim hairetu(2) As Integer 配 列 変 数 は 通 常 末 尾 に () を 付 けて 表 します 固 定 長 配 列 の 宣 言 は この 中 に 要 素 番 号 (インデックス)の 最 大 値 を 指 定 します ここでは 2 と していますが 配 列 のインデックスは 通 常 0から 始 まるため 0 1 2というイン デックスで 表 される3つのデータ 要 素 が 含 まれることになります ただし この 時 点 ではまだ 配 列 変 数 を 宣 言 しただけであり 部 屋 は3つ 用 意 したがまだ 誰 も 入 居 していない という 状 態 です たとえば この 配 列 変 数 の2 番 目 の 部 屋 に 5 という 数 値 を 代 入 したい 場 合 は 次 のようにします 44

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

35 1-4 条 件 分 岐 比 較 演 算 子 と 論 理 演 算 子 VBAでは 論 理 値 True は-1 Falseは0と 等 価 です 何 らかの 条 件 たとえば 文 書 に 何 らかの 文 章 が 入 力 されているかどうかと いった 条 件 を 設 定 し それをチェックした 結 果 に 応 じてそれぞれ 異 なる 処 理 を 実 行 するといったことが 可 能 です このような 条 件 分 岐 の 処 理 には 通 常 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の 論 理 包 括 演 算 46

36 1-4 条 件 分 岐 なお 条 件 判 断 に 利 用 できるVBAの 組 み 込 み 関 数 としては 数 値 かどう かを 調 べるIsNumeric 関 数 日 付 かどうかを 調 べるIsDate 関 数 など Is で 始 まるいくつかの 関 数 が 存 在 します こ れ ら の 関 数 は い ずれも 結 果 をTrue/ Falseで 返 します 1 行 のIfステートメント Ifキーワードを 使 って 条 件 分 岐 を 行 うIfステートメントには 1 行 だけで 終 わ る 記 述 方 法 と 複 数 行 に 渡 る 記 述 方 法 とがあります 1 行 のステートメントに は 以 下 のようなパターンがあります 書 式 パターン1 パターン2 If 条 件 式 Then 処 理 If 条 件 式 Then 処 理 1 Else 処 理 2 パターン1では 条 件 式 の 評 価 結 果 がTrueであれば Thenの 後 の 処 理 を 実 行 します 次 の 例 は 現 在 Wordで 複 数 の 文 書 が 開 かれていれば OK と いうメッセージを 表 示 するステートメントです If Documents.Count > 1 Then MsgBox "OK" Sample file Pt1P047_01.docm なお このコードのCountは コレクション(この 場 合 は 開 かれているすべて の 文 書 を 表 すDocumentsコレクション)に 含 まれているオブジェクトの 数 を 表 すプロパティです パターン2では 条 件 式 の 評 価 結 果 がTrueであれば 処 理 1を Falseであ れば 処 理 2を 実 行 します 次 の 例 は 文 書 が1つだけ 開 かれていれば OK そうでなければ NG というメッセージを 表 示 するステートメントです If Documents.Count = 1 Then MsgBox "OK" Else MsgBox "NG" Countプロパティは ほとんどのコレクション で 使 用 できます Sample file Pt1P047_02.docm 複 数 行 のIfステートメント 条 件 判 断 を 行 って 実 行 したい 処 理 が1つだけであれば1 行 のIfステートメン トで 記 述 できますが ある 条 件 を 満 たす 場 合 に 実 行 したい 処 理 が 複 数 である こともあります そのような 場 合 には Ifステートメントを 複 数 行 に 渡 って 記 述 することもできます この 方 法 としては 次 の3つのパターンがあります 47

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

38 1-4 条 件 分 岐 MsgBox "やや 多 め" ElseIf Documents.Count > 1 Then MsgBox " 普 通 " Else MsgBox " 少 ない" End If Select Caseステートメント 条 件 に 応 じて 行 いたい 処 理 の 種 類 が 多 い 場 合 If と ElseIf を 組 み 合 わせて 記 述 することもできますが 前 述 の 例 でいうと Document.Count の ような 部 分 を 何 度 も 重 複 して 記 述 する 必 要 があります このようなときに 使 うと 便 利 なのがSelect Caseステートメントです Select Caseは 次 のような 書 式 で 使 用 します 同 じ 内 容 の 式 であれ ば その 評 価 は 一 度 で 済 ませたほうがコー ドの 処 理 効 率 も 向 上 します 書 式 Select Case 評 価 式 Case 値 1 処 理 グループ1 Case 値 2 処 理 グループ2 : End Select 評 価 式 には 評 価 したい 値 を 求 める 式 を 指 定 します その 結 果 が 値 1であ れば 処 理 グループ1を 値 2であれば 処 理 グループ2を といった 具 合 で いくつでも 処 理 のグループを 追 加 できます 各 処 理 グループには いずれも1 行 以 上 のステートメントを 記 述 可 能 です また Case の 後 の 各 値 には 以 下 のような 指 定 方 法 があります 1 値 そのもの 評 価 式 の 結 果 が 指 定 した 値 そのものだった 場 合 に その 処 理 グループを 実 行 します 2 範 囲 指 定 49

39 To キーワードを 使 って 範 囲 を 指 定 することができます たとえば Case 2 To 4 のように 指 定 すると 評 価 式 の 結 果 が2から4の 範 囲 内 だった 場 合 に その 処 理 グループを 実 行 します 3 比 較 Is キーワードと 比 較 演 算 子 を 使 用 して 評 価 式 の 結 果 を 特 定 の 値 と 比 較 するような 条 件 を 設 定 することができます この 場 合 のIsキーワードは 比 較 演 算 子 のIsとは 異 なり 評 価 式 の 結 果 の 値 そのものを 表 しています たとえ ば Case Is >= 3 のように 指 定 すると 評 価 式 の 結 果 が3 以 上 であった 場 合 に その 処 理 グループを 実 行 します 4 複 数 の 値, (カンマ)で 区 切 って 複 数 の 値 を 並 べると 評 価 式 の 結 果 がそのいずれ かであった 場 合 に その 処 理 グループを 実 行 します また この 場 合 の 値 は 上 の1~3の 方 法 で 指 定 することも 可 能 です 5その 他 Case Else とすると 評 価 式 の 結 果 が 上 記 のいずれにも 当 てはまらない 場 合 に その 処 理 グループを 実 行 します また 各 Caseは 上 から 順 番 にチェックされていきます 評 価 式 の 結 果 が いずれかのCaseに 該 当 した 場 合 は その 処 理 グループが 実 行 され それ 以 降 のCaseはチェックされません したがって 評 価 式 の 結 果 が 複 数 のCase に 該 当 する 場 合 でも より 上 にあるCaseの 処 理 しか 実 行 されないので 注 意 し てください 次 のコードは Select Caseステートメントの 使 用 例 です Sample file Pt1P050_01.docm 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 50

40 1-5 繰 り 返 し 処 理 1-5 繰 り 返 し 処 理 Do...Loopステートメント 繰 り 返 し 処 理 とは 同 じ 処 理 を 何 度 も 連 続 して 実 行 するものです 処 理 の 内 容 そのものを 記 述 するのは 一 度 だけで 指 定 した 条 件 に 応 じた 回 数 だけ その 処 理 が 繰 り 返 されます VBAで 繰 り 返 し 処 理 を 実 現 する 方 法 はいくつか ありますが まずDo...Loopステートメントから 紹 介 します このステートメントの 最 もシンプルな 使 用 方 法 は 次 のようなものです 書 式 Do 処 理 グループ Loop このように 記 述 することで 処 理 グループの 部 分 ( 複 数 行 も 可 )を 無 制 限 に 繰 り 返 します ただ 本 当 に 無 制 限 に 実 行 させてしまってはプログラムが 終 了 しないので 何 らかの 仕 組 みで 繰 り 返 し 処 理 を 終 了 する 必 要 があります 通 常 これにはDoキーワード(またはLoopキーワード)と Whileキーワード またはUntilキーワードを 組 み 合 わせます 上 の 書 式 の Do の 行 を 次 のよう に 変 更 すると 条 件 式 の 評 価 結 果 がTrueである 間 は 繰 り 返 し 処 理 を 実 行 し ます 逆 に 言 うと 条 件 式 がFalseになったところで 繰 り 返 しを 終 了 し 処 理 を その 次 の 行 へ 進 めます 書 式 Do While 条 件 式 たとえば 次 のコードは 変 数 iの 値 が5 未 満 である 間 iの 値 をメッセージ ボックスに 表 示 します 掲 載 し た サ ン プ ル コードでは 変 数 を 宣 言 なしで 使 用 してい ますが 宣 言 を 行 わ なくても 実 行 は 可 能 です サンプルファイ ル 中 のコードでは 変 数 の 宣 言 を 行 ってい ます( 以 下 同 ) Do While i < 5 i = i + 1 MsgBox " 変 数 iの 値 :" & i Loop Sample file Pt1P051_01.docm 51

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

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

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

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

45 1-7 対 話 型 の 処 理 メッセージの 表 示 ここまでのサンプルコードでも 何 度 か 使 用 していますが メッセージボックス を 使 ってメッセージを 表 示 したい 場 合 は MsgBox 関 数 を 使 用 します この 関 数 の 書 式 は 次 の 通 りです 書 式 MsgBox(prompt, buttons, title, helpfile, context) prompt 等 は 引 数 ( 処 理 に 使 用 する 補 助 的 なデータ)で それぞれカンマで 区 切 って 指 定 します promptは 必 須 ですが buttons 以 下 の 引 数 は 省 略 可 能 です これ 以 降 関 数 やメソッドの 引 数 については 下 記 のような 形 式 で 説 明 します prompt 必 須 メッセージボックスに 表 示 するメッセージの 文 字 列 を 指 定 します buttons 省 略 可 ダイアログボックス 上 に 表 示 するボタンの 種 類 を 指 定 します この 引 数 を 省 略 すると OK だけが 表 示 されます title 省 略 可 メッセージボックス 上 部 に 表 示 されるタイトルの 文 字 列 を 指 定 します その 他 省 略 可 カスタムヘルプ 関 連 の 引 数 です ここでは 説 明 を 省 略 します VBAの 関 数 ( 組 み 込 み 関 数 )の 多 くは 何 らかの 処 理 を 行 って その 結 果 として 戻 り 値 を 返 します MsgBox 関 数 も ここまでは 単 にメッセージを 表 示 するためだけに 使 用 していましたが 実 は 戻 り 値 として 押 されたボタンの 種 類 を 表 す 数 値 を 返 しています MsgBox 関 数 をメッセージ 表 示 のためだけに 使 用 する 場 合 は ( ) を 付 けず MsgBox の 後 に 半 角 スペースを 空 けて 以 下 各 引 数 をカンマで 区 切 って 指 定 します 次 のコードでは 挨 拶 というタイトルで 元 気 ですか? というメッセージを 表 示 し はい と いいえ の2つのボタンを 表 示 します 56

46 1-7 対 話 型 の 処 理 MsgBox " 元 気 ですか?", vbyesno, " 挨 拶 " Sample file Pt1P057_01.docm このコードで 引 数 buttonsに 指 定 している vbyesno というのは 4 を 意 味 する 組 み 込 み 定 数 です この 引 数 に 指 定 できる 値 とその 定 数 表 示 され るボタンの 関 係 は 次 の 表 の 通 りです 組 み 込 み 定 数 につい ては43ページを 参 照 してください 値 定 数 表 示 されるボタン 0 vbokonly OK のみ 1 vbokcancel OK キャンセル 2 vbabortretryignore 中 止 再 試 行 無 視 3 vbyesnocancel はい いいえ キャンセル 4 vbyesno はい いいえ 5 vbretrycancel 再 試 行 キャンセル 引 数 buttonsでは これ 以 外 にもメッセージボックス 上 のアイコン 表 示 など に 関 する 指 定 が 行 えますが ここでは 説 明 を 省 略 します 上 記 のコードの 場 合 はい と いいえ のどちらをクリックしても その 結 果 はコードには 反 映 されず したがって 以 降 の 処 理 が 変 わるわけではありませ ん クリックされたボタンの 情 報 を 戻 り 値 として 取 得 したい 場 合 は MsgBoxを 式 として 使 用 します たとえば 次 のコードは クリックされたボタンの 種 類 を 改 めてメッセージボックスに 表 示 します 57

47 Sample file Pt1P058_01.docm If MsgBox("ボタンの 種 類 を 確 認 します", vbyesno, _ "ボタン 確 認 ") = vbyes Then MsgBox "クリックされたボタンは はい です" Else MsgBox "クリックされたボタンは いいえ です" End If クリックされたボタンを 意 味 する 数 値 も 組 み 込 み 定 数 を 使 って 表 すことが できます たとえば はい ボタンがクリックされた 場 合 の 戻 り 値 は6ですが この 数 値 は vbyes という 組 み 込 み 定 数 で 表 せます この 用 途 に 使 用 できる 定 数 としては 以 下 の 表 のようなものがあります 値 定 数 クリックされたボタン 1 vbok OK 2 vbcancel キャンセル 3 vbabort 中 止 4 vbretry 再 試 行 5 vbignore 無 視 6 vbyes はい 7 vbno いいえ データの 入 力 入 力 ボックスを 表 示 してユーザーにデータを 入 力 させ そのデータをコード の 中 で 使 用 することも 可 能 です このような 処 理 には InputBox 関 数 を 使 用 します この 関 数 の 書 式 は 次 の 通 りです 書 式 InputBox(prompt, title, default, xpos, ypos, helpfile, context) prompt 必 須 入 力 ボックスに 表 示 するメッセージの 文 字 列 を 指 定 します title 省 略 可 入 力 ボックス 上 部 に 表 示 されるタイトルの 文 字 列 を 指 定 します 58

48 1-7 対 話 型 の 処 理 default 省 略 可 入 力 ボックスに 最 初 に 入 力 されているデータを 指 定 します xpos/ ypos 省 略 可 入 力 ボックスを 表 示 する 位 置 を 画 面 の 左 上 端 から のポイント 単 位 で 指 定 します その 他 省 略 可 カスタムヘルプ 関 連 の 引 数 です ここでは 説 明 を 省 略 します この 関 数 の 戻 り 値 は 入 力 ボックスに 入 力 された 文 字 列 です ボタンとして は OK と キャンセル の2つが 表 示 されますが キャンセル がクリックされ た 場 合 は 空 白 文 字 列 ("")が 返 されます 次 のコードでは まず 入 力 ボックスに 入 力 された 文 字 列 を 変 数 istrに 代 入 します 入 力 ボックスに 何 らかの 文 字 が 入 力 されて OK がクリックされた 場 合 その 文 字 列 をメッセージボックスに 表 示 します 1 2 istr = InputBox(" 表 示 する 文 字 列 を 入 力 してください", _ " 文 字 列 入 力 ") If istr <> "" Then MsgBox istr Sample file Pt1P059_01.docm 59

49 名 前 付 き 引 数 について 本 文 中 のサンプルコードでは MsgBox 関 数 とInputBox 関 数 の 引 数 を 先 頭 から 順 番 に 指 定 していますが 前 のほうにある 引 数 を 省 略 して 後 ろの 引 数 だけを 指 定 したい 場 合 は 省 略 したい 引 数 の 分 のカンマだけを 付 け ればOKです また 書 式 で 紹 介 した prompt や title のような 名 前 を 使 って 引 数 を 指 定 することもできます この 場 合 title:=" 文 字 列 入 力 " のように 引 数 名 の 後 に := を 付 け その 後 に 引 数 の 内 容 を 指 定 します 引 数 名 を 利 用 すると 引 数 の 本 来 の 順 番 に 関 わらず 使 いたい 引 数 を 自 由 な 順 番 で 指 定 することができます たとえば 前 ページのInputBox 関 数 を 使 ったス テートメントは 引 数 名 を 使 って 次 のように 書 くことも 可 能 です istr = InputBox(title:=" 文 字 列 入 力 ", _ prompt:=" 表 示 する 文 字 列 を 入 力 してください") どちらの 書 き 方 をしても 問 題 はありませんが 本 書 ではこれ 以 降 メソッ ドで 引 数 を 指 定 する 場 合 は 原 則 として 名 前 付 き 引 数 を 使 用 して 記 述 する ことにします 一 方 プロパティやVBAの 組 み 込 み 関 数 などについては 引 数 の 名 前 を 使 用 しない 場 合 もあります 60