逆引きサンプル集

このページは当サイト内で掲載しているサンプルマクロを逆引き形式で掲載しています。リンク先からサンプルマクロとその実行結果、解説などを参照してください。

探したいキーワード（プロパティ、メソッド、ステートメントなど）がわかっている場合は ページ内検索（Ctrl + F）を利用することで目的のページを見つけることができます。

サンプルマクロのご利用方法

標準モジュールを追加する

1. VBEを起動する
2. 標準モジュールを追加する

サンプルマクロを標準モジュールに貼り付る

サンプル内の Sub ～ End Sub（Functionがある場合はそれも含む）をコピーして、標準モジュールに貼り付けてください。コピーの方法は、マウスでドラッグして選択後、Ctrl + C 押下、または、右クリックから コピー を選択します。この他、サンプルマクロ右上に Copy ボタンが設置してある場合にはそのボタンをクリックします。

マクロを実行する

VBEまたはエクセル画面からマクロを実行する

マクロ起動用のボタンを設置する

• コマンドボタンにマクロを登録する
• オートシェイプや画像にマクロを登録する

サンプルマクロを取り込んだエクセルブックを保存する

マクロ有効ブックの保存と設定

基礎編

基礎編 – 目次ページ

導入 ～ 制御構文編

1. InputBox, MsgBoxを使用して九九を表示する
    InputBox, MsgBox, Do…Loop, For…Next , IsNumeric
2. プロシージャ引数の参照渡し・値渡しを確認する
    ByRef, ByVal
3. セル内での改行定数の表示を確認する
    vbCr, vbLF, vbCrLf, Cells
4. MsgBox内での改行定数の表示を確認する
    vbCr, vbLF, vbCrLf, MsgBox
5. 文字列を連結する
    &演算子
6. パターンマッチングで文字列を比較する
    Like演算子
7. If による複数の条件分岐
8. Select Case による複数の条件分岐
9. Select Case による複数の条件分岐（Isによる条件比較）
10. Step節を使用したForループ（その1）
     For…Next, Debug.Print
11. Step節を使用したForループ（その2）
     For…Next, Debug.Print
12. Forループを途中で終了する
     Exit For, Debug.Print
13. Doループでテキストファイルを読み込む
     Do While, Dir, MsgBox, ThisWorkbook, テキストファイル読込
14. Doループで数値の入力を受け付ける
     Do…Loop Until, InputBox
15. Withを使用してセルのプロパティを複数設定する
     With, セルのFontプロパティ, セルのInteriorプロパティ
16. 処理を直ちに終了する
     Endステートメント, On Error Resume Next

セル・レンジ編

1. Cellsと行・列番号によりセルを指定する
    Cells, For…Next
2. Cellsとインデックスによりセルを指定する
    Cells, For…Next, With
3. Rangeとアドレスによって複数のセルを指定する
    Range, With, セルのFontプロパティ, セルのInteriorプロパティ
4. RangeとRangeによって範囲を指定する
    Range, With, セルのFontプロパティ, セルのInteriorプロパティ
5. Rows や Columns を使用した範囲指定
    Rows, RowHeight, Columns, RowHeight
6. あるセルを含む行・列で指定する
    EntireRow, EntireColumn
7. 基準セルからのオフセットで指定する
    セルのOffsetプロパティ
8. 空白行と空白列で囲まれた領域
    CurrentRegion
9. セルにA1形式の数式を設定する
    Formula
10. セルにR1C1形式の数式を設定する
     FormulaR1C1
11. セルに数値・その他の表示形式を設定する
     NumberFormatLocal
12. セルに日付・時刻の表示形式を設定する
     NumberFormatLocal
13. セルの配置に関するプロパティを設定する
     
    HorizontalAlignment, IndentLevel, AddIndent, VerticalAlignment, WrapText, ShrinkToFit, MergeCells, Orientation, ReadingOrder
14. セルの文字折り返し、縮小して全体表示を設定する
     WrapText, ShrinkToFit
15. 複数のセルを結合・解除する
     MergeCells
16. セルの結合範囲を取得する
     MergeArea
17. セルのフォントに関するプロパティを設定する
     
    Font.Name, Font.FontStyle, Font.Size, Font.Underline, Font.Color, Font.Strikethrough, Font.Superscript, Font.Subscript
18. セルのフォントスタイルを設定する
     Font.FontStyle, Font.Bold, Font.Italic
