'你可以参考以下代码
With Flex
   .Redraw = False
   .BackColorFixed = RGB(0, 128, 255) 'RGB(200, 208, 168)
   .BackColorFixed = RGB(195, 187, 245) 'RGB(200, 208, 168)
   .Row = 0
   .Col = 0
   .ColSel = .Cols - 1
   .CellForeColor = RGB(255, 255, 0)
   .CellForeColor = RGB(0, 0, 0)
   .CellAlignment = 4
   .ScrollTrack = True
   For I = .FixedRows To .Rows - 1
      .Row = I
      .Col = .FixedCols
      .ColSel = .Cols - 1
      If I / 2 = Int(I / 2) Then
         .CellBackColor = RGB(224, 248, 224)
      'Else
        '.CellBackColor = RGB(0, 128, 255)
      End If
   Next I
   .Redraw = True
End With