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

サイト管理人

9年前

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ソース

　
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

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

StrConv 関数の使い方

引数・戻り値

StrConv 関数 の使用例

サンプルVBAソース

実行結果

StrConv 関数の使用例