excel - XLConnect 从多个 excel 文件中导入相同的选项卡，包括文件名

Question

我有大约 100 个带有许多选项卡的 excel 文件。

我想：

1. 从不同文件导入相同的选项卡（所有excel文件中的选项卡名称相同）
2. 添加带有文件名的列
3. 将所有导入的选项卡融合到 1 个表中（文件名作为每行的源标识符）

我对 R 很陌生，还没有走多远。

谢谢你，维尔勒

Answer 1

以下情况如何：

require(XLConnect)
require(plyr)

files = c(...)
sheet = "sheetname"

ldply(files, function(file) {
  cbind(file = file, readWorksheetFromFile(file, sheet = sheet)
})

Answer 2

我是这样解决的：

    require(XLConnect)

    ListFiles <- list.files(pattern="*.xls")
    ListFiles.short <- ListFiles[1:2]
    sheetname = "Volume"
    all.volume <- data.frame()
    j <- 0

    for (i in ListFiles){
         j<- j+1
         print(j)
         print(i) #prints just to follow the progress of the loop
         wb <- loadWorkbook(i)
         wbsheet <- readWorksheet(wb, sheet=sheetname, startRow=2, header=TRUE, check.names=TRUE)
         wbsheet$filename <- i 
         all.volume <- rbind(all.volume, wbsheet)
         }