R/read_entire_excel.R

In meerawhy/financeTracker:

#' Reads entire XLSX file into a list of dataframes
#' @param full_xlsx_fn full path to xlsx filename
#' @import readxl
#' @import purrr

read_entire_excel <-
        function(full_xlsx_fn) {
                return(
                        full_xlsx_fn %>%
                                readxl::excel_sheets() %>%
                                set_names() %>%
                                purrr::map(read_excel, path = full_xlsx_fn)
                )
        }