Luca's changes to openXL.R