Functions to manipulate cell comments.
These functions are not vectorized.
createCellComment(cell, string, author = NULL, visible = TRUE) removeCellComment(cell) getCellComment(cell)
cell |
a |
string |
a string for the comment. |
author |
a string with the author's name |
visible |
a logical value. If |
createCellComment creates a Comment object.
getCellComment returns a the Comment object if it exists.
removeCellComment removes a comment from the given cell.
Adrian Dragulescu
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!
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.