セルをコピーする方法を記載します。
セルをコピーする
1 2 3 4 5 6 7 8 9 10 11 12 13 |
Dim sheet1 As ISheet = book.GetSheet("Sheet1") 'コピー元 Dim row1 As XSSFRow = sheet1.GetRow(0) 'コピー先 Dim row2 As XSSFRow = sheet1.CreateRow(5) '内容のコピー row2.CreateCell(3).SetCellValue(row1.GetCell(0).StringCellValue()) '属性のコピー row2.CreateCell(3).CellStyle = row1.GetCell(0).CellStyle() |