質問をすることでしか得られない、回答やアドバイスがある。

15分調べてもわからないことは、質問しよう!

新規登録して質問してみよう
ただいま回答率
85.50%
VBA

VBAはオブジェクト指向プログラミング言語のひとつで、マクロを作成によりExcelなどのOffice業務を自動化することができます。

Access

Accessはマイクロソフトによるリレーショナルデータベース管理システムです。オブジェクト指向のアプリケーション作成に対応しており、テーブルや編集をはじめ、クエリ生成、入力フォーム作成、レポート作成など一通りの機能を備えています。

Q&A

解決済

1回答

2156閲覧

Access 税率設定

AMK

総合スコア765

VBA

VBAはオブジェクト指向プログラミング言語のひとつで、マクロを作成によりExcelなどのOffice業務を自動化することができます。

Access

Accessはマイクロソフトによるリレーショナルデータベース管理システムです。オブジェクト指向のアプリケーション作成に対応しており、テーブルや編集をはじめ、クエリ生成、入力フォーム作成、レポート作成など一通りの機能を備えています。

0グッド

0クリップ

投稿2016/04/25 07:10

編集2016/04/25 07:21

Accessで業務アプリの開発にチャレンジしています。

受注画面ができたので、そこに消費税の設定を組み込む所なのですが
消費税を後々変更できるような仕組みを導入する予定です。

テーブルは
T_受注(受注ナンバー、税率など)
T_受注_詳細

フォームは
F_受注
F_税率設定変更

最初は
テーブルに
M_税率
と言うテーブルを作成して
ID無しでtaxと言う列に0.08と入れて

dlookup で
F_受注の税率が入るTextBoxのコントロールソースに
=dlookup(M_税率,tax)としてみたのですがエラーで
イマイチ理解できないので

方針変更して
F_受注の税率が入るTextBoxのdefaultvalueをVBAで
変更して下記のように変更できるようにしたのですが

vba

1Sub 税率設定() 2Forms!F_受注!税率.DefaultValue = "0.08" 3End Sub

F_税率設定で現在の税率を初期値で呼びだそうと
初期値のところに=Forms!F_受注!税率.DefaultValue
と、入力してもエラーになり

打つ手がなくなりました。

どちらのアプローチ方法でも良いのでヒントなど教えていただけると助かります。


追記
defaultvalueの方法だとフォームを開いていないと参照出来ないようなので
やはり、Dlookupの方法が望ましいようです。

気になる質問をクリップする

クリップした質問は、後からいつでもMYページで確認できます。

またクリップした質問に回答があった際、通知やメールを受け取ることができます。

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

guest

回答1

0

自己解決

自己解決しました!

書式が少し違ったみたいです。

vba

1= DLookup("[tax]", "M_税率")

投稿2016/04/25 07:55

AMK

総合スコア765

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

あなたの回答

tips

太字

斜体

打ち消し線

見出し

引用テキストの挿入

コードの挿入

リンクの挿入

リストの挿入

番号リストの挿入

表の挿入

水平線の挿入

プレビュー

15分調べてもわからないことは
teratailで質問しよう!

ただいまの回答率
85.50%

質問をまとめることで
思考を整理して素早く解決

テンプレート機能で
簡単に質問をまとめる

質問する

関連した質問