题
欢迎C#或VB.NET建议。
我有以下代码可以使用NPOI创建Excel文件。正常工作。我需要将单元格式应用于循环中的那些行。
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
如何将单元格式应用于上面的循环中的这些行?
解决方案
您需要像这样在循环范围内声明行和单元格:
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
不隶属于 StackOverflow