Rick i got an error with yours.
Jie, thanks that works.
Alan, yours is tricky and im as clear as i need to be on it.
=IF(OR(C2="",AND(C2<>"",A2<>"")),A2,C2)
Can you explain it because i need to write it in VBA without the R1C1 refs that i get from the macro recorder:
Range("G2").Select
ActiveCell.FormulaR1C1 = "=IF(OR(RC[-4]="""",AND(RC[-4]<>"""",RC[-6]<>"""")),RC[-6],RC[-4])"
Range("G2").Select
Selection.Copy
Range("G2:H15").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Range("G1").Select
Bookmarks