VBAUCase関数| ExcelVBAでテキストを大文字に変換する

Excel VBAUCase関数

VBAのUcaseは、提供された入力文字列を大文字に変換するために使用される組み込み関数であり、入力として文字列である単一の引数を取り、この関数によって生成される出力は文字列です。この関数は、最初の文字だけでなく、すべての関数を大文字に変換することに注意してください。

Excelで一部のテキスト値を大文字に変換する必要がある場合があります。これは、通常のワークシート関数のUPPER関数とVBAコードのUCase関数を使用して実行できます。

すでにVBAでUPPER関数を検索している場合は、ワークシート関数クラスを使用しても見つかりません。VBAでは、これは完全に異なり、短い名前の関数、つまり「UCASE」です。ここで、「U」は「UPPER」を表すため、式は「UPPERCASE」になります。

構文

次に、UCASE関数の構文を見てください。

文字列:これは、大文字に変換しようとしているテキスト値に他なりません。これは、直接値またはセル参照の場合もあります。両方の種類の例をすぐに見ていきます。

VBA Ucaseを使用してテキストを大文字に変換する方法は?

このVBAUCase Excelテンプレートはここからダウンロードできます– VBA UCaseExcelテンプレート

例1

UCase関数を使用して、テキスト値Excelvbaを大文字のテキストに変換してみましょう。

ステップ1:マクロを作成してサブプロシージャを開始します。

コード:

 Sub UCase_Example1()End Sub 

手順2:変数をVBA文字列として宣言します。

コード:

 Sub UCase_Example1()Dim k As String End Sub 

ステップ3:「UCASE」関数を適用して、変数「k」に値を割り当てます。

ステップ4:ここで、文字列は大文字に変換しようとしているターゲットテキスト値であり、文字列値は「excelvba」です。

コード:

 Sub UCase_Example1()Dim k As String K = UCase( "excel vba")End Sub 

ステップ5:変数の結果をメッセージボックスに表示しましょう。

コード:

 Sub UCase_Example1()Dim k As String k = UCase( "excel vba")MsgBox k End Sub 

さて、VBAコーディングの部分は終わりです。マクロを実行して、メッセージボックスに結果を表示してみましょう。

したがって、大文字関数は、テキスト値「excelvba」を「EXCELVBA」にほんの数秒で変換しました。

例2

関数へのセル参照を使用する例を見てみましょう。セルA1に入力したのと同じテキスト値。

ステップ1:結果を範囲B1セルに表示するため、コードは範囲( "B")になります。値=

コード:

 Sub UCase_Example2()Range( "B1")。Value = End Sub 

ステップ2: UCASE関数を介してセルB1にデータを保存するので、UCASE関数を開きます。

ステップ3:ここで、文字列値は今回のセル参照です。したがって、セル参照をRange(“ A1”)。Valueとして指定します。

コード:

 Sub UCase_Example2()Range( "B1")。Value = UCase(Range( "A1")。Value)End Sub 

だから、完了。

コードを実行して、B1セルで結果を確認します。

例3

上記の例では、単一セルの値のみが大文字に変換されています。下の画像のような名前がいくつかあると想像してみてください。

このような場合、1行ごとにコードを記述し続けることはできないため、数式をループで囲む必要があります。以下のコードは、上記のテキスト値を一度に大文字に変換します。

コード:

 Sub UCase_Example3()Dim k As Long For k = 2 To 8 Cells(k、2).Value = UCase(Cells(k、1).Value)Next k End Sub 

これにより、次のように、すべてのテキスト値が行2から行8に大文字に変換されます。

選択したすべてのセル値を大文字に変換する場合は、以下のコードを使用してください。

コード:

 Sub UCase_Example4()Dim Rng As Range Set Rng = Selection For Each Rng In Selection Rng = UCase(Rng.Value)Next Rng End Sub 

このコードを機能させるには、最初に大文字に変換するセルの範囲を選択してから、マクロを実行する必要があります。選択した範囲でのみ、テキスト値が大文字に変換されます。