NPOI установить стиль ячейки - PullRequest
Новая
       9

NPOI установить стиль ячейки

3 голосов
/ 29 сентября 2010

C # или предложение VB.NET приветствуются.

У меня есть следующий код для создания файла Excel с NPOI.Работает нормально.Мне нужно применить стиль ячейки к этим строкам в циклах. 

Dim hssfworkbook As New HSSFWorkbook()

    Dim sheetOne As HSSFSheet = hssfworkbook.CreateSheet("Sheet1")
    hssfworkbook.CreateSheet("Sheet2")
    hssfworkbook.CreateSheet("Sheet3")
    hssfworkbook.CreateSheet("Sheet4")

        Dim cellStyle As HSSFCellStyle = hssfworkbook.CreateCellStyle
    cellStyle.Alignment = HSSFCellStyle.ALIGN_CENTER

      For i = 0 To 9 Step 1
        'I want to add cell style to these cells
        sheetOne.CreateRow(i).CreateCell(1).SetCellValue(i)
        sheetOne.CreateRow(i).CreateCell(2).SetCellValue(i)
  Next

Как применить стиль ячейки к этим строкам в цикле выше?

1 Ответ

2 голосов
/ 29 сентября 2010

Вам необходимо объявить строку и ячейку вне цикла sth следующим образом: 

Dim dataCell As HSSFCell
Dim dataRow As HSSFRow

Затем внутри цикла вы присваиваете значение и стиль ячейке отдельно, как это: 

    dataRow = sheetOne.CreateRow(i)
    dataCell = dataRow.CreateCell(1)
    dataCell.SetCellValue(i)
    dataCell.CellStyle = cellStyle

    dataRow = sheetOne.CreateRow(i)
    dataCell = dataRow.CreateCell(2)
    dataCell.SetCellValue(i)
    dataCell.CellStyle = cellStyle
...