Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Сократить длинные ФИО до коротких ФИО. - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Сократить длинные ФИО до коротких ФИО.
Mark1976 Дата: Среда, 13.11.2024, 19:32 | Сообщение № 1
Группа: Проверенные
Ранг: Ветеран
Сообщений: 761
Репутация: 3 ±
Замечаний: 0% ±

Excel 2010, 2013
Здравствуйте. Есть таблица с данными. В ячейке А3 написано Иванов Иван Иванович мне надо быстро сделать формулой И.И.И. Заранее спасибо.
 
Ответить
СообщениеЗдравствуйте. Есть таблица с данными. В ячейке А3 написано Иванов Иван Иванович мне надо быстро сделать формулой И.И.И. Заранее спасибо.

Автор - Mark1976
Дата добавления - 13.11.2024 в 19:32
прохожий2019 Дата: Среда, 13.11.2024, 19:54 | Сообщение № 2
Группа: Проверенные
Ранг: Старожил
Сообщений: 1298
Репутация: 327 ±
Замечаний: 0% ±

365 Beta Channel
365
Код
=СЦЕП(ЛЕВБ(ТЕКСТРАЗД(A1;" "))&".")


Сообщение отредактировал прохожий2019 - Среда, 13.11.2024, 20:20
 
Ответить
Сообщение365
Код
=СЦЕП(ЛЕВБ(ТЕКСТРАЗД(A1;" "))&".")

Автор - прохожий2019
Дата добавления - 13.11.2024 в 19:54
i691198 Дата: Среда, 13.11.2024, 20:08 | Сообщение № 3
Группа: Проверенные
Ранг: Обитатель
Сообщений: 342
Репутация: 109 ±
Замечаний: 0% ±

Для старых версий офиса формула длиннее.
Код
=ЛЕВСИМВ(A3;1)&". "&ЛЕВСИМВ(СЖПРОБЕЛЫ(ПСТР(ПОДСТАВИТЬ(A3;" ";ПОВТОР(" ";50));50;50));1)&". " &ЛЕВСИМВ(СЖПРОБЕЛЫ(ПСТР(ПОДСТАВИТЬ(A3;" ";ПОВТОР(" ";50));100;50));1)&"."
 
Ответить
СообщениеДля старых версий офиса формула длиннее.
Код
=ЛЕВСИМВ(A3;1)&". "&ЛЕВСИМВ(СЖПРОБЕЛЫ(ПСТР(ПОДСТАВИТЬ(A3;" ";ПОВТОР(" ";50));50;50));1)&". " &ЛЕВСИМВ(СЖПРОБЕЛЫ(ПСТР(ПОДСТАВИТЬ(A3;" ";ПОВТОР(" ";50));100;50));1)&"."

Автор - i691198
Дата добавления - 13.11.2024 в 20:08
Mark1976 Дата: Среда, 13.11.2024, 20:17 | Сообщение № 4
Группа: Проверенные
Ранг: Ветеран
Сообщений: 761
Репутация: 3 ±
Замечаний: 0% ±

Excel 2010, 2013
прохожий2019, не получилось.
 
Ответить
Сообщениепрохожий2019, не получилось.

Автор - Mark1976
Дата добавления - 13.11.2024 в 20:17
прохожий2019 Дата: Среда, 13.11.2024, 20:17 | Сообщение № 5
Группа: Проверенные
Ранг: Старожил
Сообщений: 1298
Репутация: 327 ±
Замечаний: 0% ±

365 Beta Channel
для старых
Код
=ЛЕВБ(A1)&"."&ПСТР(A1;ПОИСК(" ";A1)+1;1)&"."&ПСТР(A1;ПОИСК(" ";A1;ПОИСК(" ";A1)+1)+1;1)&"."
 
Ответить
Сообщениедля старых
Код
=ЛЕВБ(A1)&"."&ПСТР(A1;ПОИСК(" ";A1)+1;1)&"."&ПСТР(A1;ПОИСК(" ";A1;ПОИСК(" ";A1)+1)+1;1)&"."

Автор - прохожий2019
Дата добавления - 13.11.2024 в 20:17
Mark1976 Дата: Среда, 13.11.2024, 20:22 | Сообщение № 6
Группа: Проверенные
Ранг: Ветеран
Сообщений: 761
Репутация: 3 ±
Замечаний: 0% ±

