Встала задача генерить EAN13 в Excel. решение такое: скачиваем архив . В нём шрифт и файл Excel в примерами. Контрольная (13-я) цифра генерится по формуле: =[cell]*10+ОСТАТ(10-ОСТАТ(3*(ПСТР([cell];2;1)+ПСТР([cell];4;1)+ПСТР([cell];6;1)+ПСТР([cell];8;1)+ПСТР([cell];10;1)+ПСТР([cell];12;1))+ПСТР([cell];1;1)+ПСТР([cell];3;1)+ПСТР([cell];5;1)+ПСТР([cell];7;1)+ПСТР([cell];9;1)+ПСТР([cell];11;1);10);10) [cell] меняем на адрес нужной ячейки, разумеется.