Imports Infragistics.Documents.Excel
...
' 2 番目の列を書式設定します
worksheet1.Columns(1).CellFormat.Fill = _
CellFill.CreateSolidFill(System.Windows.Media.Colors.Green)
worksheet1.Columns(1).CellFormat.Font.Bold = ExcelDefaultableBoolean.True
' 2 番目の列の書式を 4 番目の列にコピーします
worksheet1.Columns(3).CellFormat.SetFormatting(worksheet1.Columns(1).CellFormat)