Dim groupFormatSettings As New FormatSettings()
groupFormatSettings.BorderStyle = Infragistics.Excel.CellBorderLineStyle.Double
groupFormatSettings.BottomBorderColor = Colors.Red
groupFormatSettings.FontStrikeout = Infragistics.Excel.ExcelDefaultableBoolean.True
groupFormatSettings.FontStyle = FontStyles.Italic
groupFormatSettings.FontUnderlineStyle = Infragistics.Excel.FontUnderlineStyle.Double
groupFormatSettings.LeftBorderColor = Colors.Green
groupFormatSettings.RightBorderColor = Colors.Blue
groupFormatSettings.TopBorderColor = Colors.Purple
groupFormatSettings.VerticalAlignment = Infragistics.Excel.VerticalCellAlignment.Center
DataPresenterExcelExporter.SetExcelGroupFormatSettings(Me.Grid.FieldSettings, groupFormatSettings)