使用RDCOMClient编辑excel属性

Question

我找不到任何有关RDComClient包的文档。我找不到合适的参数来更改单元格的背景填充。

library(RDCOMClient)
xlApp <- COMCreate("Excel.Application")
book = xlApp$Workbooks()$Open("C:/Users/koyeli.majumder/Desktop/Dashboard/National Level Dashboard.xlsb")

sheet = book$Worksheets()$Item(1) 
xlApp[["Visible"]] = TRUE

cell  <- sheet$Cells(6,6)
cell[["Value"]] <- 3.1
cell[["NumberFormat"]]  = "[Red]"  # till this it was fine

cell[["Style"]] = 1

这会产生错误

<checkErrorInfo> 8002000E 
Error: Invalid number of parameters.

Answer 1

RDCOMClient是一个通用的COM接口。它不是特定于Excel的。您需要参考一般的Excel文档，这些文档通常指的是Basic或javascript，并将其翻译成R。

内部颜色设置如下所示。颜色索引号可以在这里找到：https://msdn.microsoft.com/en-us/library/cc296089(v=office.12).aspx

library(RDCOMClient)

xl <- COMCreate("Excel.Application")
xl[["Visible"]] <- TRUE
wkbk <- xl$Workbooks()$Add()
sheet <- xl$ActiveSheet()

x12 <- sheet$Cells(1,2)
x12[["Value"]] <- 123
x12[["Interior"]][["ColorIndex"]] <- 3  # Red

​

​