【エクセルVBA】大文字(小文字)に変換

当ページのリンクには広告が含まれています。

スポンサーリンク

エクセルVBAを使って文字列を大文字や小文字に変換する方法について解説します

クリックしてジャンプ

大文字に変換

UCase関数は 指定された文字列内のすべての小文字を大文字に変換します

Dim upperCaseString As String
upperCaseString = UCase("Hello World")
MsgBox "大文字に変換: '" & upperCaseString & "'"

小文字に変換

LCase関数は 指定された文字列内のすべての大文字を小文字に変換します

Dim lowerCaseString As String
lowerCaseString = LCase("Hello World")
MsgBox "小文字に変換: '" & lowerCaseString & "'"

文字列が空の場合などのエラー対応

LCase関数は 指定された文字列内のすべての大文字を小文字に変換します

Sub SafeCaseConversionExample()
    Dim text As String
    Dim result As String
    
    ' 大文字への変換
    text = Range("A1").Value
    If Len(text) > 0 Then
        result = UCase(text)
    Else
        result = text
    End If
    Range("B1").Value = result
    
    ' 小文字への変換
    text = Range("A2").Value
    If Len(text) > 0 Then
        result = LCase(text)
    Else
        result = text
    End If
    Range("B2").Value = result
End Sub
  • Len関数を使って文字列の長さをチェックし、空でない場合にのみUCaseまたはLCase関数を適用します。
  • 文字列が空の場合は、元の文字列をそのまま結果として使用します。

出力結果:セルA1に「excel vba」、セルA2に「EXCEL VBA」が入力されている場合

セルB1: EXCEL VBA
セルB2: excel vba

スポンサーリンク

クリックしてジャンプ