19. セルの値に下線を設定する
     Font.Underline
20. セルの値に取消線、上付き文字、下付き文字を設定する
     Font.Strikethrough, Font.Superscript, Font.Subscript
21. セル文字列内の特定キーワードを部分的に着色する
     Characters, InStr, Do Until…Loop, With
22. セルの罫線を設定する
     Borders.LineStyle Borders.Weight, Borders.Color
23. セルの背景色・パターンを設定する
     Interiorプロパティ
24. セルの背景色・パターンをクリアする
     Interiorプロパティ
25. カラーパレットの一覧をリストアップする
     Interiorプロパティ
26. セルに色付きのパターンを設定する
     Interiorプロパティ
27. セルに線形グラデーションを設定する
     Interior.Pattern, Interior.Gradientプロパティ
28. セルに四角形グラデーションを設定する
     Interior.Pattern, Interior.Gradientプロパティ
29. セルを保護する
     Lockedプロパティ, シートのProtect, Unprotectメソッド
30. セルの数式を非表示にする
     Locked, FormulaHiddenプロパティ, シートのProtectメソッド
31. セルのコメントを追加・削除する
     AddComment, Comment.Deleteメソッド, Comment.Textプロパティ
32. セルの値・数式・書式・コメントをクリアする
     Clear, ClearContents, ClearFormats, ClearCommentsメソッド
33. セルをコピーする
     Copyメソッド
34. コピーしたセルの書式のみを貼り付ける
     PasteSpcialメソッド
35. セルを挿入する
     Insertメソッド
36. コピーしたセルを挿入する
     Insertメソッド
37. セルを削除する
     Deleteメソッド
38. 条件付き書式のセルを抽出する
     SpecialCells(xlCellTypeAllFormatConditions)メソッド
39. 入力規則のセルを抽出する
     SpecialCells(xlCellTypeAllValidation)メソッド
40. ブランクセルを抽出する
     SpecialCells(xlCellTypeBlanks)メソッド
41. コメントセルを抽出する
     SpecialCells(xlCellTypeComments)メソッド
42. 定数セルを抽出する
     SpecialCells(xlCellTypeConstants)メソッド
43. 数式セルを抽出する
     SpecialCells(xlCellTypeFormulas)メソッド
44. 固定範囲のソート
     Sortメソッド
45. 可変範囲のソート
     Sortメソッド, Endプロパティ
46. UsedRangeで取得した範囲をソート
     Sortメソッド, UsedRangeプロパティ
47. シート内でキーワードに部分一致するセルを検索して洗い出す
     Findメソッド, UsedRangeプロパティ, InputBox, MsgBox, Do…Loop
48. セルの終端を取得する
     Endプロパティ
49. オートフィルタを表示してからセルの終端を取得する
     Endプロパティ, AutoFilter.ShowAllDataメソッド
50. オートフィルタを使用する
     AutoFilterメソッド, ワークシートAutoFilterModeプロパティ
51. 行・列を表示にする。非表示の状態を取得する。
     Hiddenプロパティ
52. 行・列の非表示を解除する
     Hiddenプロパティ

ワークシート編

1. For Eachループでワークシート名をすべて列挙する
    Worksheetsコレクション, For Each…Next
2. Forループでワークシート名をすべて列挙する
    Countプロパティ, For…Next
3. 最後尾のワークシート名を表示する
    Countプロパティ
4. ワークシートを複数枚追加する
    Addメソッド
5. ワークシートを追加するのと同時にシート名を変更する
    Addメソッド, Setステートメント, Withステートメント
6. ワークシートをシート名で指定する
7. ワークシートをインデックスで指定する
8. シート名のチェックをしてからワークシートを追加する
    Nameプロパティ, Addメソッド, InputBox, MsgBox, Array, UBound, InStr, Len
9. シート追加前後のインデックスを表示する
    Addメソッド, For…Next, Withステートメント
10. ワークシートを非表示にする（手動で再表示可）
     Visibleプロパティ
11. ワークシートを非表示にする（手動で再表示不可）
     Visibleプロパティ
12. オートフィルタの設定有無を判定後にオートフィルタを設定する
     AutoFilterModeプロパティ, セルのAutoFilterメソッド, Withステートメント
13. オートフィルタを解除する
     AutoFilterModeプロパティ
14. 使用済みセルに背景色を設定する
     UsedRangeプロパティ, セルのInteriorプロパティ
