表をシマシマや市松模様にする

質問

エクセル2000です。関数かマクロでできるでしょうか？

選択した範囲を
1.１行おき、又は１列おきに塗りつぶしてシマシマにする。
2.市松模様に塗りつぶす。

関数、マクロで無理ならＶＢＡでもいいです。
よろしくお願いします。

回答No.4

mshr1962 · ベストアンサー

条件付き書式で
行の場合は「数式が」「=MOD(ROW(),2)=1」
列の場合は「数式が」「=MOD(COLUMN(),2)=1」
市松の場合は「数式が」「=MOD(ROW()+COLUMN,2)=1」
書式のON/OFFが逆の場合は比較する数値を1から0に変更してください。

お礼

数式を変えるとヒョコヒョコと塗りつぶしが変わりますね。条件付書式って面白いですね。
ありがとうございました。

回答No.3

KenKen_SP

参考 URL 先にご希望どおりのことが解説されてます。

参考URL：

http://www2.odn.ne.jp/excel/waza/cformat.html#SEC17

お礼

条件付書式についての知識が皆無です。ご紹介URLでじっくり勉強します。いろいろなことができるようで、興味深いです。
ありがとうございました。

回答No.2

char2nd

１．の場合
　「範囲指定（対象の範囲すべて）」→［書式］→［条件付き書式］→［セルの値が・次の値に等しい・=MOD(ROW(),2)］→［書式］→［パターン］→「色を選択」→［ＯＫ］→［ＯＫ］

２．のばあい
　第１列のみを上記の方法で範囲指定し設定。
　次に第２列のみを範囲指定し、［条件付き書式］の条件を「次の値に等しくない」とする。
　第１列と第２列を範囲指定し、以降書式をコピー。

お礼

条件付書式を使ったことがないのです^^;
少し勉強しなければなりませんね。
ありがとうございました。

回答No.1

syuyama

それは、表を作成後も列の挿入や行の挿入が
ありえるということでしょうか？
ないのであれば、普通に何行か自力でやり、
書式のコピーで良いのでは？

表が変わる。
行数が半端じゃない。
などの場合は

条件付き書式で
●前の行が緑なら白
●前の行が白なら緑
にして、最後までコピペでは？

これなら表の形が変わったり、挿入されようが
ずっと市松模様になると思います。

お礼

追加・削除のある表なのです。
ありがとうございました。