r - 如何使用 R 中的 Openxlsx 包修改 Excel 工作簿中的现有工作表？

Question

我正在使用“openxlsx”包来读写excel文件。我有一个固定文件，其中包含一个名为“数据”的工作表，其他工作表中的公式使用该工作表。我想更新此数据表而不触及其他数据表。我正在尝试以下代码：

write.xlsx(x = Rev_4, file = "Revenue.xlsx", sheetName="Data")

但这会删除 excel 文件并创建一个新文件，其中仅包含“数据”表中的新数据，而其他所有文件都将被删除。有什么建议吗？

Answer 1

尝试这个：

wb <- loadWorkbook("Revenue.xlsx")
writeData(wb, sheet = "Data", Rev_4, colNames = F)
saveWorkbook(wb,"Revenue.xlsx",overwrite = T)

您需要加载完整的工作簿，然后修改其数据，然后将其保存到磁盘。writeData还可以指定起始行和列。您还可以在保存到磁盘之前修改其他部分。

Answer 2

我找到了这个包。它取决于openxlsx并有助于在 xlsx 文件中插入许多工作表。也许它更容易：

包文件

library(xlsx2dfs)
# However, be careful, the function xlsx2dfs assumes
# that all sheets contain simple tables. If that is not the case,
# use the accepted answer!
dfs <- xlsx2dfs("Revenue.xlsx") # all sheets of file as list of dfs
dfs["Data"] <- Rev_4   # replace df of sheet "Data" by updated df Rev_4
dfs2xlsx(dfs, "Revenue.xlsx") # this overwrites the existing file! cave!