Excel VBARGBカラー
RGBは、赤、緑、青とも呼ばれます。この関数は、色の値の数値を取得するために使用されます。この関数には、名前付き範囲として3つのコンポーネントがあり、他の色はコンポーネントと見なされます。 VBAのこれらの3つの異なる色の。
VBAでは、すべてがすべてのピースのコーディングに要約されます。たとえば、ワークシートの一部を参照する場合はRANGEオブジェクトを使用でき、フォントの色を変更する場合はNAMEプロパティを使用できます。範囲内で必要なフォント名を入力しますが、フォントの色やセルの背景色を変更する状況を想像してください。vbGreen、vbBlue、vbRedなどの組み込みのVB色を利用できます。さまざまな色で遊ぶための専用機能、つまりRGB機能があります。
以下は、RGBカラー関数の構文です。
上記のように、赤、緑、青の3つの引数を指定できます。これらの3つのパラメーターはすべて、0から255の範囲の整数のみを受け入れることができ、この関数の結果は「Long」データ型になります。
VBARGB関数を使用してセルの色を変更する
このVBARGB Excelテンプレートはここからダウンロードできます– VBA RGBExcelテンプレート例1
たとえば、次の画像に示すように、セルA1からA8までの番号があります。
この範囲のセルでは、RGB関数を使用してフォントの色をランダムな色に変更しようとします。
最初にマクロプロシージャを開始します。
コード：
Sub RGB_Example1（）End Sub
まず、色を変更したいフォントのセル範囲を参照する必要があります。この場合、セル範囲はA1からA8なので、RANGEオブジェクトを使用して同じものを指定します。
コード：
Sub RGB_Example1（）Range（ "A1：A8"）End Sub
ドットを入力して、RANGEオブジェクトのIntelliSenseリストを表示します。フォントの色を変更しようとしているIntelliSenseリストから、リストからFONTプロパティを選択します。
コード：
Sub RGB_Example1（）Range（ "A1：A8"）。Font End Sub
このプロパティでFONTプロパティを選択したら、色を変更しようとしているので、FONTのcolorプロパティを選択します。
コード：
Sub RGB_Example1（）Range（ "A1：A8"）。Font.Color End Sub
等号を付けてRGB関数を開きます。
コード：
Sub RGB_Example1（）Range（ "A1：A8"）。Font.Color = RGB（End Sub
RGB関数の3つの引数すべてに、0から255の範囲のランダムな整数を指定します。
コード：
Sub RGB_Example1（）Range（ "A1：A8"）。Font.Color = RGB（300、300、300）End Sub
では、コードを実行して、A1からA8までのセルのフォントの色の結果を確認します。
出力：
そのため、フォントの色が黒から別の色に変わりました。色は、RGB関数に与える数値によって異なります。
以下は、一般的な色のいくつかを取得するためのRGBカラーコードです。
整数の組み合わせを0から255に変更するだけで、さまざまな種類の色を取得できます。
例2
同じ範囲のセルについて、これらのセルの背景色を変更する方法を見てみましょう。
まず、RANGEオブジェクトを使用してセルの範囲を指定します。
コード：
サブRGB_Example2（）範囲（ "A1：A8"）。エンドサブ
今回は上記のセルの背景色を変更しているので、FONTプロパティとは関係なく、背景色を変更するには、RANGEオブジェクトの「Interior」プロパティを選択します。
コード：
Sub RGB_Example2（）Range（ "A1：A8"）。Interior End Sub
「Interior」プロパティを選択したら、ドットを入力して、この「Interior」プロパティのプロパティとメソッドを表示します。
コード：
Sub RGB_Example2（）Range（ "A1：A8"）。Interior。エンドサブ
上記のセルの内部の色を変更しているので、「色」プロパティを選択します。
コード：
Sub RGB_Example2（）Range（ "A1：A8"）。Interior.Color End Sub
セル範囲（A1からA8）の内部色プロパティを等号で設定し、RGB関数を開きます。
コード：
Sub RGB_Example2（）Range（ "A1：A8"）。Interior.Color = RGB（End Sub
必要に応じて乱数を入力します。
コード：
Sub RGB_Example2（）Range（ "A1：A8"）。Interior.Color = RGB（0、255、255）End Sub
コードを実行して、背景色を確認します。
出力：
背景色が変更されました。
ここで覚えておくべきこと
- RGBは、赤、緑、青の略です。
- これらの3つの色の組み合わせは異なる色を与えます。
- これら3つのパラメーターはすべて、0から255までの整数値のみを受け入れることができます。これを超える数値は255にリセットされます。