'Title Font
Dim tfont As PoiFont
tfont.Initialize(Workbook.PoiWorkbook)
tfont.Name = "Arial"
tfont.Bold = True
tfont.Size = 18
tfont.SetColor(xui.Color_Black)
Dim TitleStyles As List = Array(Workbook.CreateStyle.FontOther(tfont),Workbook.CreateStyle.HorizontalAlignment("CENTER").ForegroundColor(xl.COLOR_YELLOW))