Using Malcom's lead, but only if your latest sample data is inclusive. If not, I would suggest an example workbook with a goodlier amount of data.
MarkSub Macro11() Dim sh As Worksheet For Each sh In Sheets sh.Columns(5).Replace What:="Production*-", Replacement:="" sh.Columns(5).Replace What:=Chr(32), Replacement:=vbNullString Next End Sub