• 締切済み

Access VBA

Access 2000 についての質問です。 下記のようなフォーム上のコンボボックスで 商品、産地、サイズを選択 →テキストボックスに個数を入力 →見積りボタンをクリック →テキストボックスに合計金額を表示 ----------------------------------------- フォーム  コンボ コンボ コンボ   テキスト  商品  産地  サイズ   個数 ボタン        テキスト 見積り        金額:______円 ----------------------------------------- というものを、下記の表に基づいて作りたいのです。 単価.xls ===================== 商品  産地 サイズ 単価 みかん 和歌山 L  30 リンゴ 青森  M  50 リンゴ 青森  L  70 リンゴ 長野  L  70 ===================== そこで、コンボボックスで選択した値を活かして 単価.xlsの ”単価”の値を利用して テキストボックスに表示したいのですが、 どのように記述すれば使用できるのか?わかりません。 超初心者ですのでわかりやすく教えてください。よろしくお願いします。

みんなの回答

  • klub
  • ベストアンサー率36% (14/38)
回答No.1

やり方はいくつかあります。 (1)フォーム上に単価をクエリーで抽出するコンボボックスを配置し、そこを見て計算させる。 (2)フォーム上に単価をクエリーで抽出するサブフォームを配置し、そこを見て計算させる。 (3)DLOOKUP関数で単価を抽出して計算させる。 rabinyanさんがどこまでACCESSを理解しているのかちょっと分からないのですが、マクロ記述が良いのか、プロシージャが良いのか悩みますね。う~ん。 あとこの質問ですが「作っている最中でどうやって計算させればよいのか分からなくなってしまった」というものなのか、「こんな感じの画面ものをACCESSで作成したいのだがACCESSでどうやって作ればよいのか最初から教えてほしい」というものなのか教えてください。単価.xlsはエクセルですよね。テーブルやクエリーなどの概念はお分かりにはなっているのでしょうか? もし後者のほうでしたら、まず参考書などを参考にしてみてはいかがでしょうか。

関連するQ&A

  • リストボックスの項目に、他のブックのセルの値を設定するには?

    EXECL2003でユーザーフォームを作成しているのですが困っています。 リストボックス(またはコンボボックス)の項目の設定に、他のブックのセルの値を使用したいのですがわかりません。 具体的には「単価表.xls」「見積書.xls」と2つのブックがあり、「見積書.xls」にユーザーフォームを作成します。 そのユーザーフォームのリストボックスの項目に「単価表.xls」のセルの値を設定したいのです。 本を見たりWEBを検索しても、ブック内のシートのセルの値を設定する例しか見つけることができません。 何か手がかりでも教えていただければ助かります。 よろしくお願いいたします。

  • Access columnプロパティについて

    フォームのコンボボックスで商品コードを選択して 非連結のテキストボックスに選択された商品コード の単価をcolumnで自動入力するようにしたのですが 単価の変更がある場合はこの既定値の単価を変更したい です。今の状態で単価を変更をしようと思っても なにかロックがかかったようになっています。 なぜだかわからないので教えていただけませんか?

  • VBでコンボボックスとテキストボックスの連係

    VBでフォームにデータコンボボックスとテキストボックスを一つづつ作り、データコンボボックスで値を選択し、その値に対する値をテキストボックスに表示させたいんですがどうすればいいでしょうか? データコンボボックスで選択する元になるテーブルは ID | 商品 1 | みかん 2 | ばなな 3 | りんご と、上記のような形のテーブルをもちいています。 例えばデータコンボボックスで「1」を選択した場合テキストボックスに「みかん」と表示させたいです。

  • アクセスのVBAなんですけど

    アクセスのVBAでフォームからフォームへ値を渡すことはできますか?具体的にいうとあるフォームでコンボボックスから選択し、OKボタンで次のフォームを開くのですが、初めのコンボボックス(ちなみに5つ選択項目があります)で選んだ条件でフォームの表示内容を変更させようと思っています。 今のところ、選択した項目を一時的にテーブルに保存して、新しいフォームが開くときにテーブルから値を取得してやるのか・・・・と考えているのですが、まどろっこしいので・・・・・よろしくお願いします。

  • VBA ACCESS

    コンボボックスで値を選んで選んだ時に、(検索して)テキストボックスに一覧表示させたいのですがうまくいきません。 どのようにすればいいでしょうか? 教えてください。よろしくお願いします。

  • アクセスVBAについて

    アクセスのフォームで「所属」というコントロールボックスが「1」のときは「テーブル 1」の値をコンボボックスで参照し、「所属」が「2」のときは「テーブル 2」の値を参照したいのですが、確か、「select case」を使ったと思うのですが、教えてください。

  • Access2000 DLookup関数の使い方

    色々試してみたのですがわからないので質問させていただきます。 フォーム/サブフォームを作っています。 サブフォームにある商品コード(コンボボックス)を入力すると、同じサブフォームにある単位、単価に商品台帳テーブルの値(単位、単価)を持ってくるようにしたつもりなのですが・・・。 商品コードの更新処理後に以下のコードを記述したのですが、うまく動きません(エラーは出ない)。 Me![単価] = DLookup("[単価]","商品台帳","[商品コード] = [Forms]![フォーム]![サブフォーム]![商品コード]") どこが悪いか教えていただけないでしょうか?

  • アクセスでOutputTOを使用してエクセルへ

    アクセスでOutputTo acOutputFormを使用して、エクセルへデータをエクスポートしています。 フォームには、コンボボックス1、コンボボックス2、テキストボックス1を用意し、 データを抽出し、フォーム上に表示されたデータのみをエクスポートしています。 エクスポートされたエクセルデータを確認すると、コンボボックス1、コンボボックス2、 テキストボックス1も、エクセルデータの項目としてエクスポートされてしまいます。 このコンボボックス1、コンボボックス2、テキストボックス1をエクセルに エクスポートしなようにする方法はありますか? 下記でエクスポートしています。 DoCmd.OutputTo acOutputForm, "F_設備", , "\\***\***\***\" & "book1.xls", True

  • エクセル2003でフォームを作成しています。

    エクセル2003でフォームを作成しています。 ネットワーク上にある”元データ.xls”のデータをもとに”集計.xls”にある フォームにデータを引っ張ってきたいと思っています。 ”集計.xls”には、コンボ1つと”元データ.xls”と同数のテキストボックスを設置してあります。 コンボには”元データ.xls”のA1:A1000までを課題番号としたものをRowSourceにセットしてあります。 コンボから課題番号を選ぶと、テキストボックスに”元データ.xls”の値を出したいのですが どうすればよいのでしょうか。 アクセスのSelect Fromのようなことをしたいと思っているのですが、すみません意味分かりますでしょうか。よろしくお願いいたします。

  • エクセルVBAについて質問です。

    エクセルVBAについて質問です。 シート1のユーザーフォームにコンボボックスとテキストボックスが各1つずつ、 シート2のA列には1行目から順に「あ」「い」「う」と文字が入っていて、B列には「1」「2」「3」と値が入っています。 コンボボックスのリストにはシート2のA列の文字が選択できる状態にあります。 この状態で、例えばコンボボックスで「い」を選んだら、テキストボックスに自動的に「2」と入る、というように、コンボボックスのリストの中から任意の文字を選択したときに、テキストボックスにB列の値が入るようにするにはどのようにすればいいのでしょうか?よろしくお願いします。