15. ワークシート内のコメントセル数とそのアドレスを表示する
     Commentsプロパティ
16. ワークシートをアクティブにする
     Activeメソッド
17. ワークシートをコピーする
     Copyメソッド, Countプロパティ, Nameプロパティ
18. ワークシートを新規ブックへコピーする
     Copyメソッド, Nameプロパティ
19. ワークシートを移動する
     Moveメソッド, Countプロパティ
20. ワークシートを新規ブックへ移動する
     Moveメソッド
21. ワークシートを削除する
     Deleteメソッド, Application.DisplayAlertsプロパティ
22. ワークシート1枚の印刷プレビューを表示する
     PrintPreviewメソッド, 印刷ヘッダー・フッター・用紙サイズ
23. 全ワークシートの印刷プレビューを表示する
     PrintPreviewメソッド
24. 複数ワークシートの印刷プレビューを表示する
     PrintPreviewメソッド, Selectメソッド, Array
25. ワークシート1枚を印刷する
     PrintOutメソッド, 印刷ヘッダー・フッター・用紙サイズ
26. 全ワークシートを印刷する
     PrintOutメソッド
27. 複数ワークシートを印刷する
     PrintOutメソッド, Selectメソッド, Array
28. ページ指定した印刷プレビューを表示する
     PrintOutメソッド
29. 印刷ヘッダー・フッターに文言を設定する
     PageSetupプロパティ, PrintPreviewメソッド, Withステートメント
30. 印刷ヘッダーに複数のフォントとフォントサイズを設定する
     PageSetupプロパティ, PrintPreviewメソッド, Withステートメント
31. 印刷ヘッダーに日付と時刻を設定する
     PageSetupプロパティ, PrintPreviewメソッド, Withステートメント
32. 印刷フッターにページを設定する
     PageSetupプロパティ, PrintPreviewメソッド, Withステートメント

ワークブック編

1. ワークブック名をすべて列挙する
    Countプロパティ, For…Next
2. シート枚数の設定を変更して新規ブックを追加する
    Addメソッド, Application.SheetsInNewWorkbook
3. シート１枚の新規ブックを追加する
    Addメソッド
4. 一連のチェックをしてからワークブックを開く
    
   Openメソッド, Countプロパティ, ThisWorkbook,
   For…Next, Exitステートメント, MsgBox関数, Dir関数
5. ThisWorkbookの名前・パスを表示する
    Name, Path, FullNameプロパティ
6. ワークブックをアクティブにする
    Activateメソッド
7. ワークブックを保存せずに閉じる
    Closeメソッド, Withステートメント
8. ワークブックを保存して閉じる
    Closeメソッド, Withステートメント
9. ワークブックを別名で保存して閉じる
    Closeメソッド, Withステートメント, InStrRev関数, Left関数, Mid関数
10. ワークブックを保存する
     Saveメソッド
11. 新規追加したワークブックを保存する
     Saveメソッド, ThisWorkbook, Withステートメント

テキストファイル入出力編

1. テキストファイル(CSV形式)を１行ずつ読み込む（その1）
    
   Open, Line Input#, Closeステートメント, セル表示形式, ThisWorkbook, FreeFile関数, Split関数, UBound関数, For…Next, Do…Loop, Withステートメント
2. テキストファイル(CSV形式)を１行ずつ読み込む（その2）
    
   Open, Input#, Closeステートメント, セル表示形式, FreeFile関数, For…Next, Do…Loop, Withステートメント
3. テキストファイル(CSV形式)を新規作成する（その1）
    
   Open, Print#, Closeステートメント, ThisWorkbook, FreeFile関数, Join関数, データ型変換, 配列の宣言, For…Next, Withステートメント
4. テキストファイル(CSV形式)を新規作成する（その2）
    
   Open, Write#, Closeステートメント, ThisWorkbook, FreeFile関数, データ型変換, For…Next, Withステートメント
5. テキストファイル(CSV形式)へ追加書き込みする
    Open, Print#, Closeステートメント, ThisWorkbook, FreeFile関数, Join関数, 配列の宣言

関数リファレンス編

関数リファレンス – 目次ページ

組込ダイアログ編

1. InputBox関数のダイアログにデフォルト値を表示する
    InputBox関数
2. InputBox関数の入力により処理を分岐させる
    InputBox関数, MsgBox関数, If…ElseIf
