我在afterload事件中写的,没有效果呢? Post By:2018/4/6 11:53:00 [显示全部帖子]
With Tables("订单选择商品_table1") For i As Integer = 1 To .Rows.Count -1 If .Current("订单号")<>"" And .Current("生产是否完成")=False Then For Each c As Col In .Cols .SetHeaderCellBackColor(c.Name,Color.Cyan) Next End If Next End With