У меня есть шаблон 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')
Этот пост здесь ( Запись из R в шаблон в Excel при сохранении форматирования ) дает представление о том, что это достижимо, однако единственное, чего я не понимаюздесь - когда создается новая рабочая книга, где копируется форматирование?
Если копия существующего шаблона сделана, как я делаю выше, каков наилучший способ изменить данные в файле?