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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 07.06.2010, 07:20   #1
23i
 
Регистрация: 04.05.2010
Сообщений: 7
По умолчанию Формирование списка с определенным шагом

Доброе время суток,

Подскажите пожалуйста, как можно в известный диапазон значений (к примеру 12 строк) "вклинить" необходимое статическое значение чередуя его поочередно. Подробнее в примере.

Заранее благодарен всем, кто отзовётся.
Вложения
Тип файла: rar Пример.rar (2.6 Кб, 11 просмотров)
23i вне форума Ответить с цитированием
Старый 07.06.2010, 07:32   #2
EducatedFool
Программист VBA
СуперМодератор
 
Аватар для EducatedFool
 
Регистрация: 13.07.2008
Сообщений: 6,856
По умолчанию

Можно сделать при помощи макроса:
Код:
Sub test()
    For i = 1 To [диапазон].Cells.Count
        [диапазон].Cells(i).Copy [результат].Offset(i * 2 - 1)
        [значение].Copy [результат].Offset(i * 2)
    Next i
End Sub
Пример в файле: http://excelvba.ru/XL_Files/Sample__...0__9-32-18.zip
EducatedFool вне форума Ответить с цитированием
Старый 07.06.2010, 08:08   #3
23i
 
Регистрация: 04.05.2010
Сообщений: 7
По умолчанию

То что надо, спасибо
23i вне форума Ответить с цитированием
Старый 07.06.2010, 09:14   #4
vikttur
Участник клуба
 
Регистрация: 16.05.2010
Сообщений: 1,249
По умолчанию

=ЕСЛИ(ОСТАТ(СТРОКА(1:1);2);ИНДЕКС($ C$6:$C$17;ЦЕЛОЕ((СТРОКА(1:1)-1)/2)+1);$E$6)
vikttur вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Удаление последнего элемента из списка и реверс этого списка. Goose Общие вопросы C/C++ 8 16.05.2010 16:12
Перебрать двумерный массив с шагом rubik Общие вопросы Delphi 1 17.04.2010 23:46
Бесконечный цикл с определенным шагом в Delphi7 BuT@JL Общие вопросы Delphi 16 04.09.2009 17:05
Формирование списка файлов в папке на листе. mephist Microsoft Office Excel 3 12.08.2009 17:59
Формирование списка дат при помощи формул EducatedFool Microsoft Office Excel 10 17.03.2009 09:30