Refactor the ppt export