指定されたセルの最初の文字が大文字かどうかをExcelで確認するにはどうすればよいですか？

Excelのセルですべての文字を大文字にすることは簡単かもしれません。しかし、指定されたセルの最初の文字だけが大文字かどうかを確認する方法はご存じですか？この記事では、それを実現するためのVBAコードを紹介します。

VBAコードを使用して、指定されたセルの最初の文字が大文字かどうかを確認する

VBAコードを使用して、指定されたセルの最初の文字が大文字かどうかを確認する

以下の手順に従って、Excelでセルの最初の文字が大文字かどうかを確認するためにVBAコードを適用してください。

1. Alt + F11キーを同時に押して、Microsoft Visual Basic for Applicationsウィンドウを開きます。

2. Microsoft Visual Basic for Applicationsウィンドウで、挿入 > モジュールをクリックしてください。その後、次のVBAコードをコードウィンドウにコピーして貼り付けます。

VBAコード：セル内の最初の文字が大文字かどうかを確認する

Sub UpperCaseCheck()
    Dim xRg As Range
    Dim xAsc As Integer
    Set xRg = Range("A1")
    xAsc = Asc(Mid(xRg.Value, 1, 1))
    If xAsc > 64 And xAsc < 91 Then
        MsgBox "First alpha character is capital"
    Else
        MsgBox "First alpha character is not capital"
    End If
End Sub

注釈: コード内では、A1は最初の文字が大文字かどうかを確認するセルです。必要に応じて変更してください。

3. F5キーを押してコードを実行します。すると、Microsoft Excelのダイアログボックスが表示され、指定されたセルの最初の文字が大文字かどうかが以下のように示されます。

関連記事：

• Excelでセルの値がある2つの値の間にあるかどうかを確認するにはどうすればよいですか？
• Excelでセルが特定の文字で始まるか終わるかを確認するにはどうすればよいですか？