Accessで業務ソフト開発

Accessで既存システムの機能追加

ＨＯＭＥ > Access VBA FQA

フォームでのフィルタ操作 - Access VBA

開いているフォーム上でレコードを抽出するフィルタプロパティをコードで実現すると下記のようになります。

フィルタの実行

フィルタの抽出条件を指定 フィルタを有効にする 
Function Clear_Filter()
''フィルタの解除
On Error Resume Next
    Screen.ActiveForm.FilterOn = False
    Screen.ActiveForm.OrderByOn = False
    DoCmd.GoToControl "Code"
End Function

フィルタの解除

Function Clear_Filter()
''フィルタの解除
On Error Resume Next
    Screen.ActiveForm.FilterOn = False
    Screen.ActiveForm.OrderByOn = False
    DoCmd.GoToControl "Code"
End Function

PageTop

Accessでソフト開発のお問い合わせはこちら

会社概要

ソフトセル　担当:本田

住所：〒400-0806
山梨県甲府市善光寺3-32-15

電話：055-268-2140




ＨＯＭＥ - Access FQA - AccessVBA FQA - 会社概要 - お問い合わせ - プライバシーポリシー - 特定商取引法 - サイトマップ