I gave you an answer that does that - do you have a problem with it or just
prefer to work with Don?

--
Regards,
Tom Ogilvy

"Tim" wrote in message
...

Hi
I need a help to create a macro which will look in
column "Z"
and if any cell in this column has value "1" the macro
should do this:
1) On the entire row (which cell in column "Z" is=1)
with offset put in column "K" current date
2) Entire row(which cell in column "Z" is=1) Copy-
Paste Special-Values.
3) On the Entire row (which cell in column "Z"
is=1) change the value 1 in column "Z" with the formula:
=IF(sub!C1=6,1,"") (replace number "1" in column"Z" of
the entire row(which cell in column "Z" is=1) with the
next formula: =IF(sub!C1=6,1,"")
Any help is highly appreciated.