NPOI jeu style de cellule

Question

  

C # ou suggestion VB.NET sont les bienvenus.

J'ai le code suivant pour créer un fichier Excel avec NPOI. Il fonctionne très bien. Je dois appliquer le style cellulaire à ces lignes dans les boucles.

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

Comment puis-je appliquer le style de cellule à ces lignes dans la boucle au-dessus?

Answer 1

Vous devez déclarer en dehors de la ligne et la cellule de la boucle STH comme ceci:

Dim dataCell As HSSFCell
Dim dataRow As HSSFRow

Ensuite, à l'intérieur de la boucle, vous valeur assign et le style à la cellule séparément comme ceci:

    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