导出到 Excel，所有使用的单元格都带有边框和居中

Question

我有一个在 R 中创建的 table，我希望使用 write.xlsx 将其输出到 Excel，但所有使用的单元格都带有边框和居中。任何人都可以帮忙吗，我想我需要创建一个样式，然后将其作为 write.xlsx 命令的一部分应用，但我不确定该怎么做。

下面的代码是当前的写入函数，它只是导出而没有任何格式。

谢谢！

write.xlsx(FinalOutput, "//user017/userslocal/aaaa/Documents/R Experiments/FinalOutput1.xlsx")

Answer 1

您可以创建 excel 样式：

library(openxlsx)
custom_style <- openxlsx::createStyle(...)

并将其应用于您的 excel 文件：

wb <- openxlsx::createWorkbook()
openxlsx::addWorksheet(wb, sheetName = "S1")
openxlsx::writeData(wb, FinalOutput)
openxlsx::addStyle(wb, S1, custom_style)
openxlsx::saveWorkbook(wb, "//user017/userslocal/aaaa/Documents/R Experiments/FinalOutput1.xlsx", overwrite = TRUE)

导出到 Excel，所有使用的单元格都带有边框和居中

Export to Excel with all used cells bordered and centered

excel

r

xlsx