The following code sets the text of the current cell to italic whenever the ModHFGrid is in focus.
Sub ModHFGrid1_GotFocus() ModHFGrid1.CellFontItalic =True End Sub