3. Application.InputBoxで入力タイプを限定した入力ダイアログを表示させる
    Application.InputBoxメソッド
4. Application.InputBoxで数値のみを受け付ける入力ダイアログを表示させる
    Application.InputBoxメソッド, MsgBox関数, TypeName関数
5. Application.InputBoxでセル参照を受け付ける入力ダイアログを表示させる
    
   Application.InputBoxメソッド, Setステートメント, On Errorステートメント,
   For Each…Next, MsgBox関数
6. MsgBox関数のボタンに複数のグループを設定する
    MsgBox関数, Endステートメント
7. ファイルダイアログオブジェクトを使用して『ファイルを選択する』
    Application.FileDialog, MsgBox関数, For…Next, Withステートメント
8. ファイルダイアログオブジェクトを使用して『フォルダを選択する』
    Application.FileDialog, MsgBox関数, Withステートメント
9. ファイルダイアログオブジェクトを使用して『エクセルファイルを開く』
    Application.FileDialog, MsgBox関数, For…Next, Withステートメント
10. ファイルダイアログオブジェクトを使用して『エクセルファイルを保存する』
     Application.FileDialog, MsgBox関数, Withステートメント

文字列操作編

1. Left関数により左端から文字列を抽出する
2. Right関数により右端から文字列を抽出する
3. Mid関数により任意の位置から文字列を抽出する
4. Len関数により文字列の文字数と変数のバイト数を取得する
5. LenB関数により文字列を半角1バイト、全角2バイトとしてカウントする
6. LCase、UCase関数によりアルファベットの大文字・小文字を変換する
7. StrConv関数により文字列を各種変換（大文字・小文字、半角・全角など）する
8. StrReverse関数により文字列を反転させる
9. Replace関数により文字列の置換・削除を行う
10. InStr関数による文字列検索例
11. InStr関数によりキーワードの出現回数をカウントする
12. InStrRev関数による検索例
13. Trim関数とReplace関数により文字列内の空白を削除する
14. Format関数により数値のゼロ埋め処理をする
15. Format関数により大文字・小文字を変換する
16. Format関数により日付の書式を変換する
17. Asc、Chr関数により連続する文字コードの文字列を取得する
18. String関数によりある文字を指定の回数繰り返した文字列を取得する
19. Space関数によりある空白を指定の回数繰り返して取得する
20. StrComp関数により文字列をテキストモードで比較する

日付・時刻編

1. 日付、時刻を取得する
2. Date関数とループ処理で連続した日付を取得する
3. 日付から年・月・日を取得する
4. 時刻から時・分・秒を取得する
5. Weekday関数により曜日に対応する数値を取得する
6. WeekdayName関数により曜日（数値）に対応する曜日（文字列）を取得する
7. DateValue関数により日付を表す文字列からDate型へ変換する
8. TimeValue関数により時刻を表す文字列からDate型へ変換する
9. DateSerial関数により年月日を指定してDate型を取得する
10. DateSerial関数によりある年の月末日付をすべて取得する
11. TimeSerial関数により時分秒を指定してDate型を取得する
12. DatePart関数により四半期、通算日、週を取得する
13. DateDiff関数により日付の差分をさまざまな形式で表示する
14. Timer関数により処理時間を計測する

配列関連～データ型検査～数学関連

1. Array関数により1次元配列を作成する
2. 多次元配列の添え字上限・下限を調べる
3. Split関数によりCSV形式の文字列を分割する
4. CSVファイル内の数値を2倍にする
5. Join関数により配列内の文字列を結合する
6. Str関数により整数の符号スペースを確保して表示する
7. IsDate関数により日付のチェックをする
8. IsNumeric関数により数値のチェックをする
9. IsArray関数により変数が配列かチェックをする
10. IsEmpty関数により変数がEmptyかチェックをする
11. TypeName関数により変数のデータ型を取得する
12. Int、Fix関数により小数点を切り捨てる
13. Round関数により小数点を丸める
14. Abs関数により数値の絶対値を取得する
15. 毎回同じ乱数を生成する
16. 毎回異なる乱数を生成する
17. Sqr関数により平方根を取得する
18. 三角関数（Sin、Cos、Tan）を使用する

ファイル・フォルダ操作編

