【エクセル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