R中的writeWorkSheet函数不会将值粘贴到Excel中

Question

我试图使用XLConnect包中的writeWorkBook函数将某些数据从R数据框（Shipments）复制到excel文件。但是，它不会将任何内容复制到Excel文件中。执行不会导致控制台中出现任何错误/警告。它只是不复制。

我已经加载库XLConnect并确保我没有加载库XLSX。由于我认为这可能是一个问题，因此要复制的列已被键入数据帧。

wbnames是一个额外的事情。我直接在writeWorkBook中写了表名，它应该工作得很好。即使wbnames没有发生过的任何变化。

我原本打算将内容复制到宏文件，然后运行来自R本身的宏文件，但它不工作。所以我认为这可能是因为宏文件，但该函数本身并不适用于.xlsx。

所以，不知道是什么问题。如果我能在这里得到一些帮助，将不胜感激。我错过了什么吗？

library(XLConnect) 
library(RDCOMClient) 

xlApp <- COMCreate("Excel.Application") 
xlWbk <- xlApp$Workbooks()$Open(FILEPATH+FILENAME.XLSX) 
xlWb <- loadWorkbook(FILEPATH+FILENAME.XLSX) 
wbnames <- as.vector(getSheets(xlWb)) 

# Copy a column from the existing data frame and paste it to the first 
# sheet of the FILENAME.XLSX, starting at Row#6, no headers and no rownames: 
writeWorksheet(xlWb, as.data.frame(Shipments$SHIPMENT_ID), 
    sheet = wbnames[1], startRow = 6, header = F, rownames = NULL) 

Answer 1

xlWb是R-对象包含该工作簿。看起来数据已写入工作簿，这很好。但是，为了以Excel格式查看，您仍然需要将工作簿保存到Excel。加入这行代码后，你应该看到一个文件要求your_file_name.xlsx与您的数据在您的工作目录：

XLConnect::saveWorkbook(xlWb, "your_file_name.xlsx")