Новости:

Теперь на форум можно залогиниться / зарегистрироваться с помощью ВКонтакте. Уже существующие пользователи могут связать свою учетную запись с аккаунтом ВКонтакте одним кликом в профиле пользователя http://forum.msexcel.ru/index.php?action=profile;area=account

Главное меню

зеркальное отображение информации в excel

Автор igroker, 22.06.2009, 04:08

« назад - далее »

igroker

 есть такой текст  в excel
понедельник вторник среда четверг  пятница
а нужно сделать
пятница четверг среда вторник понедельник

Шпец Докапыч

Цитата: igroker от 22.06.2009, 04:08
а нужно сделать
пятница четверг среда вторник понедельник

Alt+F11 -> Insert -> Module -> копипастим сюда код:
Function ИНВЕРТ(ТЕКСТ As String) As String
  Dim tmp() As String, txt As String
  tmp = Split(ТЕКСТ, " ")
  For i = UBound(tmp) To 0 Step -1
    txt = txt & " " & tmp(i)
  Next
  ИНВЕРТ = Trim(txt)
End Function


На листе пишем:

  • A1: "понедельник вторник среда четверг пятница"
  • B1: =ИНВЕРТ(A1)
Знания недостаточно, необходимо применение. Желания недостаточно, необходимо действие. (с) Брюс Ли

igroker

спасибо но  мне точнее надо
есть таблица  и ее значение например

пятница  четверг среда вторник понедельник
13             45         42       21         29
128             32        201     29          47

и  надо   эту таблицу инвертировать
понедельник вторник среда четверг пятница
29                 21        42        45       13
47                  29       201       32       128

жду ответа знатоков

Шпец Докапыч

Цитата: igroker от 22.06.2009, 04:08
есть такой текст  в excel

Телепатия сломалась...  :D

Цитата: igroker от 25.06.2009, 17:27
есть таблица и ее значение например...

Тогда так:

  • A6: =СМЕЩ($F1;;-СТОЛБЕЦ())
Знания недостаточно, необходимо применение. Желания недостаточно, необходимо действие. (с) Брюс Ли

igroker

можно повторить сначала ваш ответ по порядку  я не совсем понил

Шпец Докапыч

Цитата: igroker от 25.06.2009, 20:01
можно повторить сначала ваш ответ по порядку  я не совсем понил

Хм, даже не знаю с чего начать... см. вложение.  ;)
Знания недостаточно, необходимо применение. Желания недостаточно, необходимо действие. (с) Брюс Ли

igroker

cпасибо  но вы мне можете  написать
полностью  код

igroker

я понил вы использует функцию смещение
пожалуйста  как  заполнить и аргументы функции
ссылка 
смещение по строкам
смещение по столбцам
на этом конкретном примере

Шпец Докапыч

Цитата: igroker от 26.06.2009, 12:13
пожалуйста, как заполнить и аргументы функции

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

Ферштейн мих?  ;)
Знания недостаточно, необходимо применение. Желания недостаточно, необходимо действие. (с) Брюс Ли

igroker

  вот смотри пример исходного массива  кординаты  этого массива чисел   D2:H7
пятн   чет   сред   вт   пон
210   123   248   278   123
34   66    144    218    93
219    233   233   263   193
45   37    40    110    158
117   95   100   106   58
34   24    52    70    29
должен быть получен массив его кординаты
M2:Q7
используя  функцию смещение
выходит окошко с аргументами  что ты пишешь
ссылка
смещение по строкам
смещение по столбцам

igroker

в твоем примере который ты сделал
массив данных находится A1:E3
преобразованный массив  находится A6:E8

=СМЕЩ($F1;;-СТОЛБЕЦ())
мне это формула не понятна  можно обьяснить
как   ты это делал

igroker

 у меня получилось
работа этой функции
спасибо

Exc_fun

#12
Почему зеркально отраженный текст в https://olegon.ru/pr/flip.html при копировании в Блокнот или Ecxel принимает исходный вид, а не измененный?

vikttur