setWrapText-methods | R Documentation |
Specifies if text should be wrapped in a cell.
## S4 method for signature 'cellstyle'
setWrapText(object,wrap)
object |
The |
wrap |
If |
Martin Studer
Mirai Solutions GmbH https://mirai-solutions.ch
workbook
, cellstyle
, setCellStyle
,
setStyleAction
## Not run:
# Load workbook (create if not existing)
wb <- loadWorkbook("setWrapText.xlsx", create = TRUE)
# Create a worksheet
createSheet(wb, name = "cellstyles")
# Create a dummy data set with some long text
text <- data.frame(
Text = "Some very very very very very very very long text")
# Write the value to the 'cellstyles' worksheet in the
# top left corner (cell A1)
writeWorksheet(wb, text, sheet = "cellstyles", startRow = 1,
startCol = 1, header = FALSE)
# Create a custom anonymous cell style
cs <- createCellStyle(wb)
# Specify to wrap the text
setWrapText(cs, wrap = TRUE)
# Set the cell style created above for the top left cell (A1)
# in the 'cellstyles' worksheet
setCellStyle(wb, sheet = "cellstyles", row = 1, col = 1,
cellstyle = cs)
# Save the workbook
saveWorkbook(wb)
# clean up
file.remove("setWrapText.xlsx")
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.