Цитата |
---|
2Sist написал: Мне кажется, это не возможно |
Элементарно, Ватсон!
Скрытый текст |
---|
=ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ("г. Санкт-Петербург, "&ПОДСТАВИТЬ(ПСТР(ПСТР(ПСТР(A1;ЕСЛИОШИБКА(НАЙТИ("ул";A1);НАЙТИ("Ул";A1));200);НАЙТИ(" ";ПСТР(A1;ЕСЛИОШИБКА(НАЙТИ("ул";A1);НАЙТИ("Ул";A1));200))+1;200);1;ЕСЛИОШИБКА(ЕСЛИОШИБКА(НАЙТИ("д.";ПСТР(ПСТР(A1;ЕСЛИОШИБКА(НАЙТИ("ул";A1);НАЙТИ("Ул";A1));200);НАЙТИ(" ";ПСТР(A1;ЕСЛИОШИБКА(НАЙТИ("ул";A1);НАЙТИ("Ул";A1));200))+1;200));НАЙТИ(". ";ПСТР(ПСТР(A1;ЕСЛИОШИБКА(НАЙТИ("ул";A1);НАЙТИ("Ул";A1));200);НАЙТИ(" ";ПСТР(A1;ЕСЛИОШИБКА(НАЙТИ("ул";A1);НАЙТИ("Ул";A1));200))+1;200)));ПСТР(ПСТР(A1;ЕСЛИОШИБКА(НАЙТИ("ул";A1);НАЙТИ("Ул";A1));200);НАЙТИ(" ";ПСТР(A1;ЕСЛИОШИБКА(НАЙТИ("ул";A1);НАЙТИ("Ул";A1));200))+1;200))-1)&" ул., "&ПСТР(ПСТР(ПСТР(A1;ЕСЛИОШИБКА(НАЙТИ("ул";A1);НАЙТИ("Ул";A1));200);НАЙТИ(" ";ПСТР(A1;ЕСЛИОШИБКА(НАЙТИ("ул";A1);НАЙТИ("Ул";A1));200))+1;200);ЕСЛИОШИБКА(ЕСЛИОШИБКА(НАЙТИ("д.";ПСТР(ПСТР(A1;ЕСЛИОШИБКА(НАЙТИ("ул";A1);НАЙТИ("Ул";A1));200);НАЙТИ(" ";ПСТР(A1;ЕСЛИОШИБКА(НАЙТИ("ул";A1);НАЙТИ("Ул";A1));200))+1;200));НАЙТИ(". ";ПСТР(ПСТР(A1;ЕСЛИОШИБКА(НАЙТИ("ул";A1);НАЙТИ("Ул";A1));200);НАЙТИ(" ";ПСТР(A1;ЕСЛИОШИБКА(НАЙТИ("ул";A1);НАЙТИ("Ул";A1));200))+1;200)));ПСТР(ПСТР(A1;ЕСЛИОШИБКА(НАЙТИ("ул";A1);НАЙТИ("Ул";A1));200);НАЙТИ(" ";ПСТР(A1;ЕСЛИОШИБКА(НАЙТИ("ул";A1);НАЙТИ("Ул";A1));200))+1;200));50);"д.";"дом");". дом";"дом");"литера";"лит.");"литер";"лит.") |
Конечно на 100% исправить ситуацию не получится, т.к. бардак он и есть бардак, как его не автоматизируй, но в основной массе задача будет решена, остальное - ручками и через меню "Главная"-"Найти и заменить"