Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 02.12.2011, 18:39   #1
Shkoda
Пользователь
 
Аватар для Shkoda
 
Регистрация: 26.02.2010
Сообщений: 44
По умолчанию Добавление строк по условию.

Добрый вечер.

Уважаемые форумчане, взываю о помощи.

Есть реестр, в котором много данных. Одна из колонок "TELS(телефон)", в ячейке может быть заполнено сразу несколько, как через пробел, через запятую так и пробел и запятая вместе.
Необходимо строчку в ячейке которой болле 1 телефона, разбить на количество телефонов, так чтоб в ячейке был только один телефон.

Пример во вложении.
Вложения
Тип файла: rar Пример.rar (9.7 Кб, 7 просмотров)
Shkoda вне форума Ответить с цитированием
Старый 02.12.2011, 19:28   #2
EducatedFool
Программист VBA
СуперМодератор
 
Аватар для EducatedFool
 
Регистрация: 13.07.2008
Сообщений: 6,856
По умолчанию

Готовое решение поискать не пробовали?
http://excelvba.ru/code/ExtendArray

Смотрите пример в файле: http://excelvba.ru/XL_Files/Sample__...__21-33-16.zip

Последний раз редактировалось EducatedFool; 02.12.2011 в 19:33.
EducatedFool вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Сопоставление и добавление данных по условию tt8989 Microsoft Office Excel 2 16.06.2011 03:02
Скрытие строк по условию MaxxVer Microsoft Office Excel 11 09.04.2010 05:55
Добавление строк в таблицу с вставкой в них текста и чередованием фона строк Centurion2xx6 Microsoft Office Word 9 30.03.2010 11:00
Вызов формы по условию и добавление строк bagfinder Общие вопросы Delphi 5 09.01.2010 18:40
добавление листа в книгу по условию Sasha K Microsoft Office Excel 4 30.01.2007 15:44