Owww, that is correct! But, i need to compare the value in the variable cb (string) with text a cell on the sheet, i did so:
If Cells(j, 2).Value = cb Then
Cells(j, 5).Value = z + quantidade
End If

But not is correct, being the value of the cell text. Can i use .Value for obtain the value inside the cell or not?