create cursor test ( d1 c(20) ) insert into test values('=date(2002,1,1)') insert into test values('=date(2002,1,4)') insert into test values('=date(2002,4,1)') go top _VFP.DataToClip(,,3) && activate excel && paste, got this after formatting dd MMM yyyy D1 01 Jan 2002 04 Jan 2002 01 Apr 2002