• ベストアンサー

アクセス VBA 条件一致による印付け

アクセスで悩んでいます どなたかご存じなら教えてください。 内容としてはフィールドAに発注年月を入力しており,フィールドBには納入年月を入力してい ます。発注年月と納入年月が同じ年月ならフィールドCに○と自動入力表示させたいのですが可能でしょうか。 入力はフォームで入力してます。

質問者が選んだベストアンサー

  • ベストアンサー
  • piroin654
  • ベストアンサー率75% (692/917)
回答No.1

やりかたはいろいろありますが。 たとえば、フィールドBの更新後処理で、 Private Sub フィールドB_AfterUpdate() If Me.フィールドA = Me.フィールドB Then Me.フィールドC = "○" End If End Sub のようにしてみる、というのも一つの方法です。 更新後処理の設定は、フォームをデザインビューで 開き、フィールドBのプロパティの更新後処理で コードモジュールを選択して、コード表が 開かれると、 Private Sub フィールドB_AfterUpdate() End Sub というコードが出来上がっていますから、その中に 上記の中身を記述して保存すれば完了です。 あるいは、フォームのコード表を直接開き、 上記を貼り付け、保存すれば出来上がりです。 使い方は、フィールドBに入力後、エンターキーを 押すか、あるいはフィールドCをクリックすれば フィールドAとフィールドBが同じならば、 フィールドCに「○」が表示されます。

kazunoko1689
質問者

お礼

ありがとうございます 大変参考になりました。

