• ベストアンサー

アクセス マクロのつくりかたを教えてください。

アクセスのフォームで、納品書フォームを作っています。”数量”x”単価”で”合計金額”コントロールをつくっているのですが、もしこの”合計金額”の金額が\1,000,000をこえた場合は”注意”というメッセージボックスをだし、そして、OKボタンを押せばそのまま処理でき、超えない場合は、そのまま入力できるように、マクロでのつくりかたの方法、もしくは解説のあるHP等を教えてください。お願いします。

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

  • ベストアンサー
  • mhassy
  • ベストアンサー率43% (16/37)
回答No.1

http://www.accessclub.jp/ 質問を記入する手間よりも、ネット検索をする方が数倍効果的ですよ。

関連するQ&A

  • access 帳票形式での Sum関数について

    お世話になります、 access2003を使っています、 テーブル商品があり、以下3つの列があります 商品名 単価 数量 フォーム集計をテーブル商品を元に帳票形式で作りました 帳票の1行にテキストボックス”金額”を追加してそのコントロールソースの値を [単価]*[数量]にしました。 帳票の1行づつは 商品名 、単価、 数量、金額([単価]*[数量]) の4つの列が並びます。 上記までは一行づつ計算して金額の値は正確に表示されます。 このフォームのフッターに帳票の各業の金額の合計を求めるため テキストボックス”合計金額”をつくり コントロールソースを =Sum([金額]) にしたのですが、明らかに合計金額が違った数値が出てきます。 出てきた金額が何をどう計算して出てきたのか見当が付きません どのようにしたら正確な合計金額が得られるのでしょうか? 何方かお教えいただけますようお願い致します、

  • Accessでサブフォームの合計をメインフォームに

    Access2007で開発しています。 メインフォームにサブフォームを貼り付けており、 サブフォームに入力した「数量」「単価」から「金額」を計算して表示し、 その合計金額をメインフォームのテキストボックス(非連結)に表示しようと しています。 サブフォームは行単位で追加、削除が可能です。 サブフォームの更新結果が正しくメインフォームに表示されずに困っています。 おわかりの方、おられましたらお教え頂きたく、よろしくお願い致します。 【サブフォーム】   ・レコードソース:T_明細   ・[詳細]項目:数量・・・レコードソース=T_明細・数量        単価・・・    〃    =T_明細・単価        金額・・・数量および単価のAfterUpdateで計算して表示。    [フォームフッター]項目:金額計・・・コントロールソース=Sum([金額])   ・Vbaコード:   Private Sub Form_AfterUpdate()   Forms![メインフォーム].合計計算   End Sub   Private Sub Form_Delete(Cancel As Integer)   Forms![メインフォーム].合計計算   End Sub 【メインフォーム】  ・テキストボックス:「合計金額」(非連結) Public Sub 合計計算()    Me.サブフォーム.Requery   方法1: Me!合計金額 =DSum("金額", "T_明細", (キー項目指定 記述省略))   方法2: Me!合計金額 = Me![サブフォーム].[Form].[金額計] End Sub ここで、 方法1の場合:数量、単価の変更入力及び行追加は正しく動作するが、          行削除の後、メインフォームの「合計金額」が再計算されず、変更前のまま。 方法2の場合:数量、単価の変更入力及び行追加すると、「合計金額」が”0”になる。          行削除しても「合計金額」は変わらず、変更前のまま。 どちらも、サブフォオームの「金額計」は正しく表示されています。 以上、よろしくお願い致します。

  • アクセス

    アクセスでテーブル上で、   単価 数量 金額    3 5 15 のように単価、数量いれると金額が合計されるテーブルができますか? クエリはつかわないで・・

  • アクセス2000フォームからテーブルへ計算結果映し出す方法

    テーブルのフォームは 単価 数量 合計の順です 合計フォームに[単価]*[数量]入れたいのですが フォーム内では計算不可能!と過去ログ読んで勉強しました。 フォームでデザイン>合計のテキストで プロパディ>コントロルソースで =[単価]*[数量]と 書き込み 操作すると フォームの合計欄には=[単価]*[数量]の答えがでてきます。 喜んで テーブル開けると合計フォームは「空欄」のまま・・・ ここで 質問ですが フォームで合計欄には=[単価]*[数量] と 設定しても テーブルには 合計は 反映されないのでしょうか? もし 反映できる式?がありましたら ご教授下さい。 あと フォーム内 テキストボックス 非連結を連結に するには どうしたらよいのでしょうか? お願い します。

  • 【Access2003】

    【Access2003】 売上台帳を作成しました。 レポートにて伝票を発行する際に 『品名1』 『数量1』 『単価1』 『金額1』           *            *           * 『品名10』 『数量10』 『単価10』 『金額10』まであり 『金額1』~『金額10』までの『合計』を表示したいのですが 項目が10までないと合計が表示されません。 とはいえ、既定値に『0』を設定すると、空欄の部分に『\0』が表示されてしまいます。 希望は項目がない場合でも『合計』を表示したいのですが どのようにやればよいのでしょうか? 宜しくお願い致します。 ちなみに、『合計』のコントロールソースには =Sum([金額1]+[金額2]+[金額3]+[金額4]+[金額5]+[金額6]+[金額7]+[金額8]+[金額9]+[金額10]) と設定しています。

  • アクセス初心者です

    納品書を元に仕入帳を作ってみたいと思うのですが テーブルとフォームは何となくわかったのですがクエリーでつまずいてしまいました 例 納品書 月日 A商店 伝票ナンバー 商品コード 品名 金額  入数 単価 数量 金額 売値  これを元に仕入帳を作りたいと思います 仕入帳 A商店、B商店、C商店に分けて 品名 金額 数量 単価 金額が出るように 又納品書は商品コードを入れただけで品名、金額、入数、単価が出るようにしたいのですが 納品書はテーブル、フォームは作りました 商品マスタも作りました 

  • access2010のフォーム上で計算したいです

    access2010 初心者です。 メインフォーム上に総合計を計算したいのですがどうしたらいいのか困ってます。 ***サブフォーム(テーブル1から表示しました)*** ・商品名(テーブル1から表示) ・金額(dlookupを使って「商品一覧表」から金額を表示しました) ・数量(テーブル1から表示) ・合計金額(コントロールリボンでテキストボックスを作り「金額」*「数量」で表示してあります) *********************** メインフォームに、サブフォームの「合計金額」の様にテキストボックスで、サブフォームの「合計金額」の『総合計』を表示したいです。 総合計がある一定の金額になるように、サブフォームの「数量」を決めて行きたいのです。だから、一定金額から『総合計』を引いて残金も表示したいのですが、『総合計』の求め方がわからなくて困っています。 総合計や合計金額はデータとしてテーブルには残らなくてもOKです。 初心者なので、できればわかりやすく簡単な方法がうれしいです うまく伝えれなくて不明な点があるかと思いますが、なにとぞお願いします

  • Access2000 フォーム上の計算

    質問させていただきます。 Access2000のフォームで、たとえば詳細の「数量」と「金額」をそれぞれ合計し、それをフォームフッダーに置きます。また、同じフォームフッダーに「単価」を置き、「金額の合計」÷「数量の合計」で算出するようにしています。 詳細にデータが入力されるまで「#Nmu!」と表示されます(0÷0でエラーになるのは当然ですが・・・)。 そこでこの「#Nmu!」を表示しないようにしたいのですが、どのようにすれば良いでしょうか? できれば詳細にデータが入るまで「空白」か「0」を表示しておきたいのですが・・・。 よろしくお願いします。

  • access Nz関数が出来ません。

    すいません、教えてください。 仕様環境 WinXP access2002 おそらくNz関数の問題だと思いますが・・ フォーム上の詳細に 「数量」「単位」「単価」「金額」とあります。 そしてフォームフッターに    「小計」・・(以下すべて通貨型のテキストボックス)    「値引き」    「値引後小計」    「消費税」    「合計」 とあります。 「小計」は=sum([数量]*[単価])でsum関数で出しています。 ただ値引きがない場合は「値引き」の項目は空(きっとNULL値?)になっていて、「値引後小計」以降の金額が表示されません。 (「値引き」に直に"0"を打ち込むと表示されるんですが) 「値引き」のテキストボックスが、常に”0”の状態にして「値引き」後の項目も出るようにしたいのですが、どうしたらよいのでしょうか? 必要な時に入力する感じにしたいのです。 Nz関数を使えば良いみたいなので、いろいろ調べて試したのですが、 どうも出来ません。 よろしくお願いします!

  • ACCESS教えて下さい。

    こんにちは。 ACCESSで今データーベース作ってます。 初心者なのですが、 売上管理の為 テーブルを作成 ID 数量 単価 金額 を作成し、入力(フォーム)で数量と単価をいれると自動計算できるようにしたいのです。 今までは、合計をクエリーで作成してました。計算は出来るのですが、テーブルで合計が入力されないし、その金額を次利用しようとしても、使えません。 数量*単価⇒の値を金額へ保存していきたいのですが・・。 宜しくお願いします。

専門家に質問してみよう