是否可以对 R 的 xlsx 文件进行写保护？

Question

我不希望协作者对我从 R 导出的 Excel 文件进行更改。 实际上，我使用 writexl::write_xlsx() 或有时使用 WriteXLS::WriteXLS() 函数导出它们，然后我必须打开文件并手动对其进行写保护。

有没有可以直接写入只读Excel文件的函数？

我知道 xlsx::write.xlsx() 函数有一个密码参数，但它会阻止文件的读取。我需要它可读但不可写。

提前致谢。

Answer 1

openxlsx2

包可以实现Excel提供的普通工作簿和工作表保护功能。

library(openxlsx2)
wb <- wb_workbook()
wb$add_worksheet("S1")
wb$add_data_table(1, x = iris[1:30, ])

wb$protect_worksheet(
  "S1",
  protect = TRUE,
  properties = c("formatCells", "formatColumns", "insertColumns", "deleteColumns")
)

wb_protect(wb, protect = TRUE, password = "Password", lock_structure = TRUE)

看

• https://search.r-project.org/CRAN/refmans/openxlsx2/html/wb_protect.html
• https://search.r-project.org/CRAN/refmans/openxlsx2/html/wb_protect_worksheet.html