ExcelWork.info

Excel(エクセル)のマクロ・VBA・関数・操作などのメモ

オートフィルタ(日付フィルタ)AutoFilter メソッド

   

日付フィルタを使用してレコードを抽出する

Excel 2007 から「日付フィルタ」という機能が追加されました。これをマクロで行うには、AutoFilter メソッドで、引数 operator に、xlFilterDynamic を指定し、引数 criteria1 に、XlDynamicFilterCriteria 列挙型 の定数を指定します(Excel 2007 以降のバージョン)。


【書式】

object.AutoFilter ( [ field, criteria1, operator ] )


引数・戻り値

  • object  ・・・  対象となる Range オブジェクトを指定します。
  • field  ・・・  フィルターの対象となるフィールド番号を整数で指定します。対象となる範囲の最も左側の列(フィールド)が、フィールド番号 1 になります。
    複数の列(フィールド)をまとめて扱いたい場合は、配列を指定することも可能です。
     (例)field := Array(1,3,6)
  • criteria1  ・・・  XlDynamicFilterCriteria 列挙型 の定数または、その値を指定します。
    定数 説明
    xlFilterToday 1 今日
    xlFilterYesterday 2 昨日
    xlFilterTomorrow 3 明日
    xlFilterThisWeek 4 今週
    xlFilterLastWeek 5 先週
    xlFilterNextWeek 6 次週
    xlFilterThisMonth 7 今月
    xlFilterLastMonth 8 先月
    xlFilterNextMonth 9 来月
    xlFilterThisQuarter 10 今四半期
    xlFilterLastQuarter 11 前四半期
    xlFilterNextQuarter 12 次の四半期
    xlFilterThisYear 13 今年
    xlFilterLastYear 14 昨年
    xlFilterNextYear 15 来年
    xlFilterYearToDate 16 今年の初めから今日まで
    xlFilterAllDatesInPeriodQuarter1 17 第 1 四半期のすべての日付
    xlFilterAllDatesInPeriodQuarter2 18 第 2 四半期のすべての日付
    xlFilterAllDatesInPeriodQuarter3 19 第 3 四半期のすべての日付
    xlFilterAllDatesInPeriodQuarter4 20 第 4 四半期のすべての日付
    xlFilterAllDatesInPeriodJanuary 21 1 月のすべての日付
    xlFilterAllDatesInPeriodFebruray 22 2 月のすべての日付
    xlFilterAllDatesInPeriodMarch 23 3 月のすべての日付
    xlFilterAllDatesInPeriodApril 24 4 月のすべての日付
    xlFilterAllDatesInPeriodMay 25 5 月のすべての日付
    xlFilterAllDatesInPeriodJune 26 6 月のすべての日付
    xlFilterAllDatesInPeriodJuly 27 7 月のすべての日付
    xlFilterAllDatesInPeriodAugust 28 8 月のすべての日付
    xlFilterAllDatesInPeriodSeptember 29 9 月のすべての日付
    xlFilterAllDatesInPeriodOctober 30 10 月のすべての日付
    xlFilterAllDatesInPeriodNovember 31 11 月のすべての日付
    xlFilterAllDatesInPeriodDecember 32 12 月のすべての日付
    xlFilterAboveAverage 33 平均を上回る値
    xlFilterBelowAverage 34 平均未満の値

  • operator  ・・・  xlFilterDynamic を指定します。

AutoFilter メソッド の引数の詳細については、オートフィルタ(AutoFilter メソッド) を参照してください。



日付フィルタを使用してレコードを抽出する例

サンプルVBAソース 1


実行結果

サンプルVBAソース 実行前

AutoFilter メソッド 使用例10_1

実行後

AutoFilter メソッド 使用例 10_2



サンプルVBAソース 2


実行結果

サンプルVBAソース 実行前

AutoFilter メソッド 使用例 10_3

実行後

AutoFilter メソッド 使用例 10_4


 - セルの操作 , , , ,

Message

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

  関連記事

セル範囲を結合・結合を解除(MergeCells プロパティ)

MergeCells プロパティ MergeCells プロパティは、指定したセ …

セルの表示形式を設定・取得する(NumberFormat プロパティ)

NumberFormat プロパティ NumberFormat プロパティは、現 …

セルの文字列を取得(Text プロパティ)

Text プロパティ セルに表示されている文字列を取得します。Text プロパテ …

オートフィルタ(日付による抽出)AutoFilter メソッド

日付で、抽出する(AutoFilter メソッド) 【書式】 object.Au …

Validation オブジェクト 使用例5
入力規則(日本語入力)Validation オブジェクト,IMEMode プロパティ

IMEMode プロパティ Validation.IMEMode プロパティ を …

列幅を取得・設定・する(ColumnWidth プロパティ)

ColumnWidth プロパティ ColumnWidth プロパティは、対象セ …

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

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

ReferenceStyle プロパティ 例01
A1参照形式、R1C1参照形式の設定・取得(ReferenceStyle プロパティ)

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

列名・列番号取得 使用例
列名を取得、列番号を取得(Address プロパティ,Column プロパティ)

列番号を取得する セル番地(「A1」や「B3」)や列名(「A」「B」「C」&#8 …

文字列をセル幅で折り返す(WrapText プロパティ)

WrapText プロパティ WrapText プロパティは、セルに表示されてい …