例如，我可以像这样替换向量q的第二个元素的值：
q<-1:5 q[2]<-4 q
如何在r中替换excel工作簿中的excel工作表？
31moq8wy1#
我已经能够用下面的代码做一个Excel表格替换。首先，我们复制一个Excel表格。之后，我们删除以前的Excel表格。
library(RDCOMClient) path_Excel_File_Output <- "D:\\output2.xlsx" path_Excel_File1 <- "D:\\file1.xlsx" path_Excel_File2 <- "D:\\file2.xlsx" xlApp <- COMCreate("Excel.Application") xlApp[["DisplayAlerts"]] <- FALSE xlWbk1 <- xlApp$Workbooks()$Open(path_Excel_File1) xlWbk2 <- xlApp$Workbooks()$Open(path_Excel_File2) # We replace the first sheet of the workbook xlWbk2 xlWbk1$Worksheets(1)$Copy(after = xlWbk2$Worksheets(1)) xlWbk2$Worksheets(1)$Delete() xlWbk2$SaveAs(path_Excel_File_Output) # Excel file with first sheet replaced xlWbk1$Close() xlWbk2$Close() xlApp$Quit()
1条答案
按热度按时间31moq8wy1#
我已经能够用下面的代码做一个Excel表格替换。首先，我们复制一个Excel表格。之后，我们删除以前的Excel表格。