Add a style to a set of cells
Function adds a style to a specified set of cells.
addStyle(wb, sheet, style, rows, cols, gridExpand = FALSE, stack = FALSE)
wb |
A Workbook object containing a worksheet. |
sheet |
A worksheet to apply the style to. |
style |
A style object returned from createStyle() |
rows |
Rows to apply style to. |
cols |
columns to apply style to. |
gridExpand |
If |
stack |
If |
Alexander Walker
expand.grid
## See package vignette for more examples.
## Create a new workbook
wb <- createWorkbook("My name here")
## Add a worksheets
addWorksheet(wb, "Expenditure", gridLines = FALSE)
## write data to worksheet 1
writeData(wb, sheet = 1, USPersonalExpenditure, rowNames = TRUE)
## create and add a style to the column headers
headerStyle <- createStyle(
fontSize = 14, fontColour = "#FFFFFF", halign = "center",
fgFill = "#4F81BD", border = "TopBottom", borderColour = "#4F81BD"
)
addStyle(wb, sheet = 1, headerStyle, rows = 1, cols = 1:6, gridExpand = TRUE)
## style for body
bodyStyle <- createStyle(border = "TopBottom", borderColour = "#4F81BD")
addStyle(wb, sheet = 1, bodyStyle, rows = 2:6, cols = 1:6, gridExpand = TRUE)
setColWidths(wb, 1, cols = 1, widths = 21) ## set column width for row names column
## Not run:
saveWorkbook(wb, "addStyleExample.xlsx", overwrite = TRUE)
## End(Not run)Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.