Comma to Trigger new row content

[ryanb4614]

I run this macro script. With the new software I will be using to upload this I need some how if there is a replacement with a comma...I need just 173 to go in a row under 177 with no more comma... is this possible with macro?

"Cells.Replace _
        What:=""AQUATICS - FILTERS: SUMPS"", Replacement:=""177,173"", _
    LookAt:=xlWhole, MatchCase:=True"
"Cells.Replace _
        What:=""AQUATICS - BULBS: FLOURESCENT"", Replacement:="""", _
    LookAt:=xlWhole, MatchCase:=True"
"Cells.Replace _
        What:=""AQUATICS - FISH BOWLS"", Replacement:=""183"", _
    LookAt:=xlWhole, MatchCase:=True"