Страницы: 1
RSS
Зеркальная таблица, не транспонирование, а зеркало
 
Доброго времени суток.
Условие: есть таблица из трех столбцов.
Задача: повернуть таблицу вокруг вертикальной оси на 180 градусов. Т.е. первый столбец становится третьим, третий первым. Второй, как "ось" не меняется.

Конкретная задача: в моем случае таблица на 112 столбцов и примерно 700 строк. Идеи сделать руками через ctrl-C ctrl-V - это не очень удачная мысль.
 
Макрос
Скрытый текст
Согласие есть продукт при полном непротивлении сторон
 
Цитата
Alex-Bel написал:
таблица на 112 столбцов
- т.е. нет никакого центрального столбца... Зачем с толку сбиваете?
Ну а  так сделать макросом нет особых проблем, если там только данные, без всяких формул, красивостей, УФ, объединений...
2 цикла по данным и готово
Изменено: Hugo - 13.07.2024 17:25:07
 
Цитата
Hugo написал:
3 цикла по данным
3?  :oops:
Согласие есть продукт при полном непротивлении сторон
 
Цитата
Sanja написал:
3?
- что-то я думал пополам массив разбить зачем-то ))
Точно два достаточно, поправил уже там выше...
3 это экономнее если есть средний столбец, который нет смысла самого в себя перекладывать ))
Изменено: Hugo - 13.07.2024 17:28:08
 
pq: Table.ToColumns -> List.Reverse -> Table.FromColumns
Пришелец-прораб.
 
Цитата
Hugo написал:
если есть средний столбец
тогда это не зеркальная таблица. ТС действительно чуть в блуд не  ввёл)
Согласие есть продукт при полном непротивлении сторон
 
Собственно AlienSx выше уже все расписал, сам код:
pq
 
Цитата
Sanja написал:
3?
2?   :oops:
Скрытый текст
По вопросам из тем форума, личку не читаю.
 
Формула (протяните вправо и вниз)
Код
=IFERROR(INDEX(Sheet1!1:1;;AGGREGATE(14;6;COLUMN($A:$XZ)/(Sheet1!1:1<>"");COLUMNS($A:A)));"")
 
как же красивы решения на формулах и PQ в сравнении с макросами ))))
 
Цитата
nilske написал:
и PQ в сравнении с макросами
- ну можно и в макросе показать только вызов процедур и функций ))
 
Цитата
nilske написал:
как же красивы решения на формулах и PQ в сравнении с макросами ))))
так Питонисты о том же твердят, забвая что таскают за собой ворох библиотек, без которых их код  - тыква. Так и тут, без PQ ничего не заработает, а AGGREGATE  появился не сразу, .....

Ни формула, ни pq не поменяет данные в источнике.
По вопросам из тем форума, личку не читаю.
 
Еще вариант.
Код
=ЕСЛИОШИБКА(ИНДЕКС(Sheet1!1:1;;112-СТОЛБЕЦ()+1);"")
Страницы: 1
Читают тему
Наверх