
No.3ベストアンサー
- 回答日時:
> VBAでやるなら、
> Me.Form.FilterOn = False
> をマクロでやりたいです。
ご質問の趣旨が「並べ替えは維持した状態で、フィルタだけ解除したい」という
ことでしたら、以下の方法で対応できます。
a)フィルタの解除専用の場合
***************************
アクション:コマンドの実行
コマンド:フィルタをすべて解除
***************************
※フィルタが適用されていない状態で実行するとエラーになります。
(コマンドボタンで実行させる場合、フィルタ未適用時はボタンを使用不可
にするか、マクロの『条件』欄に「~.FilterOn = True」の記述が必要、と)
また、フォームのプロパティシートの『データ』タブにある『フィルタ』欄(VBAでの
Me.Form.Filterに相当)に設定された文字列も削除されます。
b)フィルタの適用/解除を交互に切り替える場合
***************************
アクション:コマンドの実行
コマンド:フィルタの実行/解除
***************************
※当該フォームにフィルタが設定されていない場合、エラーとなります。
(フォームのプロパティシートの『データ』タブにある『フィルタ』欄に
フィルタとなる文字列が設定されていればOk:)
(フィルタが適用済みなら解除、解除済みなら適用、となります)
因みに、マクロのデザインビューで、『デザイン』リボンの『表示/非表示』グループ
内にある『すべてのアクションを表示』をオンにしてもよいのでしたら、以下の
方法もあります。
(VBAでの方法をご存知の上でマクロで対応ということは、勤務先のセキュリティ
方針によるものかと思いますので、この方法も不可かもしれませんが(汗))
***************************
アクション:値の代入
アイテム:Forms!フォーム名.Form.FilterOn
式:False
***************************
※サブフォームの場合の『アイテム』は以下のようになります:
Forms!フォーム名!サブフォームコントロール名.Form.FilterOn
No.2
- 回答日時:
フィルタを解除するということはレコードを
すべて表示するということになるかと思いますので、
アクションを
「全レコードの表示」
にしてマクロを別途作成すればよろしいかと。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
Accessでフィルタの実行アクションをクリアするには?
Access(アクセス)
-
ACCESSで空白のデーターをクエリで判定/識別する方法を教えてくださ
Access(アクセス)
-
アクセスのfilter、複数条件の記述方法を教えてください。
Access(アクセス)
-
-
4
Access サブフォームでの選択行の取得
その他(データベース)
-
5
テキストボックスにクエリ結果を表示させたい
その他(データベース)
-
6
ACCESS VBA メインフォーム及びサブフォームのフィルタのクリア
Access(アクセス)
-
7
Access 別フォームへの再クエリ(更新)がしたい。
その他(データベース)
-
8
レコードを保存するコード アクセスvba
その他(Microsoft Office)
-
9
アクセスでテキストボックスの値が空白だったら
Access(アクセス)
-
10
Returnに対するGoSubがありません
Access(アクセス)
-
11
Accessで別テーブルの値をフォームに表示したい
その他(データベース)
-
12
Access コンボボックスの値をクリアしたい。
PowerPoint(パワーポイント)
-
13
新規レコード行を非表示にしたい
Access(アクセス)
-
14
ACCESSのフォームで次のレコードに移動しない方法を教えてください
その他(データベース)
-
15
アクセスVBAのMe!と[ ]
Access(アクセス)
-
16
「#エラー」の回避
Access(アクセス)
-
17
access別のテーブルを参照してテキストボックスに値を表示、編集したい
Access(アクセス)
-
18
Accessでフォームから別フォームのテキストボックスの値を設定する
Visual Basic(VBA)
-
19
ACCESSでVBAから選択クエリの抽出条件を指定したい
Access(アクセス)
-
20
Accessのフォーム上にレコード数とレコード番号の表示
その他(データベース)
関連するカテゴリからQ&Aを探す
今、見られている記事はコレ!
-
弁護士が解説!あなたの声を行政に届ける「パブリックコメント」制度のすべて
社会に対する意見や不満、疑問。それを発信する場所は、SNSやブログ、そしてニュースサイトのコメント欄など多岐にわたる。教えて!gooでも「ヤフコメ民について」というタイトルのトピックがあり、この投稿の通り、...
-
弁護士が語る「合法と違法を分けるオンラインカジノのシンプルな線引き」
「お金を賭けたら違法です」ーーこう答えたのは富士見坂法律事務所の井上義之弁護士。オンラインカジノが違法となるかどうかの基準は、このように非常にシンプルである。しかし2025年にはいって、違法賭博事件が相次...
-
釣りと密漁の違いは?知らなかったでは済まされない?事前にできることは?
知らなかったでは済まされないのが法律の世界であるが、全てを知ってから何かをするには少々手間がかかるし、最悪始めることすらできずに終わってしまうこともあり得る。教えてgooでも「釣りと密漁の境目はどこです...
-
カスハラとクレームの違いは?カスハラの法的責任は?企業がとるべき対応は?
東京都が、客からの迷惑行為などを称した「カスタマーハラスメント」、いわゆる「カスハラ」の防止を目的とした条例を、全国で初めて成立させた。条例に罰則はなく、2025年4月1日から施行される。 この動きは自治体...
-
なぜ批判コメントをするの?その心理と向き合い方をカウンセラーにきいた!
今や生活に必要不可欠となったインターネット。手軽に情報を得られるだけでなく、ネットを介したコミュニケーションも一般的となった。それと同時に顕在化しているのが、他者に対する辛らつな意見だ。ネットニュース...
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルでオートフィルタのボ...
-
エクセルのオートフィルタで最...
-
エクセルで時刻(8:00~20:00)...
-
エクセルの偶数行(奇数行)の抽出
-
エクセルにて、フィルタをかけ...
-
エクセルでデータの抽出方法が...
-
エクセル、オートフィルタで最...
-
関数で小数点以下を抽出したい
-
Excelのオートフィルタで非表示...
-
【Excel/関数/条件付き書式】月...
-
EXCEL2003のオートフィルターで...
-
オートフィルタで選択したデー...
-
エクセルで、条件に一致した行...
-
Excelマクロ:オートフィルタ3...
-
エクセルVBA/StatusBarの表示文...
-
【EXCEL】条件に一致した最新デ...
-
オートフィルタで3つ以上の条...
-
エクセルのオートフィルタで抽...
-
Excel時間データの抽出
-
エクセルで隔週をもとめる
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルでオートフィルタのボ...
-
エクセルで時刻(8:00~20:00)...
-
エクセルのオートフィルタで最...
-
Excelのオートフィルタで非表示...
-
エクセル関数で、数字の入った...
-
エクセルの偶数行(奇数行)の抽出
-
オートフィルタで選択したデー...
-
オートフィルタは金額の桁カン...
-
エクセルで指定期間内に在職す...
-
エクセルで、条件に一致した行...
-
オートフィルタを見出し行選択...
-
エクセルにて、フィルタをかけ...
-
access マクロでのフィルタの...
-
可視セルを対象としたcountifが...
-
Excel共有ブックのオートフィル...
-
オートフィルタで3つ以上の条...
-
エクセルで隔週をもとめる
-
【EXCEL】条件に一致した最新デ...
-
データの抽出を教えてください
-
なぜShowAllDataだとうまく行か...
おすすめ情報