1. Dir関数によりファイルの存在をチェックする
2. Dir関数によりフォルダの存在をチェックする
3. Dir関数によりパターンにマッチするファイルを取得する
4. Dir関数によりファイル・サブフォルダの一覧を取得する
5. Dir関数によりファイル・サブフォルダの一覧を取得する（改良版）
6. CurDir関数によりカレントフォルダを取得する
7. FreeFile関数により空いているファイル番号を取得する
8. テキストファイルを読み込む際にEOFでファイルの終わりを判定する
9. カレントフォルダやドライブを変更する
10. Nameステートメントによりファイル移動と名前変更をする
11. Nameステートメントによりフォルダ名を変更する
12. FileCopyステートメントによりファイルをコピーする
13. Killステートメントでファイルを削除する
14. MkDirステートメントによりフォルダを作成する
15. RmDirステートメントによりフォルダを削除する
16. FileLen、LOF関数によりファイルサイズを取得する。

ファイルシステムオブジェクト編

ファイルシステムオブジェクト – 目次ページ

1. ファイルのパス情報を表示する
    fso.FileExists, fso.GetBaseName, fso.GetExtensionName, fso.GetFileName, fso.GetParentFolderName, fso.GetDriveName
2. カレントフォルダ内のファイル情報をシートに表示する
     fso.GetFolder, folder.Files, file.Name, file.DateLastModified, file.Size, file.Attributes

ファイル操作編

1. fso.MoveFileにより1つのファイルを移動する
    fso.MoveFile
2. fso.MoveFileにより1つのファイルを移動する（ファイル名も変更）
    fso.MoveFile
3. fso.MoveFileにより複数のファイルを1命令で移動する
    fso.MoveFile
4. file.Moveにより1つのファイルを移動する
    file.Move
5. file.Moveにより1つのファイルを移動する（ファイル名も変更）
    file.Move, fso.GetFile
6. file.Moveによりフォルダ内の複数ファイルを1つずつ移動する
    file.Move, fso.GetFolder, For Each…Next, Like演算子
7. fso.CopyFileにより1つのファイルをコピーする
    fso.CopyFile
8. fso.CopyFileにより1つのファイルをコピーする（ファイル名も変更）
    fso.CopyFile
9. fso.CopyFileにより複数のファイルを1命令でコピーする
    fso.CopyFile
10. file.Copyにより1つのファイルをコピーする
     file.Copy, fso.GetFile
11. file.Copyにより1つのファイルをコピーする（ファイル名も変更）
     file.Copy, fso.GetFile
12. file.Copyによりフォルダ内の複数ファイルを1つずつコピーする
     file.Copy, fso.GetFolder, For Each…Next, Like演算子
13. fso.DeleteFileにより1つのファイルを削除する
     fso.DeleteFile
14. fso.DeleteFileにより複数のファイルを1命令で削除する
     fso.DeleteFile
15. file.Deleteにより1つのファイルを削除する
     file.Delete, fso.GetFile
16. file.Deleteによりフォルダ内の複数ファイルを1つずつ削除する
     file.Delete, fso.GetFolder, For Each…Next, Like演算子
17. fso.CreateTextFileによりテキストファイルを出力する
     fso.CreateTextFile, For …Next, Withステートメント
18. folder.CreateTextFileによりテキストファイルを出力する
     folder.CreateTextFile, fso.GetFolder, For Each…Next, Withステートメント, Like演算子, Format関数
19. fso.OpenTextFileによりテキストファイルを読み込む1
     fso.OpenTextFile, Do…Loop, Withステートメント
20. fso.OpenTextFileによりテキストファイルを読み込む2
     fso.OpenTextFile, Do…Loop, Withステートメント
21. fso.OpenTextFileによりテキストファイルへ追加書込する
     fso.OpenTextFile, Withステートメント
22. file.OpenAsTextStreamによりテキストファイルを読み込む
     file.OpenAsTextStream, fso.GetFolder, For Each…Next, Do…Loop, Withステートメント, Like演算子, LCase関数
23. file.OpenAsTextStreamによりテキストファイルへ追加書込する
     file.OpenAsTextStream, fso.GetFolder, For Each…Next, Withステートメント, Like演算子, LCase関数, StrComp関数

フォルダ操作編

1. フォルダのパス情報を表示する
    fso.FolderExists, fso.GetParentFolderName, fso.GetDriveName
2. カレントフォルダ内のサブフォルダ情報をシートに表示する
    fso.GetFolder, folder.SubFolders, folder.Name, folder.DateLastModified, folder.Size, folder.Attributes
