The following code sets the text style of the current cell or current selection to inset using the constant value.
Note If you are using the MSFlexGrid, substitute "MSHFlexGrid1" with "MSFlexGrid1."
Sub MSHFlexGrid1_GotFocus
MSHFlexGrid1.CellTextStyle =flexTextInset
End Sub