select the cells and run this macro:Sub blah()
For Each cll In Selection.Cells
cll.Value = Replace(cll.Value, " Average", "")
Next cll
End Sub


--
p45cal

*p45cal*
------------------------------------------------------------------------
p45cal's Profile: http://www.thecodecage.com/forumz/member.php?userid=558
View this thread: http://www.thecodecage.com/forumz/sh...d.php?t=126447