数据框的颜色单元格如何以条件格式在excel中导出[关闭]

Question

关闭。这个问题需要更多focused。它当前不接受答案。

---

是否要改善此问题？更新问题，使其仅按editing this post专注于一个问题。

关闭7分钟前。

我想将数据框导出到Excel并根据某些规则突出显示单元格。我认为有可能。我希望数据框的颜色单元格大于值0.8。

Answer 1

选择正确的行和列，然后从conditionalFormatting（）中删除类型参数

library(openxlsx)

df <- data.frame(Target_Fund_ISIN = c("a","b","c"),
                Corp = c(0.018603, 0, 0.001485),
                Equity = c(0,0,1.980906),
                Govt = c(0.985854,0.998692,0))

wb <- createWorkbook() 

addWorksheet(wb, "Sheet", gridLines = TRUE) 

writeData(wb, "Sheet", df) 

warm1Style <- createStyle(fontColour = "#000000", bgFill = "#008f39")

conditionalFormatting(wb, "Sheet", cols = 2:4,
                      rows = 2:4, rule = ">0.8", style = warm1Style)

saveWorkbook(wb, "./a.xlsx", overwrite = TRUE)