VBAの名前付き範囲| 名前付き範囲を作成して使用する方法は?

ExcelVBAの名前付き範囲

特定のセルまたはセル範囲を参照しないように大量のデータを処理する場合、通常は名前付き範囲を作成し、名前付き範囲を通じて必要なセル範囲を参照できるようにします。名前範囲を作成するためのVBAには、名前の追加機能があります。

セルまたはセルの範囲を選択して、名前を付けることができます。セルに名前を付けた後、通常の行または列の参照の代わりに、定義された名前を入力することで、それらのセルを参照できます。

このVBA名前付き範囲Excelテンプレートはここからダウンロードできます–VBA名前付き範囲Excelテンプレート

名前付き範囲を作成する方法は?

名前付きの範囲を作成するのは、公園の散歩です。最初に行う必要があるのは、Excelで名前範囲を作成するセルを特定することです。

例については、以下の画像をご覧ください。

B4セルで利益を得るには、式B2 –B3を適用しました。

これは誰もが行う一般的なことです。しかし、名前を作成して、「売上高」–「コスト」のような式を適用するのはどうですか。

セルB2> [名前]ボックスにカーソルを置き、Salesと呼びます。

B3セルにカーソルを置き、コストと呼びます。

これで、利益列で、セル参照の代わりにこれらの名前を参照できます。

これは、名前付き範囲の基本です。

VBAコードを使用して名前付き範囲を作成する方法は?

例1

VBAコードを使用して名前付き範囲を作成することを考えたことはありますか?

以下の手順に従って、名前付き範囲を作成します。

ステップ1:変数を「範囲」として定義します。

コード:

 Sub NamedRanges_Example()Dim Rng As Range End Sub 

ステップ2:次に、変数「Rng」を名前を付けたい特定のセルに設定します。

コード:

 Sub NamedRanges_Example()Dim Rng As Range Set Rng = Range( "A2:A7")End Sub 

手順3:「ThisWorkbook」オブジェクトを使用してNamesプロパティにアクセスします。

Names.Addメソッドには非常に多くのパラメーターがあります。以下はその説明です。

[名前]:名前は、指定した範囲に付けたい名前に他なりません。

セルに名前を付けるときは、アンダースコア(_)記号以外の特殊文字を含めたり、スペース文字を含めたりしないでください。数値で始めることはできません。

[参照]:これは、参照しているセルの範囲に他なりません。

これらの2つのパラメーターは、手続きを開始するのに十分だと思います。

ステップ4:名前に、引数に付けたい名前を入力します。私は「SalesNumbers」という名前を付けました。

コード:

 Sub NamedRanges_Example()Dim Rng As Range Set Rng = Range( "A2:A7")ThisWorkbook.Names.Add Name:= "SalesNumbers" End Sub 

ステップ5: refers引数に、作成するセルの範囲を入力します。「Rng」変数の名前で、セルの範囲をA2からA7としてすでに割り当てているので、引数を「Rng」として指定します。

コード:

 Sub NamedRanges_Example()Dim Rng As Range Set Rng = Range( "A2:A7")ThisWorkbook.Names.Add Name:= "SalesNumbers"、RefersTo:= Rng End Sub 

このコードは、A2からA7までのセルの名前付き範囲を作成します。

ワークシートに、A2からA7までの番号をいくつか作成しました。

In the A8 cell, I want to have the total of the above cell numbers. Using named range, we will create a SUM of these numbers.

Code:

 Sub NamedRanges_Example() Dim Rng As Range Set Rng = Range("A2:A7") ThisWorkbook.Names.Add Name:="SalesNumbers", RefersTo:=Rng Range("A8").Value = WorksheetFunction.Sum(Range("SalesNumbers")) End Sub 

If you run this code manually or by pressing f5 key then, we will get the total of a named range in cell A8.

This is the basic must-know facts about “Named Ranges”.

Example #2

In VBA using RANGE object, we can refer to the cells. Similarly, we can also refer to those cells by using named ranges as well.

For example, in the above example, we have named the cell B2 as “Sales” and B3 as “Cost”.

By using actual cell reference we refer to those cells like this.

Code:

 Sub NamedRanges() Range("B2").Select 'This will select the B2 cell Range("B3").Select 'This will select the B3 cell End Sub 

Since we already created these cells we can refer to using those names like the below.

Code:

 Sub NamedRanges() Range("Sales").Select 'This will select cell named as "Sales" i.e. B2 cell Range("Cost").Select 'This will select cell named as "Cost" i.e. B3 cell End Sub 

Like this using Named Ranges, we can make use of those cells. Using these named we can calculate the profit amount in cell B4. For this first name the cell B4 as Profit.

Now in the VBA editor apply this code.

Code:

 Sub NamedRanges_Example1() Range("Profit").Value = Range("Sales") - Range("Cost") End Sub 

This will calculate the profit amount in the cell named “Profit”.