You could do it with a formula

A2: =IF(COUNTIF($D$2:D2,"Changed")=COUNTA($D$2:D2),B2, "")

and copy down

--

HTH

RP
(remove nothere from the email address if mailing direct)


"choice" wrote in message
...
i have range d2:d1000
if d = "Changed" then
take the value in B of the same row and put in A of the same row.
if d does not = "Changed" then
exit sub

any help on how to write this as a loop would be greatly appreciated

thanks in advance