Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Перенос данных с множества столбцов в конец первого столбца - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Перенос данных с множества столбцов в конец первого столбца (Макросы/Sub)
Перенос данных с множества столбцов в конец первого столбца
Caeneus Дата: Понедельник, 07.12.2015, 23:20 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 2
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Здравствуйте
Проблема в следующем: есть более сотни столбцов с десятками заполненных строк. Как их все последовательно перенести в конец столбца "А"? То есть, в первую пустую ячейку столбца "А" перенести все заполненные ячейки со столбца "B", следом поместить содержимое столбца "C" и т.д., пока не останется лишь ооочень длинный столбец "А".
 
Ответить
СообщениеЗдравствуйте
Проблема в следующем: есть более сотни столбцов с десятками заполненных строк. Как их все последовательно перенести в конец столбца "А"? То есть, в первую пустую ячейку столбца "А" перенести все заполненные ячейки со столбца "B", следом поместить содержимое столбца "C" и т.д., пока не останется лишь ооочень длинный столбец "А".

Автор - Caeneus
Дата добавления - 07.12.2015 в 23:20
_Boroda_ Дата: Понедельник, 07.12.2015, 23:36 | Сообщение № 2
Группа: Модераторы
Ранг: Местный житель
Сообщений: 16675
Репутация: 6481 ±
Замечаний: 0% ±

2003; 2007; 2010; 2013 RUS
Так нужно?
Код
=ИНДЕКС(B$1:D$9;ОСТАТ(НАИМЕНЬШИЙ(ЕСЛИ(B$1:D$9<>"";СТОЛБЕЦ(A1:C9)+СТРОКА(B$1:D$9)%%);СТРОКА(A1));1)/1%%+0,1;НАИМЕНЬШИЙ(ЕСЛИ(B$1:D$9<>"";СТОЛБЕЦ(A1:C9));СТРОКА(A1)))

формула массива. вводится одновременным нажатием Контрл Шифт Ентер
К сообщению приложен файл: 5_1.xlsx (8.9 Kb)


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеТак нужно?
Код
=ИНДЕКС(B$1:D$9;ОСТАТ(НАИМЕНЬШИЙ(ЕСЛИ(B$1:D$9<>"";СТОЛБЕЦ(A1:C9)+СТРОКА(B$1:D$9)%%);СТРОКА(A1));1)/1%%+0,1;НАИМЕНЬШИЙ(ЕСЛИ(B$1:D$9<>"";СТОЛБЕЦ(A1:C9));СТРОКА(A1)))

формула массива. вводится одновременным нажатием Контрл Шифт Ентер

Автор - _Boroda_
Дата добавления - 07.12.2015 в 23:36
Caeneus Дата: Вторник, 08.12.2015, 09:54 | Сообщение № 3
Группа: Пользователи
Ранг: Прохожий
Сообщений: 2
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
_Boroda_, Отлично! Спасибо. Вопрос закрыт
 
Ответить
Сообщение_Boroda_, Отлично! Спасибо. Вопрос закрыт

Автор - Caeneus
Дата добавления - 08.12.2015 в 09:54
Wasilich Дата: Вторник, 08.12.2015, 14:49 | Сообщение № 4
Группа: Друзья
Ранг: Старожил
Сообщений: 1232
Репутация: 326 ±
Замечаний: 0% ±

2003
перенести все ... пока не останется лишь ооочень длинный столбец "А".

Так перенести или скопировать? :) Формула же, не переносит!
 
Ответить
Сообщение
перенести все ... пока не останется лишь ооочень длинный столбец "А".

Так перенести или скопировать? :) Формула же, не переносит!

Автор - Wasilich
Дата добавления - 08.12.2015 в 14:49
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Перенос данных с множества столбцов в конец первого столбца (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!