FormattingCurrentDateInExcelString