3. fso.MoveFolderにより1つのフォルダを移動する
    fso.MoveFolder
4. fso.MoveFolderにより1つのフォルダを移動する（フォルダ名も変更）
    fso.MoveFolder
5. fso.MoveFolderにより複数のフォルダを1命令で移動する
    fso.MoveFolder
6. folder.Moveにより1つのフォルダを移動する
    folder.Move, fso.GetFolder
7. folder.Moveにより1つのフォルダを移動する（フォルダ名も変更）
    folder.Move, fso.GetFolder
8. folder.Moveによりフォルダ内のサブフォルダを1つずつ移動する
    folder.Move, fso.GetFolder, For Each…Next, Like演算子
9. fso.CopyFolderにより1つのフォルダをコピーする
    fso.CopyFolder
10. fso.CopyFolderにより1つのフォルダをコピーする（フォルダ名も変更）
     fso.CopyFolder
11. fso.CopyFolderにより複数のフォルダを1命令でコピーする
     fso.CopyFolder
12. folder.Copyにより1つのフォルダをコピーする
     folder.Copy, fso.GetFolder
13. folder.Copyにより1つのフォルダをコピーする（フォルダ名も変更）
     folder.Copy, fso.GetFolder
14. folder.Copyによりフォルダ内のサブフォルダを1つずつコピーする
     folder.Copy, fso.GetFolder, For Each…Next, Like演算子
15. fso.DeleteFolderにより1つのフォルダを削除する
     fso.DeleteFolder
16. fso.DeleteFolderにより複数のフォルダを1命令で削除する
     fso.DeleteFolder
17. folder.Deleteにより1つのフォルダを削除する
     folder.Delete, fso.GetFolder
18. folder.Deleteによりフォルダ内のサブフォルダを1つずつ削除する
     folder.Delete, fso.GetFolder, For Each…Next, Like演算子

ドライブ操作編

1. すべてのドライブ名とそのタイプを表示する
    fso.Drives, drive.DriveLetter, drive.DriveType, For Each…Next, Withステートメント
2. すべてのドライブ名とその容量などを一覧表示する例
    fso.Drives, drive.DriveLetter, drive.DriveType, drive.IsReady, drive.TotalSize, drive.FreeSpace, For Each…Next, Withステートメント, Round関数

ディクショナリオブジェクト編

ディクショナリオブジェクト – 目次ページ

1. ディクショナリオブジェクトを使用した社員番号照会ツール
    dco.Add, dco.Count, dco.Exists, dco.Item, Do…Loop, Withステートメント, InputBox関数, MsgBox関数, Join関数
2. ディクショナリオブジェクトを使用した重複データの削除
    dco.Add, dco.Count, dco.Exists, dco.Item, Do…Loop, For…Next, MsgBox関数, UBound関数, Join関数
3. ディクショナリオブジェクトを使用した複数項目の集計(1)
    dco.Add, dco.Exists, dco.Item, Do…Loop, For Each…Next, UBound関数, データ型変換
4. ディクショナリオブジェクトを使用した複数項目の集計(2)
    dco.Add, dco.Exists, dco.Item, Do…Loop, For Each…Next, Array関数, UBound関数, データ型変換

ワークシート関数編

ワークシート関数 – 目次ページ

1. Sum関数により合計を求める
2. SumIf関数により条件付き合計を求める(1)
3. SumIf関数により条件付き合計を求める(2)
4. SumIfs関数により複数条件付き合計を求める
5. さまざまなセルのカウント (Count、CountA、CountBlank)
6. 条件付きのカウント (CountIf)
7. 複数条件付きのカウント (CountIfs)
8. 単一レンジ範囲内の最大・最小値 (Max, Min)
9. 複数レンジ範囲内の最大・最小値 (Max, Min)
10. Subtotal関数による集計処理
11. Match関数による完全一致検索
     Match関数, Do…Loop, On Errorステートメント, InputBox関数, MsgBox関数
12. VLookup関数による完全一致検索
     VLookup関数, Do…Loop, On Errorステートメント, InputBox関数, MsgBox関数
13. VLookup関数による近似値検索
     VLookup関数, Do…Loop, On Errorステートメント, InputBox関数, MsgBox関数, Split関数, UBound関数
14. Rank関数により順位を取得する
     Rank関数, For…Each Next
15. Large、Small関数により順位に対応する値を取得する
     Large, Small関数, For…Next