Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

連続データを入力する（AutoFill メソッド）

2015/09/22

AutoFill メソッド

Excel で、連続するデータを入力する「オートフィル」機能を VBA で実行します。

【書式】

object.AutoFill ( destination [, type ] )

引数・戻り値

object ・・・対象となる Range オブジェクトを指定します。
destination ・・・連続データの書き込み先となるセル範囲（Range オブジェクト）を指定します（省略不可）。

type ・・・オートフィルの種類を表す XlAutoFillType 列挙型 の定数またはその値を指定します（省略可能）。

名前	値	説明
xlFillDefault	0	Excel が決定（既定値）
xlFillCopy	1	値と形式
xlFillSeries	2	連続する数値（たとえば、’1, 2′ は ‘3, 4, 5’ となります）
xlFillFormats	3	書式のみ
xlFillValues	4	値のみ
xlFillDays	5	曜日名
xlFillWeekdays	6	平日の名前
xlFillMonths	7	月
xlFillYears	8	年
xlLinearTrend	9	加算による連続データ
xlGrowthTrend	10	乗算による連続データ
xlFlashFill	11	前のユーザーアクションの検出されたパターンに基づいた値（Excel 2013 以降）

AutoFill メソッド使用例

サンプルVBAソース

　
Sub Sample_AutoFill()


    'Type:省略（Excelが自動判定）
    Range("A2:A4").AutoFill Destination:=Range("A2:A16")
    
    'Type:連続
    Range("B2").AutoFill Destination:=Range("B2:B16"), _
                         Type:=xlFillSeries
    
    'Type:曜日
    Range("C2").AutoFill Destination:=Range("C2:C16"), _
                         Type:=xlFillDays
    
    'Type:書式のみ
    Range("D2").AutoFill Destination:=Range("D2:D16"), _
                         Type:=xlFillFormats
        
    'Type:Excelが自動判定
    Range("E3").AutoFill Destination:=Range("E3:E16"), _
                         Type:=xlFillDefault
                         
End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

　

Sub Sample_AutoFill()

'Type:省略（Excelが自動判定）

Range("A2:A4").AutoFill Destination:=Range("A2:A16")

'Type:連続

Range("B2").AutoFill Destination:=Range("B2:B16"), _

Type:=xlFillSeries

'Type:曜日

Range("C2").AutoFill Destination:=Range("C2:C16"), _

Type:=xlFillDays

'Type:書式のみ

Range("D2").AutoFill Destination:=Range("D2:D16"), _

Type:=xlFillFormats

'Type:Excelが自動判定

Range("E3").AutoFill Destination:=Range("E3:E16"), _

Type:=xlFillDefault

End Sub

　

実行結果

サンプルVBAソース実行前

実行後

- セルの操作 AutoFill メソッド, Range オブジェクト, VBA基本, エクセルVBA, セルの操作

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: フリガナ（Phonetics プロパティ）

Phonetics プロパティ Phonetics コレクションを返します。値の …

: セルが結合セルの一部である場合、その結合セルの範囲を取得（MergeArea プロパティ）

MergeArea プロパティ MergeArea プロパティは、指定したセルが …

: 並べ替え（Sort メソッド）

Sort メソッド任意のセル範囲内で、並べ替えを行います。引数で、並べ替えの条 …

: 別シートのセルを選択（Goto メソッド／ PreviousSelections プロパティ）

Goto メソッド次の例のように、1 行で、Activate メソッドや S …

: VBA で、ワークシート関数を使用（WorksheetFunction プロパティ）

VBA で、ワークシと関数を使用 VBA から、ワークシート関数を呼び出す場合、 …

: セル・セル範囲をコピーする（Copy メソッド）

Copy メソッド Copy メソッドは、セル範囲をコピーし、指定したセル範囲に …

: A1参照形式、R1C1参照形式の設定・取得（ReferenceStyle プロパティ）

ReferenceStyle プロパティ ReferenceStyle プロパテ …

: 入力規則（他セルや数式を利用して許容値を設定）Validation オブジェクト

他のセルや数式を利用して許容値を設定する入力規則（その5）での設定を、マクロ …

: セル内の編集を禁止する（EditDirectlyInCell プロパティ）

EditDirectlyInCell プロパティエクセルでは、セルをダブルクリ …

: ハイパーリンク（Hyperlinks オブジェクト）

Hyperlinks オブジェクトワークシートまたはセル範囲のワークシートコレ …

PREV: ハイパーリンク（Hyperlink オブジェクトのメソッド）
NEXT: ブック・シートの名前を取得・設定（Name プロパティ）