Excel VBAで小文字を大文字に変換する方法3選！

Excel VBAで小文字を大文字に変換する方法を知りたいときはないでしょうか。

けど、そんな中で悩むことは、

・Excel VBAで小文字を大文字に変換する方法がわからない

ですよね。

今回はそんなお悩みを解決する

・Excel VBAで小文字を大文字に変換する方法3選

についてまとめます！

Excel VBAで小文字を大文字に変換する方法は？

UCase関数を使用する

UCase関数は、文字列の小文字を大文字に変換するための関数です。

サンプルコード

以下サンプルコードです。

Sub 小文字を大文字に変換1()
    Dim str As String
    str = "extan"
    str = UCase(str) ' 小文字を大文字に変換する
    Debug.Print str
End Sub

結果

EXTAN

タカヒロ

小文字を大文字に変換する方法としては一番かんたんにできますので、お勧めです。

StrConv関数を使用する方法

StrConv関数は、文字列を変換するための機能を提供しています。
第二引数にvbUpperCaseを指定することで、文字列の小文字を大文字に変換することができます。

サンプルコード

以下サンプルコードです。

Sub 小文字を大文字に変換2()
    Dim str As String
    str = "EXTAN"
    str = StrConv(str, vbUpperCase) ' 小文字を大文字に変換する
    Debug.Print str
End Sub

結果

EXTAN

StrConv関数の定数

StrConv関数の引数に設定できる定数は以下の通りです。

定数	値	内容
vbUpperCase	1	文字列を大文字に変換
vbLowerCase	2	文字列を小文字に変換
vbProperCase	3	文字列の各単語の先頭の文字を大文字に変換
vbWide	4	文字列内の半角文字を全角文字に変換
vbNarrow	8	文字列内の全角文字を半角文字に変換
vbKatakana	16	文字列内のひらがなをカタカナに変換
vbHiragana	32	文字列内のカタカナをひらがなに変換
vbUnicode	64	システムの既定のコードページを使って文字列をUnicodeに変換
vbFromUnicode	128	文字列をUnicodeからシステムの既定のコードページに変換

参考：https://support.microsoft.com/ja-jp/office/strconv-%E9%96%A2%E6%95%B0-19c3816f-dbc9-4adf-891c-fd32734c92e0

Asc関数とChr関数を使用する方法

Asc関数は、文字のASCIIコード値を取得するための関数であり、Chr関数は、ASCIIコード値から文字を取得するための関数で組み合わせて小文字を大文字に変換していきます。

サンプルコード

Sub 小文字を大文字に変換3()
    Dim str As String
    Dim i As Integer
    
    str = "extan"
    For i = 1 To Len(str)
        If Asc(Mid(str, i, 1)) >= 97 And Asc(Mid(str, i, 1)) <= 122 Then ' 小文字の場合
            Mid(str, i, 1) = Chr(Asc(Mid(str, i, 1)) - 32) ' 小文字を大文字に変換する
        End If
    Next i
    Debug.Print str
End Sub

結果

EXTAN

説明

大文字英字のコード範囲は97-122となりますので、コードがその範囲であるかどうかを判定します。
次に32番目にさかのぼると小文字に対応する大文字となりますので、コードに32を減算し大文字英字を導き出しています。

文字の種類	CODE範囲-開始	CODE範囲-終わり
半角数字	48	57
半角英字（大文字）	65	90
半角英字（小文字）	97	122
半角カタカナ	161	223
全角数字	9007	9018
全角ひらがな	9249	9331
全角カタカナ	9505	9590
全角漢字	12321	29734