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

Вход

Регистрация

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

 

= Мир MS Excel/Копирование матриц vba - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Копирование матриц vba (Макросы/Sub)
Копирование матриц vba
rosko Дата: Воскресенье, 29.06.2014, 09:22 | Сообщение № 1
Группа: Пользователи
Ранг: Участник
Сообщений: 58
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Здравствуйте, помогите пожалуйста
Проблема: имеется лист, на котором горизонтально расположены около 230 матриц данный 15*5 и соседние отстают на 3 столбца между собой, мне необходимо собрать все эти матрицы в одну, число столбцов последней, соответственно, =5. В прикрепленном файле зеленой заливкой выделен желаемый результат.
Заранее, спасибо за внимание и помощь!
К сообщению приложен файл: 6927124.xlsx (12.1 Kb)
 
Ответить
СообщениеЗдравствуйте, помогите пожалуйста
Проблема: имеется лист, на котором горизонтально расположены около 230 матриц данный 15*5 и соседние отстают на 3 столбца между собой, мне необходимо собрать все эти матрицы в одну, число столбцов последней, соответственно, =5. В прикрепленном файле зеленой заливкой выделен желаемый результат.
Заранее, спасибо за внимание и помощь!

Автор - rosko
Дата добавления - 29.06.2014 в 09:22
ikki Дата: Воскресенье, 29.06.2014, 09:48 | Сообщение № 2
Группа: Друзья
Ранг: Старожил
Сообщений: 1906
Репутация: 504 ±
Замечаний: 0% ±

Excel 2003, 2010
[vba]
Код
Sub t()
     j = 18
     For i = 2 To Cells(2, Columns.Count).End(xlToLeft).Column Step 8
         Cells(2, i).CurrentRegion.Copy Cells(j, 2): j = j + 15
     Next
End Sub
[/vba]


помощь по Excel и VBA
ikki@fxmail.ru, icq 592842413, skype alex.ikki
 
Ответить
Сообщение[vba]
Код
Sub t()
     j = 18
     For i = 2 To Cells(2, Columns.Count).End(xlToLeft).Column Step 8
         Cells(2, i).CurrentRegion.Copy Cells(j, 2): j = j + 15
     Next
End Sub
[/vba]

Автор - ikki
Дата добавления - 29.06.2014 в 09:48
rosko Дата: Воскресенье, 29.06.2014, 12:03 | Сообщение № 3
Группа: Пользователи
Ранг: Участник
Сообщений: 58
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Спасибо огромное)
 
Ответить
СообщениеСпасибо огромное)

Автор - rosko
Дата добавления - 29.06.2014 в 12:03
rosko Дата: Пятница, 18.07.2014, 12:41 | Сообщение № 4
Группа: Пользователи
Ранг: Участник
Сообщений: 58
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Здравствуйте, помогите пожалуйста
Проблема похожа на предыдущую, но решить самому не удалось, к сожалению.
На листе вертикально расположены множество матриц 1*3 и соседние могут отставать на различное число строк (иногда на 4, иногда на 125), хотелось бы собрать все эти матрицы в одну, число столбцов последней, соответственно, =3. В прикрепленном файле зеленой заливкой выделен желаемый результат.
Заранее, спасибо за внимание и помощь!
[moder]Возможно, проблема и похожа, но она таки другая. Следовательно, и тема должна быть другая (точнее, новая).
А эта закрыта.
К сообщению приложен файл: 3309509.xlsx (9.3 Kb)
 
Ответить
СообщениеЗдравствуйте, помогите пожалуйста
Проблема похожа на предыдущую, но решить самому не удалось, к сожалению.
На листе вертикально расположены множество матриц 1*3 и соседние могут отставать на различное число строк (иногда на 4, иногда на 125), хотелось бы собрать все эти матрицы в одну, число столбцов последней, соответственно, =3. В прикрепленном файле зеленой заливкой выделен желаемый результат.
Заранее, спасибо за внимание и помощь!
[moder]Возможно, проблема и похожа, но она таки другая. Следовательно, и тема должна быть другая (точнее, новая).
А эта закрыта.

Автор - rosko
Дата добавления - 18.07.2014 в 12:41
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Копирование матриц vba (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

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