Excel 2010, 2013
прохожий2019, ваша формула сработала. спасибо. Всем спасибо за интерес к теме.
 
Ответить
Сообщениепрохожий2019, ваша формула сработала. спасибо. Всем спасибо за интерес к теме.

Автор - Mark1976
Дата добавления - 13.11.2024 в 20:22
2version Дата: Среда, 13.11.2024, 20:28 | Сообщение № 7
Группа: Пользователи
Ранг: Новичок
Сообщений: 30
Репутация: 0 ±
Замечаний: 0% ±

Здравствуйте, попробуйте так:
Код
=ЛЕВСИМВ(A1;1) & "." & ЛЕВСИМВ(ПСТР(A1;ПОИСК(" ";A1)+1;99);1) & "." & ЛЕВСИМВ(ПСТР(A1;ПОИСК(" ";A1;ПОИСК(" ";A1)+1)+1;99);1) & "."


Сообщение отредактировал 2version - Среда, 13.11.2024, 20:29
 
Ответить
СообщениеЗдравствуйте, попробуйте так:
Код
=ЛЕВСИМВ(A1;1) & "." & ЛЕВСИМВ(ПСТР(A1;ПОИСК(" ";A1)+1;99);1) & "." & ЛЕВСИМВ(ПСТР(A1;ПОИСК(" ";A1;ПОИСК(" ";A1)+1)+1;99);1) & "."

Автор - 2version
Дата добавления - 13.11.2024 в 20:28
Egyptian Дата: Среда, 13.11.2024, 20:59 | Сообщение № 8
Группа: Проверенные
Ранг: Ветеран
Сообщений: 526
Репутация: 193 ±
Замечаний: 0% ±

Excel 2013/2016
Для более коротких имен (типа Чонг Ли, Ю Чжоу и Бен Джонсон) в том числе:
Код
=IFERROR(REPLACE(REPLACE(REPLACE(REPT(".";2);1;1;LEFT(A3));FIND(" ";A3)+2;2;MID(A3;FIND(" ";A3);2)&".");FIND("@";SUBSTITUTE(A3;" ";"@";2));2;MID(A3;FIND("@";SUBSTITUTE(A3;" ";"@";2));2)&".");REPLACE(REPLACE(REPT(".";2);1;1;LEFT(A3));FIND(" ";A3)+2;2;MID(A3;FIND(" ";A3);2)&"."))
 
Ответить
СообщениеДля более коротких имен (типа Чонг Ли, Ю Чжоу и Бен Джонсон) в том числе:
Код
=IFERROR(REPLACE(REPLACE(REPLACE(REPT(".";2);1;1;LEFT(A3));FIND(" ";A3)+2;2;MID(A3;FIND(" ";A3);2)&".");FIND("@";SUBSTITUTE(A3;" ";"@";2));2;MID(A3;FIND("@";SUBSTITUTE(A3;" ";"@";2));2)&".");REPLACE(REPLACE(REPT(".";2);1;1;LEFT(A3));FIND(" ";A3)+2;2;MID(A3;FIND(" ";A3);2)&"."))

Автор - Egyptian
Дата добавления - 13.11.2024 в 20:59
Nic70y Дата: Четверг, 14.11.2024, 08:58 | Сообщение № 9
Группа: Друзья
Ранг: Экселист
Сообщений: 9010
Репутация: 2369 ±
Замечаний: 0% ±

Excel 2010
Для более коротких имен
Код
=ПОДСТАВИТЬ(ЛЕВБ(A1)&ПСТР(A1;ПОИСК(" ";A1);2)&ПСТР(A1;ПОИСК(" ";ПОДСТАВИТЬ(A1;" ";;1)&" ")+1;2);" ";".")&"."


ЮMoney 41001841029809
 
Ответить
Сообщение
Для более коротких имен
Код
=ПОДСТАВИТЬ(ЛЕВБ(A1)&ПСТР(A1;ПОИСК(" ";A1);2)&ПСТР(A1;ПОИСК(" ";ПОДСТАВИТЬ(A1;" ";;1)&" ")+1;2);" ";".")&"."

Автор - Nic70y
Дата добавления - 14.11.2024 в 08:58
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!