I'm writing a routine to loop through a range where each time it executes, a different cell in the range will have a value >0, but never more than one cell at one time.

Whichever cell in the range is >0, I want to 'copy - paste value' to the cell immediately to the left of the >0 value cell from the range.

I have the loop thro' range and copy the >0 cell code OK, but cannot resolve how to paste value to the cell to the left.

Suggestions would be greatly appreciated.

IW

Try using the offset property.

It would look something like:

ActiveCell.Offset(0, -1).Value = ActiveCell.Value

Ben