RStudio开发的另一个非常好的包是readxl。使用excel_sheets()函数可以很容易地获得excel工作表名称。

library(readxl)
path <- "path/to/your/file.xlsx"
excel_sheets(path = path)

您正在寻找getSheets

Returns all worksheet names in a workbook.

在“openxlsx”包中，它将是一个命令“getSheetNames”：

library(openxlsx)
path <- "path/to/your/file.xlsx"
getSheetNames(path)

以下是可以考虑的另一种方法：

library(RDCOMClient)
xlApp <- COMCreate("Excel.Application")
xlApp[["DisplayAlerts"]] <- FALSE
xlApp[["Visible"]] <- TRUE

path_To_Excel_File <- "D:/excel_File.xlsx"
xlWbk <- xlApp$Workbooks()$Open(path_To_Excel_File)
nb_Sheets <- xlWbk$Sheets()$Count()
sheets_Names <- character(nb_Sheets)

for(i in 1 : nb_Sheets)
{
  sheets_Names[i] <- xlWbk$Sheets(i)$Name()
}