The following code sets the focus rectangle for the active cell to a light rectangle, using the constant value.
Note If you are using the MSFlexGrid, substitute "MSHFlexGrid1" with "MSFlexGrid1."
Sub Form1_Load ()
MSHFlexGrid1.FocusRect = flexFocusLight
End Sub