I have the following code: (It was given by two previous respondents) I
works great!

But If I change my value From "PACK" to some other string like "ABC
can I hide the counter?
Thanks!

Dim i As Integer
Dim L As Integer

i = 0
For Each CELL In Range("A1:DD267")
If CELL.Value = "PACK" Then
i = i + 1
For j = 0 To 7
CELL.Offset(0, j).Value = "PACK" & CStr(i)
Next j
If i 40 Then i = 0
End If
Next CEL

--
Message posted from http://www.ExcelForum.com