Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

Option Compare ステートメント

2015/04/04

Option Compare ステートメントの使い方

【書式】

Option Compare { Binary | Text | Database }

項目の説明

Binary ・・・バイナリ文字コード順によって並べ替え順序が決まります。Option Compare ステートメントの記述がない場合はこの Binary モードが使用されます。
Text ・・・ 50音順による並べ替え順になります。ただし、大文字と小文字、文字幅、カタカナとひらがなは区別しません。
Database ・・・ Microsoft Access でのみ使用できます。

Option Compare ステートメントは、文字列データの既定の比較方法を設定します。
宣言セクション内（モジュールの先頭部分）に記述し、モジュールレベルで使用します。

Option Compare ステートメントの使用例

サンプルVBAソース（Text モード）

　
Option Compare Text

Sub sample_option_compare_text()


    MsgBox """a""=""A""  ：　" & IIf("a" = "A", True, False) & Chr(13) & _
           """*""=""＊"" ：　" & IIf("*" = "＊", True, False) & Chr(13) & _
           """５""=""5"" ：　" & IIf("*" = "＊", True, False) & Chr(13) & _
           """？""=""?"" ：　" & IIf("*" = "＊", True, False) & Chr(13) & _
           """ア""=""あ""：　" & IIf("ア" = "ｱ", True, False) & Chr(13) & _
           """ア""=""ｱ"" ：　" & IIf("ア" = "ｱ", True, False)
    
End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

　

Option Compare Text

Sub sample_option_compare_text()

MsgBox """a""=""A"" ：　" & IIf("a" = "A", True, False) & Chr(13) & _

"""*""=""＊"" ：　" & IIf("*" = "＊", True, False) & Chr(13) & _

"""５""=""5"" ：　" & IIf("*" = "＊", True, False) & Chr(13) & _

"""？""=""?"" ：　" & IIf("*" = "＊", True, False) & Chr(13) & _

"""ア""=""あ""：　" & IIf("ア" = "ｱ", True, False) & Chr(13) & _

"""ア""=""ｱ"" ：　" & IIf("ア" = "ｱ", True, False)

End Sub

　

実行結果

サンプルVBAソース（Binary モード）

Option Compare Binary　　　　'「規定値」なのでなくても同じ

Sub sample_option_compare_text()


    MsgBox """a""=""A""  ：　" & IIf("a" = "A", True, False) & Chr(13) & _
           """*""=""＊"" ：　" & IIf("*" = "＊", True, False) & Chr(13) & _
           """５""=""5"" ：　" & IIf("*" = "＊", True, False) & Chr(13) & _
           """？""=""?"" ：　" & IIf("*" = "＊", True, False) & Chr(13) & _
           """ア""=""あ""：　" & IIf("ア" = "ｱ", True, False) & Chr(13) & _
           """ア""=""ｱ"" ：　" & IIf("ア" = "ｱ", True, False)
    
End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

Option Compare Binary　　　　'「規定値」なのでなくても同じ

Sub sample_option_compare_text()

MsgBox """a""=""A"" ：　" & IIf("a" = "A", True, False) & Chr(13) & _

"""*""=""＊"" ：　" & IIf("*" = "＊", True, False) & Chr(13) & _

"""５""=""5"" ：　" & IIf("*" = "＊", True, False) & Chr(13) & _

"""？""=""?"" ：　" & IIf("*" = "＊", True, False) & Chr(13) & _

"""ア""=""あ""：　" & IIf("ア" = "ｱ", True, False) & Chr(13) & _

"""ア""=""ｱ"" ：　" & IIf("ア" = "ｱ", True, False)

End Sub

　

実行結果

- VBA基本 Option Compare Binary, Option Compare Text, Option Compare ステートメント, VBA基本, エクセルVBA

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: フォントの設定（Font プロパティ）

フォントの設定（Font プロパティ）指定されたオブジェクトのフォント情報（F …

: 変数のデータ型・宣言（Dim ステートメント）

変数の宣言一般的な方法【書式】 Dim varname [ As type, …

: オートシェイプの種類を表す定数（MsoAutoShapeType 列挙型）

MsoAutoShapeType 列挙型オートシェイプオブジェクトの図形の種類 …

: 式を評価し、結果（真・偽）に応じた式・値を返す（IIf 関数）

IIf 関数の使い方 IIf（アイイフ）関数は、式を評価してその結果（真・偽） …

: 引数の整数部分を取得する（Fix 関数・Int 関数）

Fix 関数・Int 関数の使い方【書式】 number_fix = Fix …

: 色の設定（ThemeColor プロパティ・TintAndShade プロパティ）

ThemeColor プロパティ・TintAndShade プロパティテーマカ …

: Array 関数（バリアント型の配列を作成）

Array 関数の使い方【書式】 myArray = Array ( elem …

: 指定した値を16進数で表記した文字列に変換する（Hex 関数）

Hex 関数の使い方【書式】 result = Hex ( expressi …

: 四捨五入・切り上げ・切り捨て・丸め（Round 関数他）

Round 関数（丸め）の使い方【書式】 value = Round ( ex …

: 日付時刻：日付時刻から情報取得（ DatePart 関数）

DatePart 関数（日付・時刻の値から情報を取得）【書式】 result …

PREV: Split 関数（文字列型の一次配列を作成）
NEXT: コレクション（Collection）オブジェクト「連想配列」