我有一个 Excel 工作簿,我想使用 R 编辑/填充其中的一些特定单元格,而不更改任何格式。
到目前为止我已经尝试过XL连接包,看起来它可以做我正在寻找的事情,我只是没有找到办法做到这一点。
My 直截了当解决问题的方法:
wb <- loadWorkbook("file1.xls")
data1 <- readWorksheet(wb, "Sheet1", header=TRUE)
## adding a value to a particular cell:
data1[11,12] <- 3.2
## rewriting old data:
writeWorksheet(wb, data1, "Sheet1")
saveWorkbook(wb, "new_file1.xls")
但是,这样新工作簿就会丢失以前的所有格式(合并的单元格、公式等)。
有没有办法更改某些单元格中的值而不丢失剩余工作表的任何格式?
以下是使用 R 自动化 Excel 的示例。
library(RDCOMClient)
xlApp <- COMCreate("Excel.Application")
wb <- xlApp[["Workbooks"]]$Open("file.1.xls")
sheet <- wb$Worksheets("Sheet1")
# change the value of a single cell
cell <- sheet$Cells(11,12)
cell[["Value"]] <- 3.1
# change the value of a range
range <- sheet$Range("A1:F1")
range[["Value"]] <- paste("Col",1:6,sep="-")
wb$Save() # save the workbook
wb$SaveAS("new.file.xls") # save as a new workbook
xlApp$Quit() # close Excel
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)