Protect or unprotect a workbook from modifications by the user in the graphical user interface. Replaces an existing protection.
protectWorkbook(
wb,
protect = TRUE,
password = NULL,
lockStructure = FALSE,
lockWindows = FALSE,
type = 1L
)
A workbook object
Whether to protect or unprotect the sheet (default=TRUE)
(optional) password required to unprotect the workbook
Whether the workbook structure should be locked
Whether the window position of the spreadsheet should be locked
Lock type, default 1. From the xml documentation: 1 - Document is password protected. 2 - Document is recommended to be opened as read-only. 4 - Document is enforced to be opened as read-only. 8 - Document is locked for annotation.
wb <- createWorkbook()
addWorksheet(wb, "S1")
protectWorkbook(wb, protect = TRUE, password = "Password", lockStructure = TRUE)
if (FALSE) { # \dontrun{
saveWorkbook(wb, "WorkBook_Protection.xlsx", overwrite = TRUE)
} # }
# Remove the protection
protectWorkbook(wb, protect = FALSE)
if (FALSE) { # \dontrun{
saveWorkbook(wb, "WorkBook_Protection_unprotected.xlsx", overwrite = TRUE)
} # }