セルの色を取得するユーザー関数

エクセルでセルの背景色取得に困ったら、セルの色を取得する

ユーザー定義関数を作る 3行マクロ 55回

セルの色を取得するユーザー定義関数

セルの色をカラーインデックス番号で取得したい時があります。 マクロを利用すると、ワークシート上で動作するユーザー定義関数というオリジナルの関数を作ることができるので、 セルの色を取得するユーザー定義関数を作成しましょう。


（サンプルファイルは、こちらから 3行マクロ55回サンプルデータ）
Excelバージョン：Excel20192016201320102007

セルの背景色を取得するユーザー定義関数

コードはつぎのように入力します。

Function セルの色(セル)
     セルの色 = セル.Interior.ColorIndex
End Function    

ユーザー定義関数を入力したら、シートに戻り、B2セルに
=セルの色(A1)と入力すれば、ColorIndexを返してくれます。

ユーザーの定義関数の構文は、本来データ型を指定するので、
以下のようにユーザー定義関数にデータ型を記入した方がほんとうは良いのですが、書かなくても動きます。

Function セルの色(セル As Range) As Integer
     セルの色 = セル.Interior.ColorIndex
End Function    
    

Functionプロシージャの構文です。

フォントの色を取得するユーザー定義関数

フォントの色ならば、

Function フォントの色(セル)
     フォントの色 = セル.Font.ColorIndex
End Function
    

というようにします。 色を知りたいけど、わざわざマクロを書くほどじゃないと言う場合には、イミディエイトウィンドウにこのように書きます。 Enterキーを押すと、３が返されます。

?Range("A1").Interior.ColorIndex

ColorIndex一覧（急ぎの場合）