Самоучитель VBA


Метод DataSeries



Метод DataSeries (прогрессия) создает профессии. Вручную метод DataSeries выполняется с помощью команды Правка, Заполнить, Прогрессия (Edit, Fill, Series).

Синтаксис:

Объект.DataSeries(rowcol, type, date, step, stop, trend)

Аргументы:

Объект

Диапазон с начальными данными прогрессии. Метод DataSeries позволяет одновременно строить несколько однотипных профессий с одинаковым шагом, но различными начальными элементами

rowcol

Задает, вводятся профессии по строкам или столбцам. Допустимые значения:

  • xlRows (по строкам)

  • xlCcoluims (по столбцам)

type

Определяет тип прогрессии. Допустимые значения:

  • xlLinear (линейная)

  • xlCrowth (геометрическая)

  • xlChronological (даты)

  • xlAutoFill (автозаполнение)

date

Определяет тип последовательности дат, если параметр type принимает значение xlChronological. Допустимые значения:

  • xlDay (ДНИ)

  • xlweekday (дни недели)

  • xlMonth (месяцы)

  • xlYear (годы)

step

Шаг изменения прогрессии. По умолчанию 1

stop

Предельное значение прогрессии. По умолчанию строится прогрессия во всем выделенном диапазоне

trend

Допустимые значения: True (создается арифметическая или геометрическая прогрессия) или False (создается список)

Приведем соответствие между аргументами метода DataSeries и построением последовательности на рабочем листе командой Правка, Заполнить, Прогрессия (Edit, Fill, Series) на примере построения геометрической профессии.

Шаг 1

О В ячейку AI вводим первый член прогрессии, например 1. В методе DataSeries за начальное значение прогрессии отвечает объект, к которому применяется метод. В данном случае метод DataSeries надо применить к диапазону Range ("A1") . О Выберите команду Правка, Заполнить, Прогрессия (Edit, Fill, Series), которая приведет к появлению диалогового окна Прогрессия (Series) (рис. 3.1).

Рис. 3.1. Диалоговое окно Прогрессия

Шаг 2

В диалоговом окне Прогрессия (Series) в группе Расположение (Series in) выберите, например, переключатель по строкам (Rows), т. к. будем строить геометрическую профессию в первой строке. В группе Тип (Туре) выберите переключатель геометрическая (Growth) В поле Шаг введите например, 1.2, а в поле Предельное значение (Stop value) - 3, т. е. геометрическая прогрессия будет строиться с шагом 1.2 до тех пор, пока ее члены не достигнут значения 3. Нажатие кнопки ОК приводит к построению требуемой профессии (рис. 3.2). В методе DataSeries за расположение профессии отвечает аргумент rowcoi. В данном случае ему надо присвоить значение xiRows. За тип прогрессии отвечает аргумент type, которому присвоим значение xiGrowth. За шаг и предельное значение отвечают аргументы step и stop, которым присвоим 1.2 и з соответственно. Таким образом, имеем:

Range ( "А1" ). DataSeries Rowcol : =xlRows , Type : =xlGrowth, Step:=1.2, Stop:=3


 

Рис. З.2. Результат построения геометрической прогрессии




- Начало -  - Назад -  - Вперед -