Question

我有一个Excel模板，我想在保留工作簿格式的同时更新模板中的数据。

我在网上寻找不同的来源，我尝试了多种不同的代码变体，但是到目前为止，它们都还没有产生理想的结果。我愿意使用其他软件包，只要保留格式并可以更新数据即可。

 # Clear Console and screen 
    cat("\014") # Clear Console 
    rm(list = ls(all = TRUE)) # Clear Workspace
    options(java.parameters = "- Xmx1024m")

    # Load desired packages
    suppressPackageStartupMessages(library(XLConnect))

    # Define FilePaths 
    FolderPath <- "C:\\Users\\Temp\\Desktop"
    TemplateFilePath <- paste(FolderPath, "LoanTemplate.xlsx", sep = "\\")
    OutputFilePath <- paste(FolderPath, "MyLoan.xlsx", sep = "\\")
    OutputFilePath1 <- paste(FolderPath, "MyLoan1.xlsx", sep = "\\")
    OutputFilePath2 <- paste(FolderPath, "MyLoan2.xlsx", sep = "\\")

    # Read Data 
    TemplateData <- readWorksheetFromFile(TemplateFilePath, sheet = 'Loan 
    Schedule', header = T)

    # Make modification to the existing data 
    MyData <- TemplateData
    MyData[[4]][2] <- 10000

    # Set Style Action 
    setStyleAction(wb, XLC$"STYLE_ACTION.NONE")

    # Trial 1
    writeWorksheet(OutputFilePath, MyData, 'Loan Schedule', styleAction = 
    XLC$STYLE_ACTION.XLCONNECT, clearSheets = TRUE)

    # Trial 2
    writeWorksheetToFile(OutputFilePath1, MyData, 'Loan Schedule', 
    styleAction = XLC$STYLE_ACTION.XLCONNECT, clearSheets = FALSE)

    #Trial 3
    writeWorksheetToFile(OutputFilePath2, MyData, 'Loan Schedule')

此处的帖子（Write from R into template in excel while preserving formatting）带来了一线希望，但是我唯一不明白的是-创建新工作簿时，格式将被复制到哪里？

如果已复制现有模板，就像我在上面所做的那样，那么修改文件中数据的最佳方法是什么？

是否有示例演示如何在保留格式的同时将数据写入模板

0 个答案: