Самоучитель 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. Результат построения геометрической прогрессии



    Содержание раздела