Уважаемые форумчане, доброго дня. Подскажите, пожалуйста, как можно сделать массив чисел из диапазона? Есть диапазон чисел в двух столбцах. В первом столбце начальный номер, во втором - конечный. Задача: рядом с ними сделать общий массив, в котором будет все числа заданного диапазона.
Пример во вложении. Заранее спасибо за помощь.
Уважаемые форумчане, доброго дня. Подскажите, пожалуйста, как можно сделать массив чисел из диапазона? Есть диапазон чисел в двух столбцах. В первом столбце начальный номер, во втором - конечный. Задача: рядом с ними сделать общий массив, в котором будет все числа заданного диапазона.
Пример во вложении. Заранее спасибо за помощь.JohnyCoaly
lr = Cells(Rows.Count, "B").End(xlUp).Row arr() = Range("B1:C" & lr).Value For i = 2 To UBound(arr) lr = Cells(Rows.Count, "F").End(xlUp).Row + 1 Cells(lr, "F").Value = arr(i, 1) Cells(lr, "F").DataSeries Rowcol:=xlColumns, Type:=xlLinear, Step:=1, Stop:=arr(i, 2) Next i
lr = Cells(Rows.Count, "B").End(xlUp).Row arr() = Range("B1:C" & lr).Value For i = 2 To UBound(arr) lr = Cells(Rows.Count, "F").End(xlUp).Row + 1 Cells(lr, "F").Value = arr(i, 1) Cells(lr, "F").DataSeries Rowcol:=xlColumns, Type:=xlLinear, Step:=1, Stop:=arr(i, 2) Next i
Вход
Регистрация
Напомнить пароль
Автосумма
Часто используемые
ВПР
ЕСЛИ
СУММЕСЛИ
Финансовые
Логические
Текстовые
Даты и времени 
Ссылки и массивы 
Математические
Другие функции
Проверка свойств и значений
Баз данных
Математические
Обработки массивов
Обработки строк
Преобразования типов данных 
Загрузки данных
Работы с файлами
Обработки системных параметров
Обработки цвета
Работы с датами и временем
Преобразования в системы счисления
Финансовые
