"はい"と "いいえ"が列Lにあり、 "はい"と色付けしたい緑と "いいえ"赤。私は赤色の色ではいを緑色にしたいが、私は書かれたコードが私のために働いていない
私は私のために働いていない以下のコードを書いています。色を変更する機能の
Sub Worksheet_Change(ByVal Target As Range)
Set MyPlage = Range("L3:L200")
For Each cell In MyPlage
Select Case cell.Value
Case Is = "Yes"
cell.Interior.ColorIndex = 10
Case Is = "No"
cell.Interior.ColorIndex = 6
Case Else
cell.Interior.ColorIndex = xlNone
End Select
Next
End Sub
例：
Sub ChangeColor()
lRow = Range("L" & Rows.Count).End(xlUp).Row
Set MR = Range("L2:L" & lRow)
For Each cell In MR
If cell.Value = "Yes" Then cell.Interior.ColorIndex = 10
If cell.Value = "No" Then cell.Interior.ColorIndex = 3
Next
End Sub
またはその他の方法=>Vba Change Color Of Cells Based On Value
実際に私はいくつかのセルと比較の出力を比較していますL欄にはいまたはいいえと表示されます。しかし、私がイエスを得たら、その特定のイエスのために背景色が緑色に変わり、赤色に変わらないようにします。 – Manu
あなたは単にoutput => ifの結果によってcell.valueを変更します。if output = "Yes" then yourcell.Interior.ColorIndex = 10 –
それはあなたが "はい" をテストして、なぜ "はい" と「YES不思議という単純です"発砲しない？ 試着
If ucase(cell.Value) = "YES" Then cell.Interior.ColorIndex = 10
あなたはどんな問題を抱えていますか？ （例えば、コードは私のために働いていますが、「いいえ」は黄色ですが、それはあなたの問題ですか、それとも赤の代わりに黄色ですか？それとも別ですか？） – YowE3K