Поменять местами слова в ячейке

[Нюни]

Привет всем!
Задача:
Дана таблица с данными. В первом столбце записывается ФИО. Сначала записывается имя, потом идет фамилия.
Надо:
Написать программку или каким-нибудь другим способом поменять имя и фамилию местами. Сначала должна идти Фамилия, потом Имя.

[SAS888]

Посмотрите вложение. Запустите макрос "Main".

[Serge 007]

Сообщение от Нюни

Привет всем!
Задача:
Дана таблица с данными. В первом столбце записывается ФИО. Сначала записывается имя, потом идет фамилия.
Надо:
Написать программку или каким-нибудь другим способом поменять имя и фамилию местами. Сначала должна идти Фамилия, потом Имя.

=ПРАВСИМВ(A2;ДЛСТР(A2)-НАЙТИ(" ";A2))&" "&ЛЕВСИМВ(A2;НАЙТИ(" ";A2))

[SAS888]

2Serge 007
1. Ни одна формула не способна изменить данные в этой же ячейке. Т.е. Ваш формульный метод подразумевает доп. столбец.
2. Все-таки, нужно предусмотреть то, что в ячейке возможны "лишние" пробелы (до, после, повторные).

[vikttur]

Сообщение от SAS888

2Serge 007
Ни одна формула не способна изменить данные в этой же ячейке

Не по теме, но по замечанию.
В А1 =A1+1, включаем итерации.
Шутка, но с долей правды

[Нюни]

Сообщение от SAS888

Посмотрите вложение. Запустите макрос "Main".

Спасибо Вам большое, работает и как раз то что нужно!

[Serge 007]

Сообщение от SAS888

2Serge 007
1. Ни одна формула не способна изменить данные в этой же ячейке.
2. Все-таки, нужно предусмотреть то, что в ячейке возможны "лишние" пробелы (до, после, повторные).

1. Я бы не стал этого утверждать :-)
2. Легко решаемо с помошью СЖПРОБЕЛЫ.

[SAS888]

1. Я бы не стал этого утверждать :-)

Приведите пример.

2. Легко решаемо с помошью СЖПРОБЕЛЫ.

И я об этом. Добавить СЖПРОБЕЛЫ, добавить ЕОШ, на случай пустой ячейки, либо в 1 слово и т.п. Т.е. формула "разрастется" до неприличных размеров.

P.S. Не обижайтесь. Это я так. Не для спора и дискуссии. Просто, вопрошающий проигнорировал настоятельные рекомендации правил раздела и не оговорил, какими средствами решать задачу. Но, т.к. мы имеем уже заполненную таблицу и требуется изменить данные, то я взял на себя смелость утверждать, что требуется именно макрос.

[Serge 007]

Сообщение от SAS888

Приведите пример.

Его уже привёл vikttur

И я об этом. Добавить СЖПРОБЕЛЫ, добавить ЕОШ, на случай пустой ячейки, либо в 1 слово и т.п. Т.е. формула "разрастется" до неприличных размеров.

P.S. Не обижайтесь. Это я так. Не для спора и дискуссии. Просто, вопрошающий проигнорировал настоятельные рекомендации правил раздела и не оговорил, какими средствами решать задачу. Но, т.к. мы имеем уже заполненную таблицу и требуется изменить данные, то я взял на себя смелость утверждать, что требуется именно макрос

Да, к сожалению это так

P.S. И в мыслях не было! SAS888, я очень уважаю Вас и вижу Ваш профессионализм. И по-поводу макроса Вы оказались правы.
А автор ввёл в заблуждение фразой:

... Написать программку или каким-нибудь другим способом поменять имя и фамилию местами...

С уважением,
Сергей.

[Velada]

SAS888
Большое спасибо за макрос, мне тоже ооооочень помог.