ExcelWork.info

Excel(エクセル)のマクロ・VBA・関数・操作などのメモ

文字列:2つの文字列を比較する(StrComp 関数)

   

StrComp 関数の使い方


【書式】

result = StrComp ( string1, string2, [ compare ] )


引数・戻り値

  • string1,string2  ・・・  任意の文字列・文字列式を指定します。
  • compare  ・・・  文字列の比較モード(-1,0,1)を指定します。省略時は、「Option Compare ステートメント」の設定により比較モードが決まります。

    定数 内容
    -1 vbUseCompareOption Option Compare ステートメントの設定を使用して比較
    0 vbBinaryCompare バイナリモードの比較
    1 vbTextCompare テキストモードの比較(大文字・小文字を同一視)
    2 vbDatabaseCompare Microsoft Access の場合のみ有効


  • result  ・・・  文字列を比較し結果に応じて(-1,0,1,Null 値)のいずれかを返します。文字の大小関係は基本的には、ASCIIコード・JISコードの大小となります。ただし、テキストモードでは、「大文字・小文字」、「全角・半角」、「かたかな・ひらがな」はいずれも同一とみなされます。

    戻り値 内容
    -1 string1string2 未満
    0 string1string2 は等しい
    1 string1string2 を超える
    Null 値 string1 または string2 が Null 値




StrComp 関数 の使用例

サンプルVBAソース


実行結果

StrComp 関数 例




 - VBA基本 , , ,

Comment

  1. あああああ より:

    戻り値の意味が分かりません
    未満ってなんですか
    超えるってなんですか
    含有とは違うのですか

    • 管理人 より:

      文字の大小関係は、文字コードでの大小となります。
      たとえば「c」と「a」を比べると以下のようになります。

        result = StrComp(“c”, “a”)

      この時、ASCII コードで、”c” は、99 、”a” は 97 となります
      つまり、”c” > “a” となるので、result は、1 となります。

あああああ へ返信する コメントをキャンセル

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

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

  関連記事

変数宣言と変数のデータ型
変数のデータ型・宣言(Dim ステートメント)

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

定数(改行・タブ) 使用例
文字列:定数(改行・タブ)

改行・タブの定数 これらの定数は、使用前に定義する必要はありません。コード中のど …

日付時刻:日付・時刻の間隔を取得( DateDiff 関数 )

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

式の値に応じて多分岐を行う(Switch 関数)

Switch 関数 の使い方 Switch 関数は、「式・値」を対にして指定して …

Dictionary オブジェクト 使用例1
連想配列(Dictionary オブジェクト)

連想配列 連想配列とは、添字(キー)に文字列を使用することができる配列です。 V …

引数の整数部分を取得する(Fix 関数・Int 関数)

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

QBColor 関数 使用例
色を設定する(QBColor 関数)

QBColor 関数 QBColor 関数は、指定した色番号に対応するRGB コ …

Option Compare Text 例
Option Compare ステートメント

Option Compare ステートメントの使い方 【書式】 Option C …

Split 関数(文字列型の一次配列を作成)

Split 関数の使い方 【書式】 myArray = Split ( expr …

変数が数値型かどうかをチェックする( IsNumeric 関数 )

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