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

Вход

Регистрация

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

 

= Мир MS Excel/Список из всех столбцов в одну колонку без пробелов - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Список из всех столбцов в одну колонку без пробелов (Формулы/Formulas)
Список из всех столбцов в одну колонку без пробелов
Vinkelman Дата: Среда, 17.12.2014, 21:30 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 249
Репутация: 26 ±
Замечаний: 0% ±

2003 - 2010
Доброго всем времени суток!
Бьюсь больше часа - не могу понять, почему из первого столбца одна ячейка (в моём примере "I7") всегда остаётся пустой?
Может быть есть более простые варианты решения?
К сообщению приложен файл: AV_2.xls (55.5 Kb)
 
Ответить
СообщениеДоброго всем времени суток!
Бьюсь больше часа - не могу понять, почему из первого столбца одна ячейка (в моём примере "I7") всегда остаётся пустой?
Может быть есть более простые варианты решения?
Автор - Vinkelman
Дата добавления - 17.12.2014 в 21:30
Nic70y Дата: Среда, 17.12.2014, 21:56 | Сообщение № 2
Группа: Друзья
Ранг: Экселист
Сообщений: 8761
Репутация: 2273 ±
Замечаний: 0% ±

Excel 2010
вариант без доп. столбцов (немассивная):
Код
=ЕСЛИОШИБКА(ИНДЕКС(A$1:G$23;СУММПРОИЗВ(ОСТАТ(НАИМЕНЬШИЙ((A$2:G$23<>"")*СТОЛБЕЦ(A$2:G$23)+СТРОКА(A$2:G$23)/1000;СЧИТАТЬПУСТОТЫ(A$2:G$23)+СТРОКА(M1));1)*1000);СУММПРОИЗВ(ЦЕЛОЕ(НАИМЕНЬШИЙ((A$2:G$23<>"")*СТОЛБЕЦ(A$2:G$23)+СТРОКА(A$2:G$23)/1000;СЧИТАТЬПУСТОТЫ(A$2:G$23)+СТРОКА(M1)))));"")
и + в файле с доп. столбцами
перезалил (столбцы со строками перепутал)
К сообщению приложен файл: 18.xls (63.5 Kb)

ЮMoney 41001841029809

Сообщение отредактировал Nic70y - Среда, 17.12.2014, 22:03
 
Ответить
Сообщениевариант без доп. столбцов (немассивная):
Код
=ЕСЛИОШИБКА(ИНДЕКС(A$1:G$23;СУММПРОИЗВ(ОСТАТ(НАИМЕНЬШИЙ((A$2:G$23<>"")*СТОЛБЕЦ(A$2:G$23)+СТРОКА(A$2:G$23)/1000;СЧИТАТЬПУСТОТЫ(A$2:G$23)+СТРОКА(M1));1)*1000);СУММПРОИЗВ(ЦЕЛОЕ(НАИМЕНЬШИЙ((A$2:G$23<>"")*СТОЛБЕЦ(A$2:G$23)+СТРОКА(A$2:G$23)/1000;СЧИТАТЬПУСТОТЫ(A$2:G$23)+СТРОКА(M1)))));"")
и + в файле с доп. столбцами
перезалил (столбцы со строками перепутал)
Автор - Nic70y
Дата добавления - 17.12.2014 в 21:56
ShAM Дата: Среда, 17.12.2014, 22:03 | Сообщение № 3
Группа: Друзья
Ранг: Старожил
Сообщений: 1347
Репутация: 249 ±
Замечаний: 0% ±

Excel 2010
Что-то у меня файл не открывается.
 
Ответить
СообщениеЧто-то у меня файл не открывается.
Автор - ShAM
Дата добавления - 17.12.2014 в 22:03
Nic70y Дата: Среда, 17.12.2014, 22:06 | Сообщение № 4
Группа: Друзья
Ранг: Экселист
Сообщений: 8761
Репутация: 2273 ±
Замечаний: 0% ±

Excel 2010
Цитата ShAM, 17.12.2014 в 22:03, в сообщении № 3
файл не открывается
если мой, то наверное из-за того, что я его перезаливал
Цитата
всегда остаётся пустой?
0 в данном случае тоже уникальное

ЮMoney 41001841029809

Сообщение отредактировал Nic70y - Среда, 17.12.2014, 22:12
 
