Видоизменение таблицы по значениям в ячейке

Вход

Регистрация

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

= Мир MS Excel/Видоизменение таблицы по значениям в ячейке - Мир MS Excel

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Видоизменение таблицы по значениям в ячейке (Макросы/Sub)

Видоизменение таблицы по значениям в ячейке

andr89

Дата: Воскресенье, 29.03.2015, 21:49 | Сообщение № 1

Группа: Пользователи

Ранг: Новичок

Сообщений: 14

Репутация: 0 ±

Замечаний: 0% ±

Excel 2010

Добрый день

Подскажите, возможно макросом видоизменить таблицу (пример во вложении)?
Кратко:
Текст ячейки в столбце "В" делится по строкам. Текст внутри ячейки разделяется пробелами.
При делении ячейки, строки снизу вставляются автоматически.

Спасибо.

К сообщению приложен файл: 7258764.xlsx (10.3 Kb)

Ответить

Hugo

Дата: Воскресенье, 29.03.2015, 22:57 | Сообщение № 2

Группа: Друзья

Ранг: Участник клуба

Сообщений: 3255

Репутация: 707 ±

Замечаний: 0% ±

2019

[vba]

Код

Sub tt()
     Dim c As Range, a
     Dim el, i&: i = 1

     For Each c In [b2:b4]
         a = Split(c)
         For Each el In a
             i = i + 1
             Cells(i, 7).Resize(, 4) = Array(c.Offset(, -1), el, c.Offset(, 1), c.Offset(, 2))
         Next
     Next
End Sub

[/vba]

excel@nxt.ru
webmoney: E265281470651 Z422237915069

Ответить

andr89

Дата: Понедельник, 30.03.2015, 21:23 | Сообщение № 3

Группа: Пользователи

Ранг: Новичок

Сообщений: 14

Репутация: 0 ±

Замечаний: 0% ±

Excel 2010

Hugo, спасибо! hands

Ответить

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Видоизменение таблицы по значениям в ячейке (Макросы/Sub)

Страница 1 из 1
1