Beauty. Thanks a lot. Works like a charm.

Dr Fleau


"Kevin B" a écrit dans le message de
news: ...
Just change A1 to the cell that has your date, and this macro will
copy/paste
special value:

Range("A1").Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues

--
Kevin Backmann