if (FALSE) {
# mtcars xlsx file from demoFiles subfolder of package XLConnect
demoExcelFile <- system.file("demoFiles/mtcars.xlsx", package = "XLConnect")
# Load workbook
wb <- loadWorkbook(demoExcelFile)
# Query reference formula for name 'mtcars'
print(getReferenceFormula(wb, name = "mtcars"))
}
Run the code above in your browser using DataLab