'Declaration Public ReadOnly Property Summary As Infragistics.Win.UltraWinGrid.SummaryValue
public Infragistics.Win.UltraWinGrid.SummaryValue Summary {get;}
Private Sub MyGridExporter_SummaryCellExporting(ByVal sender As Object, ByVal e As Infragistics.Win.UltraWinGrid.ExcelExport.SummaryCellExportingEventArgs) Handles MyGridExporter.SummaryCellExporting If e.CurrentColumnIndex Mod 2 = 0 And Not e.Summary Is Nothing Then e.Summary.Appearance.BackColor = Color.LightCoral End If End Sub Private Sub MyGridExporter_SummaryCellExported(ByVal sender As Object, ByVal e As Infragistics.Win.UltraWinGrid.ExcelExport.SummaryCellExportedEventArgs) Handles MyGridExporter.SummaryCellExported If e.CurrentColumnIndex Mod 2 = 0 And Not e.Summary Is Nothing Then Dim tmCF As IWorksheetCellFormat = e.CurrentWorksheet.Rows(e.CurrentRowIndex).Cells(e.CurrentColumnIndex).CellFormat tmCF.BottomBorderStyle = CellBorderLineStyle.Double tmCF.TopBorderStyle = CellBorderLineStyle.Double tmCF.LeftBorderStyle = CellBorderLineStyle.Double tmCF.RightBorderStyle = CellBorderLineStyle.Double End If End Sub
private void SummaryCellExportingEH(object sender, Infragistics.Win.UltraWinGrid.ExcelExport.SummaryCellExportingEventArgs e) { if(e.CurrentColumnIndex%2==0 && e.Summary!=null) e.Summary.Appearance.BackColor = Color.LightCoral; } private void SummaryCellExportedEH(object sender, Infragistics.Win.UltraWinGrid.ExcelExport.SummaryCellExportedEventArgs e) { if(e.CurrentColumnIndex%2==0 && e.Summary!=null) { IWorksheetCellFormat tmCF = e.CurrentWorksheet.Rows[e.CurrentRowIndex].Cells[e.CurrentColumnIndex].CellFormat; tmCF.BottomBorderStyle = tmCF.TopBorderStyle = tmCF.LeftBorderStyle = tmCF.RightBorderStyle = CellBorderLineStyle.Double; } }
Target Platforms: Windows 10, Windows 8.1, Windows 8, Windows 7, Windows Server 2012, Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2