R Programming读取Excel文件时忽略工作表名大小写的问题咨询

可以通过toupper()/tolower()实现忽略大小写匹配工作表名称，具体逻辑和代码如下：

核心思路 #

• 先读取目标Excel文件的所有工作表名称列表
• 将列表内所有表名和预设的目标表名统一转为全大写（或全小写）后做等值匹配
• 提取匹配到的实际表名传入read_excel()即可，完全避开R的大小写敏感限制

适配批量场景的完整代码 #

# 加载依赖包
library(readxl)

# 预设目标表名，统一转全大写作为匹配基准
target_sheet_upper <- toupper("Get_Data")

# 批量处理文件的循环逻辑示例
for (file_path in list.files("你的批量文件存放文件夹路径", pattern = "\\.xlsx$", full.names = TRUE)) {
  # 获取当前文件的所有工作表名称
  all_sheets <- excel_sheets(file_path)
  # 忽略大小写匹配目标工作表
  matched_sheet <- all_sheets[toupper(all_sheets) == target_sheet_upper]
  
  # 仅匹配到唯一目标表时才读取，避免批量处理时中断循环
  if (length(matched_sheet) == 1) {
    MyData <- read_excel(file_path, sheet = matched_sheet, skip = 2)
    # 后续处理MyData的业务逻辑写在此处
  } else {
    # 可选：输出异常文件提示，方便后续排查
    message("文件：", file_path, " 未找到匹配的工作表，已跳过")
  }
}

补充说明 #

• 如果更喜欢用tolower()实现，把代码中所有toupper()替换为tolower()即可，效果完全一致
• 代码中的长度判断逻辑可以处理「无匹配表」「多表重名（仅大小写不同）」的异常场景，适合数百个文件的批量处理需求

内容的提问来源于stack exchange，提问作者hwight