2017-01-12 17 views
0

私はここでうんざりしています。私は、ColAの一意の数字を見て、同じ行にあるテキストを取得し、ColBの同じ(時には繰り返す)数値と比較し、同じ行にテキストを取得しようとしています。テキストが異なる場合は、ColCのセルの違いを強調したいと思います。複雑な比較

説明するのはかなり難しいので、ここに画像があります。

enter image description here

私はコーラ=必須で1を知っています。だから、私はColBのすべての番号1を見て、ColCで同じ行が必須であることを確認したい。 ColAでは、2,3,4、& 5がすべてColCで必要とされる。 ColBでは、3 & 4にはColCでRequiredが必要ですが、何か異なることがあるので、これらのセルをオレンジ色にしたいと思います。それは理にかなっていますか?私はVlookupを使うことを考えましたが、どのように動作するのか分かりません。

現時点ではコードはありませんが、そのような仕組みがあると思いますが、この作業を行うことができれば、私は間違いなく解決策を投稿します。

私はコードがこのようなものになると思うが、これは上記のロジックに従わない。

Sub StillTrying() 

Dim mCell As Range 
Dim R As Long 
Dim Rng As Range 
Dim Agent As Range 
Dim AgentList As Range 
Application.ScreenUpdating = False 

Set AgentList = ActiveSheet.Range("A2:A20") 
Set Rng = ActiveSheet.Range("B2:B20") 

For Each Agent In AgentList 
    For Each mCell In Rng 
    Debug.Print mCell.Address 
    Debug.Print Agent.Address 

     If mCell.Value = Agent.Value And mCell.Offset(0, 1).Value = Agent.Offset(0, 2).Value Then 
     ' do nothing 
     Else 
      mCell.Offset(0, 1).Resize(, 1).Select 
      With Selection.Interior 
       .Color = 39423 
      End With 
      R = R + 1 
     End If 
    Next mCell 
Next Agent 

End Sub 

基本的に、C &及びC8は、オレンジ色であるべきです。

ありがとうございます。

答えて

2

あなたが正しく理解している場合は、条件付き書式設定を使用してこれを達成できます。セルC2

、以下の条件付き書式ルールを適用:ファイアウォールがある場合は

enter image description here

はその後、列Cの他の細胞


のそれぞれにそのセルの書式をコピーしますi.stack.imgur.comに画像をブロックすると、画像はUse a formula to determine which cells to formatに設定されたEdit Formatting Ruleダイアログが表示され、式は=NOT(C2=VLOOKUP(B2,A:C,3,FALSE)) 、およびオレンジ色の塗りつぶしを示す書式。

+2

*次に、そのセルの書式*をコピーするか、条件付き書式の*を適用範囲に適用するセルに適用します。特に列がCのセルの代わりに行全体を強調表示したい場合は、おそらく式が絶対( '$')である必要があります。 –

+2

@ Mat'sMug - 条件付き書式設定のダイアログで範囲がわかりますが、それは別のスクリーンショットを必要とし、私は怠惰です! :D(そして私は簡単に絶対参照について考えましたが、どの列が絶対的で相対的なものかはわかりませんでした。列Cが列Xに移動された場合、 '3 'を変更する必要がありますインスタンス - それは説明するのが非常に困難になってきました。) – YowE3K

+0

私はイメージを見ることができません。私はかなり私の会社のファイアウォールによってブロックされていると確信しています。投稿を編集してCtrl + Kでそれを見ることができますか?ありがとう。 –

関連する問題