Ciao salvozac. (e un saluto agli altri), col permesso di Salvatore
(By Sal), sostituendo questo:
StrToData = CDate(n)
con questo:
StrToData = Format(CDate(n), "d/mm/yyyy")
ti ritrovi la data abbreviata come vuoi tu (23/06/2012).
Benedetto
___________________
Windows 7 - Excel 2010