StrConv 関数の使い方
【書式】
result = StrConv ( string, conversion )
引数・戻り値
- string ・・・ 変換する任意の文字列・文字列式を指定します。
- conversion ・・・ 変換する形式を整数値(定数)で指定します。(設定する値は、下表「変換形式を示す定数(conversion)」を参照)
変換形式を示す定数(conversion)
値 | 定数 | 内容 |
1 | vbUpperCase | アルファベットを大文字に変換 |
2 | vbLowerCase | アルファベットを小文字に変換 |
3 | vbProperCase | 各単語の先頭の文字を大文字に変換 |
4 | vbWide | 半角文字(1 バイト)を全角文字(2 バイト)に変換 |
8 | vbNarrow | 全角文字(2 バイト)を半角文字(1 バイト)に変換 |
16 | vbKatakana | ひらがなをカタカナに変換 |
32 | vbHiragana | カタカナをひらがなに変換 |
64 | vbUnicode | システムの既定のコードページを使って文字列を Unicode に変換 |
128 | vbFromUnicode | 文字列を Unicode からシステムの既定のコードページに変換 |
StrConv 関数 の使用例
サンプルVBAソース
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 |
Sub Sample_StrConv() Dim str1, str2, str3 str1 = "abcdefgHIJKLMN" str2 = "あいうえお カキクケコ さしすせそ" str3 = "HELLO! WORLD! GOOD" Debug.Print StrConv(str1, vbLowerCase) 'アルファベットを小文字に Debug.Print StrConv(str1, vbUpperCase) 'アルファベットを大文字に Debug.Print StrConv(str2, vbHiragana) 'カタカナをひらがなに Debug.Print StrConv(str2, vbKatakana) 'ひらがなをカタカナに Debug.Print StrConv(str2, vbNarrow) '1バイト文字を2バイト文字に Debug.Print StrConv(str3, vbWide) '2バイト文字を1バイト文字に Debug.Print StrConv(str3, vbProperCase) '単語の先頭のみを大文字に End Sub |