我有多个不同名称的 excel 文件,例如 USA.xlsx、India.xlsx 等。每个文件只有一张纸。我想将每个文件的工作表重命名为工作表 1。
所需的输出 USA.xlsx 应该有工作表 1,India.xlsx 应该有工作表 1,依此类推。我有 1800 个 excel 文件。我知道 renameWorksheet(wb, sheet, newName) 将适用于一个文件。我有 1800 个 excel 文件
我认为这应该可以完成工作:
library(openxlsx)
list.files(pattern = '.xlsx')
for(file in list.files(pattern = '.xlsx')){
wb <- loadWorkbook(file, xlsxFile = NULL)
names(wb)[1] <- 'Sheet1'
saveWorkbook(wb, file, overwrite = TRUE)
}
本文收集自互联网,转载请注明来源。
如有侵权,请联系 [email protected] 删除。
我来说两句