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 を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: 文字列：文字列を指定した形式に変換する（StrConv 関数）

StrConv 関数の使い方【書式】 result = StrConv ( s …

: 指定した数のスペースを挿入する（Spc 関数）

指定した数のスペースを挿入指定した数のスペースを挿入するには、Spc 関数を使 …

: 変数が数値型かどうかをチェックする（ IsNumeric 関数）

IsNumeric 関数の使い方【書式】 result = IsNumeric …

: データ型変換関数

データ型変換関数の使い方【書式】 function ( expression …

: データをクリアする（ClearContents メソッド）

ClearContents メソッド対象がセル範囲（Range オブジェクト） …

: 日付時刻：経過時間を取得（ Timer 関数）

Timer 関数の使い方【書式】 result = Timer () 【戻り値 …

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

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

: 文字列：文字列右から指定文字数取得（Right 関数,RightB 関数）

Right 関数・RightB 関数の使い方【書式】 result_righ …

: ユーザー定義定数（Const ステートメント）

定数を使うユーザー定義の定数を使用するには、Const ステートメントを使って …

: フォントサイズ（Size プロパティ・StandardFontSize プロパティ）

フォントサイズを取得・設定する（Size プロパティ） Size プロパティは、 …

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