Dim workbook As New HSSFWorkbook()
Dim sheet As HSSFSheet
sheet = workbook.CreateSheet("報表")
'自訂邊界
sheet.SetMargin(NPOI.SS.UserModel.MarginType.TopMargin, 0.4) '0.4=1cm
sheet.SetMargin(NPOI.SS.UserModel.MarginType.RightMargin, 0)
sheet.SetMargin(NPOI.SS.UserModel.MarginType.BottomMargin, 0.4)
sheet.SetMargin(NPOI.SS.UserModel.MarginType.LeftMargin, 0)
sheet.HorizontallyCenter = True '水平置中


arrow
arrow

    Roger 發表在 痞客邦 留言(0) 人氣()