Мы можем использовать пакет readxl
:
library(readxl)
my_sheet_names <- excel_sheets("my_file.xlsx")
my_sheets <- lapply(my_sheet_names, function(x) read_excel("my_file.xlsx", sheet = x))
names(my_sheets) <- my_sheet_names
Это даст вам список данных, каждый из которых будет одним вашим листом. При желании вы можете сохранить их как отдельные кадры:
list2env(my_sheets, envir=.GlobalEnv)