2

我找不到 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.
4

1 回答 1

2

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

截屏

于 2018-05-03T16:33:50.677 回答