Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 14.08.2008, 17:21   #1
runny
 
Регистрация: 14.08.2008
Сообщений: 6
По умолчанию Помогите с формулой! Сил уже нет моих (((

Есть некрасивая база вида:

Шашкова Т А
ЛукьяноваНИ
Шаттило СН
АврачА В
Еврезов В.В.
Кацубо Н.И

Нужно чтобы фамилия и иницыалы были разделены пробелом без точек. Как это сделать? В ручную уже запарился (((
runny вне форума
Старый 14.08.2008, 23:50   #2
Maxxximum
 
Регистрация: 14.08.2008
Сообщений: 5
По умолчанию

1. Учитывая неоднородность Ваших данных, сначала нужно привести их к более-менее общему виду.
Для этого выделите диапазон с именами, затем Правка-Заменить...(Edit-Replace...) и замените все точки, запятые и пробелы на пустую строку.
В результате все имена приобретут вид "ЛукьяноваНИ"

2. Теперь вставляете формулу =LEFT(A1;LEN(A1)-2)&" "&UPPER(RIGHT(A1;2)), где А1 - ячейка с "ЛукьяноваНИ".
На выходе получите, что просили: "Лукьянова НИ"

В принципе, можно формулой убирать точки и пробелы, но овчинка не стоит выделки - формула будет очень громоздкой. А описанная мной в первом пункте операция займет 10 секунд независимо от количества строк.

P.S. В "русском" Excel формула =ПРОПНАЧ(ЛЕВСИМВ(A1;ДЛСТР(A1)-2))&" "&ПРОПИСН(ПРАВСИМВ(A1;2))

Последний раз редактировалось Maxxximum; 15.08.2008 в 00:44.
Maxxximum вне форума
Старый 15.08.2008, 01:03   #3
IgorGO
Новичок
СтарожилДжуниор
 
Аватар для IgorGO
 
Регистрация: 05.02.2008
Сообщений: 9,487
По умолчанию

по алгоритму предложенному Maxxximum
Код:
=ЛЕВСИМВ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(RC[-1];" ";"");".";"");ДЛСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(RC[-1];" ";"");".";""))-2) & " " & ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(RC[-1];" ";"");".";"");ДЛСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(RC[-1];" ";"");".";""))-1;1) & " " & ПРАВСИМВ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(RC[-1];" ";"");".";"");1)
или смотри приложение.
Вложения
Тип файла: rar ФИО.rar (1.9 Кб, 24 просмотров)
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
IgorGO вне форума
Старый 15.08.2008, 07:34   #4
дмидми
Форумчанин
 
Аватар для дмидми
 
Регистрация: 06.03.2008
Сообщений: 352
По умолчанию

Кажется, там короче.

Последний раз редактировалось дмидми; 15.08.2008 в 10:13.
дмидми вне форума
Старый 15.08.2008, 09:32   #5
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

Цитата:
Кажется, там короче.
ещё добавлю - на planetaExcel вчера эту задачу тоже уже решили (формулами)... ;-)
Serge_Bliznykov вне форума
Старый 15.08.2008, 09:59   #6
runny
 
Регистрация: 14.08.2008
Сообщений: 6
По умолчанию

да, оперативно вы помогаете! спасибо большое за помощь!!!!
runny вне форума
Старый 15.08.2008, 10:13   #7
дмидми
Форумчанин
 
Аватар для дмидми
 
Регистрация: 06.03.2008
Сообщений: 352
Печаль Мартышка к старости... (с)

Цитата:
Сообщение от Serge_Bliznykov Посмотреть сообщение
на planetaExcel вчера эту задачу тоже уже решили
Serge_Bliznykov,
что-то я никак не могу разглядеть в Вашем посте ссылку на упомянутое Вами решение
дмидми вне форума
Старый 15.08.2008, 23:20   #8
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

Цитата:
Сообщение от дмидми
что-то я никак не могу разглядеть в Вашем посте ссылку на упомянутое Вами решение
Тяжело разглядеть то, чего нет...
Вы правы, извините, не подумал, исправляюсь...
Тема на Планета Excel от runny
"Помогите с формулой! Сил уже нет моих ((("
Serge_Bliznykov вне форума
Старый 18.08.2008, 22:03   #9
VictorM
Старожил
 
Аватар для VictorM
 
Регистрация: 15.05.2008
Сообщений: 2,058
По умолчанию

Здравствуйте, господа.
У меня вопрос похожий, поэтому не стал создавать новую тему.
Как и у автора темы, попалась в руки база очень некрасивого вида
│ПАХОВ │СЕРГЕЙ │АНАТОЛЬЕВИЧ │18.02.1971│ДЗЕРЖИНСКИЙ,ШИРОКА Я,6
это все одна ячейка!!!
а мне бы нужно сделать так, как в приложенном файле, там есть для примера три строчки.
т.е. 1-яч. - ФИО, 2-я Дата, 3-я - Адрес.
Подскажите, пожалуйста, как это все можно "побороть"?
Спасибо.
Вложения
Тип файла: zip База.zip (2.3 Кб, 18 просмотров)
"Дайте людям рыбы, и вы накормите их на весь день; научите их ловить рыбу - и вы накормите их на всю жизнь"
"Большое спасибо" - Z261597841314, R208907249777, U447361470499
VictorM вне форума
Старый 19.08.2008, 00:05   #10
IgorGO
Новичок
СтарожилДжуниор
 
Аватар для IgorGO
 
Регистрация: 05.02.2008
Сообщений: 9,487
По умолчанию 2 VictorM

вот это
Код:
{=МИН(ЕСЛИ(ЕОШ(ПОИСК(СИМВОЛ(СТРОКА(R48C1:R57C1));RC1));1000;ПОИСК(СИМВОЛ(СТРОКА(R48C1:R57C1));RC1)))}
найдет позицию первой цифры (ППЦ) в строке.
дальше дело техники: от начала строки до ППЦ-1 - это ФИО, от ППЦ до ближайшего пробела - дата рождения, за пробелом адрес.
Успехов!
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
IgorGO вне форума
Закрытая тема


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
помогите с формулой master_3 Microsoft Office Excel 4 17.04.2009 19:15
Помогите с формулой ivkoa Microsoft Office Excel 7 28.07.2008 15:21
Странный скрипт на страницах моих сайтов! Lx62GjVWZQJFjPD JavaScript, Ajax 5 29.03.2008 17:22
ПОМОГИТЕ С ФОРМУЛОЙ А^ександр Microsoft Office Excel 6 19.02.2008 10:17
Помогите, пожалуйста, с формулой Booksseller Microsoft Office Excel 2 02.02.2008 13:19