with
range([e1],cells(intersect(activesheet.usedrange,[a:a]).rows.count,5))
value=date
numberformat="dd/mm/yyyy"
end with
[e1].value="ConfDate"


Col


--
colofnature
------------------------------------------------------------------------
colofnature's Profile: http://www.excelforum.com/member.php...o&userid=34356
View this thread: http://www.excelforum.com/showthread...hreadid=548965