Ответить
Сообщение
Цитата ShAM, 17.12.2014 в 22:03, в сообщении № 3
файл не открывается
если мой, то наверное из-за того, что я его перезаливал
Цитата
всегда остаётся пустой?
0 в данном случае тоже уникальное
Автор - Nic70y
Дата добавления - 17.12.2014 в 22:06
ShAM Дата: Среда, 17.12.2014, 22:27 | Сообщение № 5
Группа: Друзья
Ранг: Старожил
Сообщений: 1347
Репутация: 249 ±
Замечаний: 0% ±

Excel 2010
Цитата Nic70y, 17.12.2014 в 22:06, в сообщении № 4
если мой
Нет, Николай, из 1-го поста. :)
 
Ответить
Сообщение
Цитата Nic70y, 17.12.2014 в 22:06, в сообщении № 4
если мой
Нет, Николай, из 1-го поста. :)
Автор - ShAM
Дата добавления - 17.12.2014 в 22:27
Vinkelman Дата: Среда, 17.12.2014, 22:54 | Сообщение № 6
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 249
Репутация: 26 ±
Замечаний: 0% ±

2003 - 2010
Nic70y,
Большое спасибо! Буду использовать с дополнительными столбцами.
 
Ответить
СообщениеNic70y,
Большое спасибо! Буду использовать с дополнительными столбцами.
Автор - Vinkelman
Дата добавления - 17.12.2014 в 22:54
krosav4ig Дата: Среда, 17.12.2014, 23:38 | Сообщение № 7
Группа: Друзья
Ранг: Старожил
Сообщений: 2347
Репутация: 989 ±
Замечаний: 0% ±

Excel 2007,2010,2013
можно еще сводной
К сообщению приложен файл: AV_2.xlsx (22.8 Kb)

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщениеможно еще сводной
Автор - krosav4ig
Дата добавления - 17.12.2014 в 23:38
Vinkelman Дата: Четверг, 18.12.2014, 10:13 | Сообщение № 8
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 249
Репутация: 26 ±
Замечаний: 0% ±

2003 - 2010
krosav4ig, спасибо, сводная не подходит, нужно автоматическое обновление.
 
Ответить
Сообщениеkrosav4ig, спасибо, сводная не подходит, нужно автоматическое обновление.
Автор - Vinkelman
Дата добавления - 18.12.2014 в 10:13
Nic70y Дата: Четверг, 18.12.2014, 10:26 | Сообщение № 9
Группа: Друзья
Ранг: Экселист
Сообщений: 8761
Репутация: 2273 ±
Замечаний: 0% ±

Excel 2010
переделал столбец K
К сообщению приложен файл: 19.xls (57.0 Kb)

ЮMoney 41001841029809
 
Ответить
Сообщениепеределал столбец K
Автор - Nic70y
Дата добавления - 18.12.2014 в 10:26
krosav4ig Дата: Четверг, 18.12.2014, 13:35 | Сообщение № 10
Группа: Друзья
Ранг: Старожил
Сообщений: 2347
Репутация: 989 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Vinkelman, в моем файле данные включены в автотаблицу и при добавлении строк новые элементы автоматически добавляются в сводную. Автобновление сводной можно сделать например таким кодом в модуле листа [vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
      With Application: .ScreenUpdating = 0: .EnableEvents = 0
          If Not Intersect([Таблица1], Target) Is Nothing Then:
             ActiveSheet.PivotTables(1).PivotCache.Refresh
      .ScreenUpdating = 1: .EnableEvents = 1: End With
End Sub
[/vba]

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460

Сообщение отредактировал krosav4ig - Четверг, 18.12.2014, 13:36
 
Ответить
СообщениеVinkelman, в моем файле данные включены в автотаблицу и при добавлении строк новые элементы автоматически добавляются в сводную. Автобновление сводной можно сделать например таким кодом в модуле листа [vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
      With Application: .ScreenUpdating = 0: .EnableEvents = 0
          If Not Intersect([Таблица1], Target) Is Nothing Then:
             ActiveSheet.PivotTables(1).PivotCache.Refresh
      .ScreenUpdating = 1: .EnableEvents = 1: End With
End Sub
[/vba]
Автор - krosav4ig
Дата добавления - 18.12.2014 в 13:35
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Список из всех столбцов в одну колонку без пробелов (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

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