网格中的颜色任意变（用的是VsflexGrid）有什么办法？

Question

如题！

Answer 1

'着重显示指定单元格颜色
Private Sub SetCellColor()
  With flex
    .Cell(flexcpBackColor, 1, 2, .Rows - 2, 3) = &HE7FFFF  '设米色  品名
    .Cell(flexcpBackColor, 1, 6, .Rows - 2, 6) = &HE7FFFF  '不含税额
    .Cell(flexcpBackColor, 1, 8, .Rows - 2, 9) = &HE7FFFF  '税额,含税金额
    .Cell(flexcpBackColor, .Rows - 1, 1, .Rows - 1, flex.Cols - 1) = &HF7CBA5  '设置最后一行为蓝色
  End With
End Sub