こんにちはアクセス2000で管理表をつくっています。
「工事マスタ」
工事ID、顧客ID、工事部門、契約日、請負額、追加額(以下略)
「顧客マスタ」
顧客ID、顧客名(以下略)
などがあり、工事マスタを基にクエリAを作成し、
それをコントロールソースにもつフォームAを作成しました。
フォーム上のボタンやテキストボックスで
レコードの抽出(フィルタ)を行いたいのですが
いろいろ調べてみましたが、初心者なもので
どう手をつけていいのかわからず困っています。
やりたいことは
1)工事部門(1・2)で、(1)のみのレコードを表示する
その検索方法をコンボボックスでつくりたい
2)発注者名で検索をかけ、該当するレコードのみを表示する
その検索方法をテキストボックスでつくりたい
3)契約日のソートをかける実行ボタンを配置したい
4)「請負額」「追加額」にそれぞれ消費税を計算して、その合計額「請負額+追加額+請負税+追加税」の《総合額》を自動計算しています。
その《総合額》の¥●●●~¥●●●という範囲に値するレコードを抽出したい
です。
説明が足りない部分もあるかと思いますが
どなたかご存知の方お知らせくださいませ。
また、参考サイトなども教えていただけると助かります。
どうぞよろしくおねがいします。
No.2ベストアンサー
- 回答日時:
1)はフォーム上の「工事部門」フィールド上で右クリックして
「フィルタの対象」に1を入れてEnter。
2)もフォーム上の「発注者名」フィールド上で右クリックして
「フィルタの対象」に「名前」か「*名前の一部*」を入れてEnter。
3)は「契約日」フィールド上で右クリックして、降順・昇順お好きな方で並べ替え。
4)はフォーム上の「総合額」フィールド上で右クリックして
「フィルタの対象」に「Between 金額 And 金額」と入れてEnter。
こうすればプログラムを一行も書くことなく、
というか特に何もしなくても、目的が達成できると思います。
フォームフィルタの機能でもいいですしね。
Accessだと、ついつい、無駄なコマンドボタンやコンボボックスを作って
しまいがちですが、出来合い機能をきちんと知り、
効率よくコーディネイトして使うことを
考えるほうが、お仕事にプラスですよ(^^)
右クリックでのフィルタは非常に重宝しますので、
下手に機能追加するより、右クリックフィルタの説明書書いたほうが
あとあとも、全てのフォーム、クエリ、テーブルに使用でき、
圧倒的に効率的です。
右クリックの「選択フィルタ」はドラッグした語句での絞込みも出来ます。
で、
・テキストの先頭でドドラッグして「選択フィルタ」を押せば前方一致、
・末尾だけをドラッグすれば後方一致、
・先頭でも末尾でもない中ごろを部分的にドラッグすれば部分一致(あいまい一致)で
絞り込まれます。(フィルタがかかります)
フィルタ/並べ替えの解除、でもとに戻ります。
ご存知でしたでしょうか?
ご丁寧なアドバイスありがとうございます。
右クリックでのフィルタは私は知ってたのですが
アクセスを全く知らない人が触るのと
フォーム上でどうにかしたいという上からの命令で
困っています。。
もう少し試行錯誤してみますね
ありがとございました!
No.5
- 回答日時:
#1です。
他の回答者の邪魔をしたくないので、本題の回答は控えます。
別に不愉快な思いはしていません。
むしろあなたの素直な態度がうれしいです。
質問には、過程や背景についてある程度の説明が必要だと思います。
丸投げであったり、唐突なものであってはいけないのです。
これからもよい質問を心がけてください。
そういう質問にはよい回答があるはずです。
以上
こんばんは ご丁寧にお返事いただき、ありがとうございます^^
長くなるとややこしくなるかなと簡潔に質問したつもりが
かえって、配慮のない質問になってしまい、反省しております。
よい質問にはよい回答。そうですよね。
言葉選びが不得手でお恥ずかしい限りですが、
よい質問を心がけていきたいと思います
ありがとうございます
No.4
- 回答日時:
すみません。
訂正です。●並べ替えをする場合
「OrderBy」プロパティで並べ替え条件の設定(=指定)をします。
で、「FilterOn」プロパティでフィルタを適用/解除します。
は
●並べ替えをする場合
「OrderBy」プロパティで並べ替え条件の設定(=指定)をします。
で、「OrderByOn」プロパティで並べ替えを適用/解除します。
でした。
ご迷惑をおかけして
誠に申し訳ありませんでした。
ではでは(^^)
No.3
- 回答日時:
VBAですと・・・、
●フィルタをかける場合
「Filter」プロパティでフィルタ条件の設定(=指定)をします。
で、「FilterOn」プロパティでフィルタを適用/解除します。
●並べ替えをする場合
「OrderBy」プロパティで並べ替え条件の設定(=指定)をします。
で、「FilterOn」プロパティでフィルタを適用/解除します。
以上をコマンドボタンのクリックイベントや
テキストボックスの更新後処理イベントなどに書きます。
Access filteron
Access orderbon
などの語句でGoogle検索等すればいろいろとサンプルが出てきます。
ご参考にしてください。
http://www.mahoutsukaino.com/ac/ac2000/ac2000/ke …
など。
>アクセスを全く知らない人が触るのと
>フォーム上でどうにかしたいという上からの命令で
>困っています。。
うーん、ということですと、なおさらフォーム上での右クリックがおすすめなんですが・・・(^^)
私なら以降のように上司に言ってしまって、できるだけ作りこみはしないです。面倒くさいから。
(01)右クリックの操作説明書を書いてまず上司の方にお見せします
(02)実際に操作します。
(03)そして次のような説明をします。
この右クリック機能はすべてのAccessファイルで使える共通操作で、かつ、
一番効率よく、安く作れます(時間ゼロでタダで作れます)。
操作は簡単だから忘れても説明書見ればすぐに誰でも思い出せます。
また、無理に覚える必要はありません。
この操作説明書は全員にお配りしますので。
他の機能の追加では、込み入った作りこみが発生し、色々と面倒です。
もちろん作れといわれれば作りますが、結局色々と作りこんでも
この機能以上効率の良い操作ができないケースも少なくないです。
もし、それでもよければ、「これとほとんどかわらない機能」を
時間をかけて作りますけど、本当にいいですか?
という感じです。
で、それでも
「多少の時間(もしくは費用)がかかってもいい。やっぱり作ってくれ」と
上司がおっしゃるなら、作ります。
その際は前述のプロパティを使って、VBAでどのフォームからでも呼び出して使えるような汎用的なものを作成します。
抽出作業の頻度が少なければなおさら、Accessのできあい機能を使います。
正直なところ、
「パソコン使うんだったらワイルドカードとBetweenと、 <、 >、#、""、''、 くらい使えるようになってくれよ。それだけでいいんだから。それだけ覚えてくれるだけで、どれだけ無駄な作りこみが減らせるかわからないよ。」
という思いにかられることも多いです(^^)
無駄話、誠にすみませんでした。
がんばってくださいね(^^)
こんにちは
インフルエンザにかかってしまい、
お礼が遅くなりまして大変失礼いたしました。
すごくご親切に回答いただき、感謝しています
ありがとうございます!
職場復帰したら、いろいろためさせていただきますね
右クリック。。。そうなんですよね
私もそのほうが簡単だ~!と心の中で叫んで一応説明もしたのですが
「それでもやってくれ」の回答だったので はいと言うしか。。苦笑
楽しい横道話もありがとうございました^^
No.1
- 回答日時:
申し訳ないけど、どこまで勉強してるのかな。
「課題の丸投げ」は禁止行為って知っていますよね。
とにかく参考書籍を読み漁って勉強する、自分で試すこと。
それからでないと、回答できませんよ。
以上
こんにちは 課題の丸投げが禁止行為だとは知りませんでした
アクセスは1級程度ですが、ブランクがあるので初心者と変わりません。
参考書も読みあさり、ネットでも検索し、
いろいろ自分でも触っているのですが時間が限られているのと
色々エラーなども起きたので、
過程を説明するとややこしくなりそうなのと
少しのヒントでも得られればと思って質問させていただきました。
私の質問で不愉快な思いをさせてしまってすいません。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Access(アクセス) Access IF文でテーブルに存在しない場合の処理について 2 2022/10/10 18:09
- その他(データベース) Accessフォームからパラメーターで表示したレコードを指定のExcelのセルへ転送する方法について 2 2022/08/22 18:04
- 経営情報システム accessでの請求管理について 12 2022/06/11 16:20
- Visual Basic(VBA) ユーザーフォーム「frm_基本❶」を立ち上げると新規で入力する行数を右下のNoとして表示しています。 1 2023/03/16 19:02
- 電気・ガス・水道 負荷設備契約の減設工事費用12万円は正当な価格でしょうか? 5 2023/01/30 13:37
- その他(データベース) accessについて 2 2022/05/31 16:58
- Access(アクセス) DoCmd.SearchForRecord が動かない時の解決方法 3 2022/07/22 15:31
- 分譲マンション 皆さんの管理組合では)共用部分の修繕工事業者の選定は→どう選定されておられますか? ①管理会社へ丸投 3 2022/10/06 22:07
- Access(アクセス) アクセスの更新クエリでカレントレコードのみ更新したい 1 2022/06/02 23:32
- Access(アクセス) access レポート 請求書について 2 2022/07/04 22:52
関連するカテゴリからQ&Aを探す
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
AccessでIDを入力したら他の項...
-
Accessでフィルタの実行アクシ...
-
ACCESS2003のグループ化のエラ...
-
(続き)accessでの2段階クエリの...
-
Access 2段階のクエリの作り方
-
クエリ実行結果0件の場合のフ...
-
ACCESS フォームで抽出したデー...
-
ACCESSでVBAから選択クエリの抽...
-
エクセルで、抽出したデータだ...
-
Access サブフォームでの選択行...
-
「パラメータが少なすぎます。3...
-
Accessのコンボボックスでリス...
-
サブフォーム(複数レコード)の...
-
Accessで経過日付に応じて色を...
-
アクセスを使用してITFコー...
-
(ACCESS)条件に応じて、テキ...
-
コンボボックスのリスト外入力...
-
MSAccess ロック状態かどうかを...
-
access別のテーブルを参照して...
-
Access チェックボックスを利用...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ACCESSでVBAから選択クエリの抽...
-
AccessでIDを入力したら他の項...
-
クエリ実行結果0件の場合のフ...
-
ACCESSで、EXCELのような、sumi...
-
Accessクエリの抽出条件にフォ...
-
ACCESS2007 マクロ クエリのパ...
-
ACCESS2003のグループ化のエラ...
-
アクセスのフォームに連番を表...
-
ACCESS フォームで抽出したデー...
-
クエリーの結果をフォームに表...
-
VarChar型をINT型に変換するには
-
サブフォームを利用したクエリ...
-
ACCESS クエリのデザインビュ...
-
access クエリでIIF文で抽出条...
-
ACCESSで、フォームで抽出した...
-
アクセス2007 フォームでフィ...
-
Accessのパラメータクエリ作成...
-
Accessでフィルタの実行アクシ...
-
ACCESSのフォームでボタンを押...
-
Access2016埋め込みマクロでの...
おすすめ情報