Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


7314 / 76732 ←次へ | 前へ→

【75006】Re:ループ抜け教えてください
発言  kanabun  - 13/11/12(火) 22:17 -

引用なし
パスワード
   ▼hama さん:

>逆に前シートを後シートと比較して違う色を付ける
>ことができますでしょうか?

どういうことでしょうか?

>>>前と後のA列を検索してなかったら後のAセルに色をつける
>>>前と後のA列に同じ値があったら
>>>Bセル→Cセル→Dセルと比較をしていってセルの値が違っていたら
>>>色をつける

↑この最後の「色を付ける」ところのことですか?
いまは、

>    Else '「前」シートにこの値があったばあい
>       'その行のB列〜D列の値を相互比較・色塗りする ●
>      newY = c.Row
>      oldY = foundCell.Row
>      For x = 2 To 4 'B列〜D列
>        Ans2 = ws後.Cells(newY, x).Value
>        If ws前.Cells(oldY, x).Value <> Ans2 Then '●●
>          ws後.Cells(newY, x).Interior.ColorIndex = 27
>        End If
>      Next
>    End If

の部分で、比較し、ちがっていたら ws後のほうにだけ色塗りをしていますが、
これを ws前 のほうも塗りつぶせばいいってことですか?
もしそうなら、hama さん、ご自分でできますよね?

それとは別のことですか?

# それから、hama さん、スレッドをお借りします。
 これは hama さんだけに言えることではないのですが、
 全文引用は不必要です。
 必要な部分だけを引用してください。

306 hits

【74996】ループ抜け教えてください hama 13/11/11(月) 20:30 質問
【74998】Re:ループ抜け教えてください kanabun 13/11/12(火) 10:01 発言
【75000】Re:ループ抜け教えてください hama 13/11/12(火) 11:02 回答
【75001】Re:ループ抜け教えてください kanabun 13/11/12(火) 12:03 発言
【75002】Re:ループ抜け教えてください hama 13/11/12(火) 13:30 お礼
【75005】Re:ループ抜け教えてください hama 13/11/12(火) 20:28 質問
【75006】Re:ループ抜け教えてください kanabun 13/11/12(火) 22:17 発言
【75007】Re:ループ抜け教えてください hama 13/11/12(火) 23:22 回答
【75008】Re:ループ抜け教えてください kanabun 13/11/12(火) 23:45 発言
【75009】Re:ループ抜け教えてください hama 13/11/13(水) 2:15 お礼
【74999】Re:ループ抜け教えてください kanabun 13/11/12(火) 10:40 発言

7314 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free