EXCELの塗りつぶし色・文字色の変数取得

締切済

質問者：ash_charlotte
質問日時：2005/06/08 18:43
回答数：3件

こんにちは。
EXCEL VBAにて現在選択されている塗りつぶし色・文字色の変数を取得したいのですがその変数が何になるのかわかりません。

xlColorIndexは定数でした。
オブジェクトブラウザを見ましたがどれを
使ったらよいのかわかりませんでした。
ご存知の方、ご教授願います。

通報する

この質問への回答は締め切られました。

質問の本文を隠す

回答 (3件)

最新から表示
回答順に表示

No.3

回答者： pankun
回答日時：2005/06/09 11:06

下記に、セルの色番号取得のためのユーザー定義関数の作成方法が紹介されていましたので、ご参考になれば…。

http://hp.vector.co.jp/authors/VA016119/hajimete …

またセルの色の数値番号は下記サイトで紹介されていました。バージョンによって多少違うようですが、基本色はほとんど変わらないようですね。
http://www2s.biglobe.ne.jp/~iryo/2vba/vba26y.htm …

参考URL：http://www2s.biglobe.ne.jp/~iryo/2vba/vba26y.htm …

- 0
- 件

通報する

No.2

回答者： aiho
回答日時：2005/06/08 19:25

現在選択されているセルの色番号ということでしょうか？

であれば、
塗りつぶしの色番号
ActiveCell.Interior.ColorIndex
フォントの色番号
ActiveCell.Font.ColorIndex
です。こちらは自動記録で確認できるかと思います。

現在のブックのパレットのRGB値を取得したいのであれば
ActiveWorkbook.Colors([パレット番号1～56])
です。

上二つを合わせれば、現在のフォント色のRGB値
ActiveWorkbook.Colors(ActiveCell.Font.ColorIndex)
といった取得も可能です。