我有一个名为order#的Excel列,其中包含重复值的订单号,因为每个订单都有一个或多个商品,因此如果订单有3个商品,订单#将重复三次,依此类推。< / p>
我想使用两种颜色来区分不同的顺序,所以如果第一个订单#是“1”,它将是红色,第二个“2”将是黄色,第三个“3”将再次变为红色,并且第四个“4”将是黄色,依此类推。
+----------+--------+
| order# | item# |
+----------+--------+
| 1 | 11 |
| 2 | 12 |
| 2 | 22 |
+----------+--------+
答案 0 :(得分:2)
继续使用条件格式:
=MOD(ROUND(SUM(1/COUNTIF($A$2:$A2,$A$2:$A2)),0),2)=0
'and the other color
=MOD(ROUND(SUM(1/COUNTIF($A$2:$A2,$A$2:$A2)),0),2)=1
每次更改内容到列表副本时都不需要vba或运行宏,如A2的范围公式:B100
答案 1 :(得分:1)
这应该可以解决问题:
<RelativeLayout
android:layout_width="wrap_content"
android:layout_height="wrap_content"
android:gravity="fill">
<ImageView
android:id="@+id/iv"
android:layout_width="wrap_content"
android:layout_height="wrap_content"
android:layout_marginLeft="5dp"
android:layout_alignParentRight="true"
android:src="@android:drawable/ic_lock_lock"/>
<TextView
android:layout_width="wrap_content"
android:layout_height="wrap_content"
android:layout_toLeftOf="@+id/iv"
android:layout_centerVertical="true"
android:singleLine="true"
android:ellipsize="end"
android:text="Hello World! Hello World! Hello World! Hello World! Hello World! Hello World! "/>
</RelativeLayout>
答案 2 :(得分:1)
试试这个:
Sub test()
Dim i&, x&, cl As Range, Dic As Object
Set Dic = CreateObject("Scripting.Dictionary"): Dic.CompareMode = vbTextCompare
i = [A:A].Find("*", , xlValues, , xlByRows, xlPrevious).Row
x = [1:1].Find("*", , xlValues, , xlByColumns, xlPrevious).Column
For Each cl In Range("A2:A" & i)
If Not Dic.exists(cl.Value2) Then
Dic.Add cl.Value2, IIf(Dic.Count Mod 2 = 0, vbRed, vbYellow)
End If
Next cl
For Each cl In Range("A2:A" & i)
Range(cl, Cells(cl.Row, x)).Interior.Color = Dic(cl.Value2)
Next cl
End Sub
答案 3 :(得分:0)
单击要更改颜色的列。选择格式和格式列。您可以在一个位置编辑或自定义所有属性。 Excel templates提供了大量使用Microsoft Excel设计的模板。希望能够帮助您了解与预设计模板相关的优秀内容。