Excel2007 VBAで行のセルカラー変更後の枠線

質問

VBAを使い行全体の色を変更しました。

Range(Cells(1, 1), Cells(1, 256)).Interior.Color = RGB(210, 210, 255)

この方法だと完全に塗り潰されるのですが枠線を残すことはできないでしょうか？

宜しくお願いします

回答No.1

imogasi · ベストアンサー

エクセルのオプションー表示の枠線の色を色々変えても効果は無いようだ。
別途そのセル範囲に、罫線を各セルに引いて、線の色をセル色と対立的な色指定するほか無いと思う。
システムカラーの問題でもなさそうだ。

お礼

仰るように仕様ということのようなので諦めたいと思います。
ご回答頂きありがとうございました。

回答No.2

有田 賢治（@ARIKEN43）

atseさん 今日は！
>Range(Cells(1, 1), Cells(1, 256)).Interior.Color = RGB(210, >210, 255)この方法だと完全に塗り潰されるのですが枠線を残すことは>できないでしょうか？
どうやら連続でセルに色を付けてしまうようです。
従って下記サイトを利用して後から表罫線を作成するマクロを追加したら良いと思います。(１例としたサイト)
■すぐに役立つエクセルのＶＢＡマクロ集(Excel VBA Macro HP)↓
http://www.asahi-net.or.jp/~zn3y-ngi/index.html
内容：ホームページの左にメニューが有るので、「セル制御」をクリック→細部メニュー→Macro セル制御・応用型の8* 使われたセル範囲に罫線を設定するをクリツクしますと、6-1) 罫線の設定画面にサンプルのマクロが表示されます。
セルの色付けは連続ですと罫線枠は隠れる仕様のようです。
罫線枠は太い線と色はセルに付けた色の反対色を選んだ方がハッキリするでしょう。
■はじめてのユーザー定義関数 ～ 色のついたセルを合計↓
http://hp.vector.co.jp/authors/VA016119/hajimete/udf1.html
内容：ワークシート関数の中にはセルの色を取得できる関数はありません。しかし、マクロを使えば可能です。そこで、今回は VBA でユーザー定義関数を作り、色を取得するようにしてみましょう。
上記サイトは参考までに。

お礼

ご回答頂きありがとうございました。