使用R中的xlsx包来调整xlsx文件中的页面设置

Question

我正在尝试更改 xlsx 文件的页面设置，以便将其打印为横向而不是纵向，我尝试了以下操作：

library(xlsx)

wb <- createWorkbook()
sheet <- createSheet(wb, "Sheet1")
ps <- printSetup(sheet, landscape=TRUE, copies=3)

如果我创建一个新的 Excel 工作簿，这是可以的，但当我创建一个新的 Excel 工作簿时，我无法使用它我正在使用 loadWorkbook 函数加载 xls 文件。我想知道为什么。

更新：我正在处理 xls 文件，但不是 xlsx 文件，发现下面的答案无法解决我的问题，还有其他建议吗？谢谢。

Answer 1

我可以通过使用 getSheets 选择要设置打印区域的工作表来使其工作：

wb <- loadWorkbook("test.xlsx")
printSetup(getSheets(wb)[[1]], landscape=TRUE, copies=3)
saveWorkbook(wb,"test.xlsx")