I have this code that works:
I am attempting to spilt the returned value into 2 cells, like this:
I get an error, however.
I tried several different ways, including referencing the row that the cells are in (still no luck
Intended result should look like this:
How do I fix this? Thank you
Code:
Dim Cell As Range
For Each Cell In Range(Cells(6, 4), Cells(45, 58))
If Cell Like "*CSR18R*" Then Cell.Value = "CSR" Then Cell.Value = "CSR - received incorrect product:"
I am attempting to spilt the returned value into 2 cells, like this:
Code:
If Cell Like "*CSR18R*" Then Cell(-1).Value = "CSR" And Cell.Value = "received incorrect product"
I get an error, however.
I tried several different ways, including referencing the row that the cells are in (still no luck
Code:
If Cell Like "*CSR18R*" Then Row(Cell - 1).Value = "CSR" And Row(Cell).Value = "received incorrect product"
Intended result should look like this:
How do I fix this? Thank you