R/read_excel_whole.R

In tidycells: Read Tabular Data from Diverse Sources and Easily Make Them Tidy

read_excel_whole <- function(fn) {
  if (is_available("xlsx")) {
    # preferred
    read_xls_from_xlsx(fn)
  } else {
    message("Using readxl to read xls. Manually check date and numeric cells. (for better result install xlsx package)")
    read_excel_whole_readxl(fn)
  }
}