Create cell styles.
# S3 method for CellStyle
+(cs1, object)
a CellStyle
object.
an object to add. The object can be another
CellStyle
, a DataFormat
, a
Alignment
, a Border
, a Fill
, a
Font
, or a CellProtection
object.
A CellStyle object.
The style of the argument object takes precedence over the style of argument cs1.
if (FALSE) {
cs <- CellStyle(wb) +
Font(wb, heightInPoints=20, isBold=TRUE, isItalic=TRUE,
name="Courier New", color="orange") +
Fill(backgroundColor="lavender", foregroundColor="lavender",
pattern="SOLID_FOREGROUND") +
Alignment(h="ALIGN_RIGHT")
setCellStyle(cell.1, cellStyle1)
# you need to save the workbook now if you want to see this art
}