...2 different columns. Maybe there is an easier way to do the Erating formula, but it works for me.
Elevel: Choose(([Rating]\256),"Very Energetic","Lively","Fair","Lacking","None")
Erating: Choose([Rating]-(256*(Format(Left(([Rating])/256,1))))+1,"Excellent","Very Good","Good","Average","Awful")