ackColor = vbButtonShadow
      grdThis.GroupRowBackColor = vbButtonFace
      grdThis.GroupRowForeColor = vbWindowText
      grdThis.HighlightBackColor = vbHighlight
      grdThis.HighlightForeColor = vbHighlightText
      grdThis.NoFocusHighlightBackColor = vbButtonFace
      grdThis.NoFocusHighlightForeColor = vbWindowText
   End If
   
   ' Turn redraw back on
   grdThis.Redraw = True
   
End Sub

''' &lt;summary&gt;
''' Toggles whether the selected cell has a focus rectangle when selected
''' &lt;/summ