Зеркальное отображение столбца с текстовыми данными

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по Excel » Зеркальное отображение столбца с текстовыми данными (Формулы)

Арко

Дата: Суббота, 05.10.2013, 10:36 | Сообщение № 1

Группа: Гости

Здравствуйте, помогите найити решение следующей задачи.
Имеется некий столбец текстовых данных следующего вида:

ABCDEFGH
AC4556CT
2FF5C73A
........
и т.д.

Количество элементов в каждой строке всегода одинаково, их 8.
Сами элементы произвольные. Задача заключается в следующем преобразовании:

ABCDEFGH -> GHEFCDAB
AC4556CT -> CT5645AC
2FF5C73A -> 3AC7F52F и т.д.

Да, это не просто зеркало, элементы отображаются справа на лево зеркально и попарно.

Ответить

AlexM

Дата: Суббота, 05.10.2013, 10:55 | Сообщение № 2

Группа: Друзья

Ранг: Участник клуба

Сообщений: 4511

Репутация: 1128 ±

Замечаний: 0% ±

Excel 2003

Нужен файл с примером, прочтите правила форума

Номер мобильного модема (без голосовой связи)
9269171249 МегаФон, Московский регион.

Ответить

RAN

Дата: Суббота, 05.10.2013, 14:22 | Сообщение № 3

Группа: Друзья

Ранг: Экселист

Сообщений: 5660

Репутация: 1163 ±

Замечаний: 0% ±

2010

[vba]

Код

Function Мяу(str As String) As String
     Dim i&
     str = StrReverse(str)
     For i = 1 To Len(str) Step 2
         Mid$(str, i, 2) = StrReverse(Mid$(str, i, 2))
     Next
     Мяу = str
End Function

[/vba]