RGB関数:色を表す数値を取得する
RGB 関数は Excel VBA で用意されている関数の一つで、引数に指定した赤、緑、青のそれぞれの割合から色を表す数値を取得することができます。セルの背景色や表示される文字の色を指定する場合に使用します。ここでは Excel VBA における RGB 関数の使い方について解説します。
(Last modified: )
目次
RGB関数の定義と使い方
RGB
関数は赤、緑、青の色の割合を指定し、色を表す Long
型の数値を返します。
1 番目の引数には赤の割合を表す数値を 0 から 255 までの Integer
型の数値で指定してください。
2 番目の引数には緑の割合を表す数値を 0 から 255 までの Integer
型の数値で指定してください。
3 番目の引数には青の割合を表す数値を 0 から 255 までの Integer
型の数値で指定してください。
代表的な色を作成する場合の色の指定は次の通りです。
作成される色 | 赤 | 緑 | 青 |
---|---|---|---|
黒 | 0 | 0 | 0 |
青 | 0 | 0 | 255 |
緑 | 0 | 255 | 0 |
シアン | 0 | 255 | 255 |
赤 | 255 | 0 | 0 |
マゼンタ | 255 | 0 | 255 |
黄色 | 255 | 255 | 0 |
白 | 255 | 255 | 255 |
次の例を見てください。
Debug.Print RGB(255, 0, 255) '16711935
RGB
関数は指定した引数に対する色を表す数値を返すので、今回はマゼンタを表す 16711935 とイミディエイトウィンドウに出力されます。
それでは簡単なサンプルを作成して試してみます。
Option Explicit Sub RGB関数() Range("B2").Value = "東京都" Range("B2").Interior.Color = RGB(48, 48, 48) Range("B2").Font.Color = RGB(255, 255, 255) Range("C2").Interior.Color = RGB(0, 148, 255) End Sub
このプログラムを実行すると、 B2 セルの文字色と背景色、 B3 セルの背景色がそれぞれ指定した色に設定されます。
-- --
Excel VBA における RGB 関数の使い方について解説しました。
( Written by Tatsuo Ikura )
著者 / TATSUO IKURA
これから IT 関連の知識を学ばれる方を対象に、色々な言語でのプログラミング方法や関連する技術、開発環境構築などに関する解説サイトを運営しています。