На этом шаге мы рассмотрим назначение этого метода.

    Метод AutoFill (Автозаполнение) автоматически заполняет ячейки диапазона элементами последовательности. Метод AutoFill отличается от метода DataSeries тем, что явно указывается диапазон, в котором будет располагаться прогрессия. Вручную этот метод эквивалентен расположению указателя мыши на маркере заполнения выделенного диапазона (в который введены значения, порождающие создаваемую последовательность) и протаскивании маркера заполнения вдоль диапазона, в котором будет располагаться создаваемая последовательность.

    Синтаксис:

  Объект.AutoFill(destination, type)

    Аргументы:

Таблица 1. Аргументы метода AutoFill

Аргумент	Назначение
destination	Диапазон, который заполняется
type	Допустимые значения: xlFillDefault, xlFillSeries, xlFillCopy, xlFillFormats, xlFillValues, xlFillDays, xlFillWeekdays, xlFillMonths, xlFillYears, xlLinearTrend, xlGrowthTrend. По умолчанию xlFillDefault

    Приведем соответствие между аргументами метода AutoFill и построением последовательности на рабочем листе вручную на примере построения арифметической прогрессии по двум ее первым членам.

1. В ячейку A1 введите первый член прогрессии, например 5. В ячейку А2 введите второй член профессии, например 7. Выделите диапазон А1:А2, содержащий два первых члена арифметической прогрессии. Расположите указатель мыши над маркером заполнения выделенного диапазона так, чтобы он превратился в черный крест (рисунок 1).

   
   Рис.1. Выделение двух первых членов прогрессии

2. При нажатой левой кнопки мыши, протащите маркер заполнения вниз по столбцу так, чтобы создать требуемую последовательность. В данном случае протащим маркер заполнения так, чтобы создать последовательность в диапазоне А1:А5 (рисунок 2).

   
   Рис.2. Построенная прогрессия

       Тот же результат получается, если аргументу destination метода AutoFill присваивается Range ("A1:A5"), аргументу type присваивается xlFillDefault, а метод применяется к диапазону Range ("A1:A2"). Таким образом, имеем:

     Range("Al:A2").AutoFill  Destination:=Range("Al:A5"), _
       Type:=xlFillDefault
   

    На следующем шаге мы рассмотрим метод AutoFilter.

Предыдущий шаг Содержание Следующий шаг