すべての行で 6 つのセル (実際の店舗) に入力したい背景色の並べ替え形式は、緑の色が高く、赤の色が低くなります。
Excel 2010 では写真のようですが、2003 バージョンでは機能しません... Excel 2003 でこれを行うにはどうすればよいですか? 写真http://img32.imageshack.us/img32/4909/srv20130328113621.png
Excel 2010では、このコードを使用して完璧に動作します
If Application.Version >= "12.0" Then
For counter = 3 To 103
Range("I" & counter & ",K" & counter & ",M" & counter & ",O" & counter & ",Q" & counter & ",S" & counter).Select
Selection.FormatConditions.AddColorScale ColorScaleType:=3
Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
Selection.FormatConditions(1).ColorScaleCriteria(1).Type = _
xlConditionValueLowestValue
With Selection.FormatConditions(1).ColorScaleCriteria(1).FormatColor
.Color = 7039480
End If
End With
Selection.FormatConditions(1).ColorScaleCriteria(2).Type = _
xlConditionValuePercentile
Selection.FormatConditions(1).ColorScaleCriteria(2).Value = 50
With Selection.FormatConditions(1).ColorScaleCriteria(2).FormatColor
.Color = 8711167
End If
End With
Selection.FormatConditions(1).ColorScaleCriteria(3).Type = _
xlConditionValueHighestValue
With Selection.FormatConditions(1).ColorScaleCriteria(3).FormatColor
.Color = 8109667
End If
End With
Next counter
Else
End If
私の悪い英語でごめんなさい。