These functions are not vectorized.
createCellComment(cell, string, author = NULL, visible = TRUE)
removeCellComment(cell)
getCellComment(cell)
a Cell
object.
a string for the comment.
a string with the author's name
a logical value. If TRUE
the comment will be visible.
createCellComment
creates a Comment
object.
getCellComment
returns a the Comment
object if it exists.
removeCellComment
removes a comment from the given cell.
wb <- createWorkbook()
sheet1 <- createSheet(wb, "Sheet1")
rows <- createRow(sheet1, rowIndex=1:10) # 10 rows
cells <- createCell(rows, colIndex=1:8) # 8 columns
cell1 <- cells[[1,1]]
setCellValue(cell1, 1) # add value 1 to cell A1
# create a cell comment
createCellComment(cell1, "Cogito", author="Descartes")
# extract the comments
comment <- getCellComment(cell1)
stopifnot(comment$getAuthor()=="Descartes")
stopifnot(comment$getString()$toString()=="Cogito")
# don't forget to save your workbook!