関連するQ&A

  • エクセル VBA 自動マーク設定について

    エクセルで悩んでいます どなたかご存じなら教えてください。 内容としてはセルAに発注年月を入力しており,セルBには納入年月を入力してい ます。発注年月と納入年月が同じ年月ならセルCに○と自動入力表示させたいのですが可能でしょうか。 

  • アクセス レポート 抽出表示について

    アクセス レポートで悩んでおります。 内容としてはですが発注月と納入月が一致したら○というレポートを表示させたのですが、発注月に対しての何%納入月が一致するかレポートにすぐにわかるように出来ますか? 具体的にはレポートAにラベルA発注月 ラベルB納入月 ラベルC一致確認(○) レポートB ラベルA発注月 ラベルB納入完了率 どなたか表示方法ご存じならご教授願います。

  • ACCESS フォーム上での条件設定

    どなたかお知恵をお貸しください。 Access2000 検索用のフォームを作成しました。 A・B・C・D・E・Fというフィールドがあり、それらのフィールドを 含むデータ形式のフォームが作成されています。 やりたいことは、フォームにテキストボックスを5つ配置し それぞれ(A・B・C・D・E・Fというフィールドに対する)の条件 を入力して、実行(コマンドボタン)をクリックすると 条件に一致したフォームが表示されてくるようにしたいのです。 ただし、条件が入力されない場合もあります。 (5つのうち1つだけ条件が入る場合など) 初心者などでどのように設定すればいいのか分かりません。 どなたかお力をお貸しください。 よろしくお願いします。

  • Accessフォームから条件抽出する

    access2010で、フォーム内のリスト選択によって、 クエリのフィールドの計算を変えたいです。 「クエリ1」のフィールド名 いずれも数値 ・合計 ・A ・B ・C 「フィールド1」の「リスト1」で、1;2;3いずれか選択し、 選択した結果を「合計」に表示させたい。 ・リスト「1」のとき、Sum(A,B) ・リスト「2」のとき、Sum(A,B,C) ・リスト「3」のとき、Sum(A,B,C,D) できれば「合計」のフィールドの式のみで済ませたいのですが、 何か適切な式はありませんでしょうか。 よろしくお願いいたします。

  • ACCESSでVBAを使って・・・

    ACCESS VBAを使って、ユーザの専用フォームを開くようにしたいです。 具体的には、MDBのなかにユーザA/B/Cそれぞれの専用フォームを作成します。 ※表示する内容は項目は一緒ですが、その人個人のデータのみになります。 例えばユーザAに対するメッセージであるとか。秘匿性の高いものです。 MDBにアクセスする際、ユーザA/B/CにそれぞれID、PWを設定し、 ユーザAのID/PW→ユーザAのフォームが開く (以下同様にユーザBやユーザCもそのように) というようなことをしたいのですが、どのようにすれば実現可能なのか、教えていただけますでしょうか。 あるいはもっといい方法があればご教授願います。

  • Accessで計算式を挿入

    テーブルで、A・B・Cのフィールドがあります。 C=A/(B/100)^2 という式があります。 この場合、更新クエリを使ってCのフィールドに値を入れるしかないのでしょうか。 もともとあるテーブルを元にフォームを作成しました。 このフォームを使って、AとBを入力すれば自動的にCに値が入る、という事をイメージしていたのですが行き詰っています。 式ビルダは使用してみたのですが、データが反映されません。 元のテーブルCフィールドには式はなく、ただ数値があるだけです…。 どんな作業が足りないのでしょうか。 もしくは別な方法がよいのでしょうか。 よろしくお願いします。

  • アクセス フォームの設定

    テーブル【T-1】 フィールドA,主キー,数値型 フィールドB,テキスト型 フィールドC,テキスト型 フィールドD,テキスト型 フィールドE,テキスト型 フォーム【F-1】 テーブル【T-1】に入力用のフォーム,単票型 があります。 F-1でそれぞれのフィールドに対して入力スペースがあり(もちろんですが) A,B,C,D,Eと順番に入力していきます。 ここでエンターキーを押すと、次のレコードへ移るわけですが、 カーソルがEの位置にあるため、わざわざマウスでAの位置へ移動させないといけません。 同様に、入力項目がなく、A,B,Cと入力して次のレコードへ行くと、Cの位置にカーソルがあります。 これを、Aをホームポジションとして、次のレコードへ移ったときに 自動的にカーソルをAの位置にもってくるようにしたいのですが、 一体どうすればよろしいでしょうか?

  • アクセス 同じ内容のVBAをまとめる

    アクセスのVBAを使用しています。 フォーム上で複数のコンボボックスを連結させた行があるとし、そこにVBA(コードビルダ)を使って色々なを動きをさせています。また、同じ内容の動きをするものを複数並べているのですが、すべてのコンボボックスにVBAを入力せずにまとめることはできないでしょうか A  コンボ1-コンボ2-コンボ3 B  コンボ4-コンボ5-コンボ6 C  コンボ7-コンボ8-コンボ9 A,B,C(実際には12個並べています)は同じ動きをします。 AのVBAをB,Cに同じ動きをさせることができるようにまとめるたいのですが…。 アクセスは素人のためよろしくお願いします。

  • Access2013 vbaサブフォームのレコード

    [Access2013 vba] ■したいこと サブフォームのレコードの中から、一レコードだけをチェックボックスなどで選択したいのですが、どのようにしたら出来ますでしょうか。 複数行選択は出来ないようにしたいです。 選択したのち、メインフォームの選択ボタンを押すと、そのレコードのID番号を取得して、呼出元のフォームのIDフィールドに代入したいです。 ■画面の流れ・・・ Aフォーム → 帳票型Bフォームで、レコードを選び「開く」ボタンを押す→ B 'メインフォームとCサブフォーム)が開く Cサブフォームのレコードをチェックボックスにチェックを入れて選択する B ' メインフォームの「選択」ボタンを押すと B ' メインフォームと、その前のBフォームが閉じて Aフォームに戻り、AフォームのIDフィールドに選択したIDが格納される。 よろしくお願いします。

  • Access2007で。

    Access2007で。 今Access2007を使ってちょっとしたシステムを開発してるのですが、フォーム内のテキストボックスに入力した文字列と、テーブル内のデータを参照する事ってできるのでしょうか? 例えば テーブルA、フォームBとして テーブルAには 問題番号 問題文 答え 上記のフィールドがあり、 フォームB内の解答テキストボックスと、テーブルAの答えフィールド内データを参照し、 同じデータがあった場合はフォームCを開き、データがなかった場合はフォームDを開く。 このような形にしたいのですができるのでしょうか? 無知な質問で恐縮ですが、ご教授ください。

専門家に質問してみよう