Thanks for the quick response. I tried both versions but i get an erro
13 type mismatch
on the line
dt = DateSerial(clng(sYear),clng(sMon),clng(sDay))


and the same error on the second example with the 'dt=' line

Pau

--
pamalpas
-----------------------------------------------------------------------
pamalpass's Profile: http://www.excelforum.com/member.php...fo&userid=3195
View this thread: http://www.excelforum.com/showthread.php?threadid=51672