как-то так,
ДатаЗначение = Дата(Сред(ДатаСтрока,7,2),Сред(ДатаСтрока,4,2),Сред(ДатаСтрока,1,2));
Именно этот код работать не будет, т.к. у Вас год из двух символов, надо как-то его переделать в 4 символа и передать в первый параметр "Дата".
Так и сделал, все заработало. Спс.