Помогите, пожалуйста, с формулой excel по информатике:)

Если учитывать все цифры даты (число, месяц и год), то формула получается длинной. Вот она: =ЕСЛИ(И(ДЕНЬ(A1)=13;ДЕНЬНЕД(A1)=6);"Опасно!";СУММ(ЧАСТНОЕ(ДЕНЬ(A1);10);ОСТАТ(ДЕНЬ(A1);10);ЧАСТНОЕ(МЕСЯЦ(A1);10);ОСТАТ(МЕСЯЦ(A1);10);ПСТР(ГОД(A1);1;1)+ПСТР(ГОД(A1);2;1)+ПСТР(ГОД(A1);3;1)+ПСТР(ГОД(A1);4;1)))