[[20070926140629]]　『関数表示された結果をみて、行毎に色付けしたい』（マクロビジター）　ページの最後に飛ぶ

『関数表示された結果をみて、行毎に色付けしたい』（マクロビジター）

色つけについてこちらを参考にしたのですが、

http://www.excel.studio-kazu.jp/cgi-bin/kazuwiki2.cgi?mycmd=read&mypage=[[20050601170355]]

色つけをしたいセルには、条件が入っています。
条件結果を見て、色分けをしたいのですがうまくいきません。

    A   B   C (Cに入ってる式）
1   1   1  ○ =IF(A1=B1,"○","×")
2   1   2  × =IF(A2=B2,"○","×")
3   2   2  ○ =IF(A3=B3,"○","×")

結果の○×で色分けをしたいのです。
すみませんが、ご教授願います。

 Ｃ列の結果によって、Ａ列～Ｃ列に色付けですか？

 条件付書式　「数式が」「=$C1="○"」or「=$C1="×"」
　　　　　　　　　 又は「=$A1=$B1」

 （e2qw）条件付き書式
http://www.excel.studio-kazu.jp/lib/e2qw/e2qw.html

 (Ohagi)

 どこが対象なのかわからないけど、Ａ１～Ｃ？までとして、
 Ａ１～Ｃ？を選択。
 条件付書式、数式が
 =$C1="○"
 =$C1="×"
 で、各好きな色。
 BJ

 やっぱ書いとこ
 こそーっと修正して、修正しましたとのコメントもなしだと、
 後に続いた人がバカ丸出しだからやめてね。

 私のこと？
 スミマセンね(^_^;)
 間違いに気づいて書き込んだ後に、BJさんのを読みました
 別に、こそーっとしてるつもりは無いのですが、御気を悪くさせたみたいですみません

 (Ohagi)

Ohagiさん、BJさん、ありがとうございます。
出来ました。

が、続いて質問させてください。

このマクロは、次の様な流れになっています。

1.全てのデータを取得

2.マクロで抽出した一部のデータを新しいシート（シート1）にコピー　

3.シート1でエラーチェック（今回の○×をします）し、色分けをします。　

新しいシートで対応するのですが、それは問題ないのでしょうか。
今はテストでアクティブシートで対応しているので問題ないのですが、
色々やってみているのですが上手に出来ません。。。

申し訳ありません。
ご教授願います。

 マクロでのご質問だったのですね…(^_^;)
 マクロでの回答を希望すると明言した方が、ご希望の回答が得られると思いますよ？
 私はここで退却いたします<(_ _)>

 (Ohagi)

出来ました！！！

こちらで質問していたら、回答頂きました。

http://www.excel.studio-kazu.jp/cgi-bin/kazuwiki2.cgi?mycmd=read&mypage=[[20070926111000]]&mytime=174325

それを自分でいじってみたら、自分のしたいことが出来ました。
Sub 本当は()

    Dim i As Long
    For i = 2 To Range("I" & Rows.Count).End(xlUp).Row
        If Cells(i, "I") <> Cells(i, "AQ") Then
                 Rows(i).Interior.ColorIndex = 3
        End If
    Next i
    MsgBox "検索終了"
 End Sub

Ohagiさん、BJさん、ありがとうございました！！

すみません、マクロで希望と書いた方がいいのですね。
初心者なので、分かりませんでした。
でも、ありがとうございました！！！
(マクロビジター)

コメント返信：

[ 一覧(最新更新順) ]

[[20070926140629]] 『関数表示された結果をみて、行毎に色付けしたい』（マクロビジター） ページの最後に飛ぶ

[[20070926140629]]　『関数表示された結果をみて、行毎に色付けしたい』（マクロビジター）　ページの最後に飛ぶ