Create load_excel.r