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

Question

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

library(xlsx)

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

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

更新：我正在处理xls文件而不是xlsx文件，发现下面的答案无法解决我的问题，还有什么进一步的建议吗？感谢。

Answer 1

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

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