コード番号の自動入力方法を教えてください
- Accessを使用している中で、項目をコンボボックスから選択すると該当するコード番号(主キー)が自動的に入力される方法を知りたいです。
- 例えば、果物という項目をコンボボックスから選択した場合に、りんごという項目もコンボボックスから選択し、それに対応するコード番号が自動的に入力されるようにしたいです。
- どなたかこのような方法をご存知の方はいらっしゃいますか？ご教授いただけると幸いです。
- ベストアンサー
コード番号の自動入力
初めて投稿します。Accessを使用する上で困っていることがあるので相談に乗っていただけると助かります。 クエリなどで、コード番号を入力すると項目が自動入力されるというのが良くあると思うのですが、その逆をやりたいのです。項目をコンボボックスから入力すると該当するコード番号(主キー)が自動入力されるといった具合です。 例えば・・・ NO｜項目1｜項目2｜項目3 1｜果物｜りんご｜青森 2｜果物｜りんご｜長野 3|果物｜みかん｜宮城 4|果物｜みかん｜愛媛 5|野菜｜大根|長野 見たいなテーブルがあったとします。 項目1～3までをコンボボックスで値入力させ、それに該当するNOを自動入力したいのです。 方法が分かる方、いらっしゃいましたら教えてください。
- kuroneko6471
- お礼率100% (1/1)
- オフィス系ソフト
- 回答数1
- ありがとう数1
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
項目１～３の更新後イベント か確定ボタンのクリック時イベントにて 下記のコードを実行する。 Dim JOKEN As String '条件用のフィールド JOKEN = "[項目1]='" & Me.項目1 & "' And [項目2]='" & Me.項目2 & "' And [項目3]='" & Me.項目3 & "'" Me.NO =Dlookup("NO","テーブル名",JOKEN) －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－ 個人的な意見だとコンボボックスで項目１～３を表示して、結果としてコードを表示させ 各テキストボックスに下記のサポートを使う方が楽だと思いますが... コンボボックスの 2 列目のデータの値を取得する方法 http://support.microsoft.com/default.aspx?scid=kb;ja;879798
関連するQ&A
- Accessで自動に番号を振る方法
AccessのマクロやVBAにお詳しい方、教えてください。 現在、Access2010を使っています。 たとえば、テーブル1が、 種別 番号 りんご 1 みかん 1 りんご 2 メロン 1 みかん 2 メロン 2 メロン 3 とあります。 フォーム1には、種別と番号のテキストボックスがあります。 新規データ入力で、「種別」テキストボックスに「みかん」と入力し、「番号」テキストボックスをダブルクリックしたとき、「みかん」の番号の最大値の次の番号「3」が自動的に振られるようにしたいのですが、どうしたらいいでしょうか。 なお、 1.「種別」テキストボックスが空欄の場合 または、 2.「番号」テキストボックスに既に数値が入っている場合 は、ダブルクリックしても番号が振られないようにもしたいです。
- 締切済み
- オフィス系ソフト
- 番号入力後に データベースシートから自動入力
エクセルの関数で、 下記、ご助言願います。 エクセルのシートで、 番号と項目名（１対１対応）を記載したデータベースシートを作ります。 別シートで、番号を入力すると 先程のデータベースシートを参照して、（番号入力をしたセルの横のセルに） 入力番号に対応する項目名を自動で入力するようにしたいと思います。 関数で可能でしょうか？ 例えば、 データベースシート： 01 りんご 02 みかん 03 バナナ 入力シート 03 ＜ばななが自動入力＞ よろしくお願いいたします。
- ベストアンサー
- オフィス系ソフト
- コードを記入すると情報を出す方法
エクセルで、コードを入力するだけで、名前、種類、金額、など、いくつかの項目を表示させるようにしたいです。 たとえば、 コード番号 名前 種類 金額 ００００１ みかん 愛媛産 １００ のように００００１と入力すると、「みかん、愛媛産、１００」と表示させるようにしたいのです。教えてください。
- ベストアンサー
- オフィス系ソフト
- エクセル 他シートに特定項目のみ自動入力する方法
質問 エクセルで、次のように設定することが、関数またはマクロでできませんでしょうか。どうか知恵をお貸しください。 Sheet1（購入一覧） 果物 単価（円） 個数 購入金額（円） みかん 100 2 200 りんご 200 3 600 Sheet2（みかん） Sheet1の「果物」列で「みかん」と入力すると、「みかん」行全体（「果物」列～「購入金額（円）」列まで）が自動入力される。 一方、Sheet1で「果物」列に他の果物（りんごなど）を入力しても、Sheet2に自動入力されない。 Sheet３（りんご） Sheet1の「果物」列に「りんご」と入力すると、「りんご」行全体（「果物」列～「購入金額（円）」列まで）が自動入力される。 一方、Sheet1で「果物」列に他の果物（みかんなど）を入力しても、Sheet3に自動入力されない。
- ベストアンサー
- Excel（エクセル）
- 単純作業で入力した番号の集計
様々な数字を入力して、入力した何番が何個なのか集計する方法や、 その作業に役立つフリーソフトを探しています。 希望の作業を判り易く「果物」で説明しますと、 りんご みかん ぶどう みかん ぶどう ぶどう みかん りんご いちご と、同じ果物が重複しても一個ずつ単品で入力します。 文字を入力したらEnter 入力→Enter→入力→Enter→入力→Enter→入力→Enter→ の繰り返しです。 すると、結果が自動的に りんご2 みかん3 ぶどう3 いちご1 と、表示してほしいのです。 今、考えてる作業は、エクセルのAの縦欄だけを使い、様々な文字を数百行書き出します。 何度も同じ番号が重複しますが、入力→Enterの繰り返しです。 すべて入力後、にエクセルで並べ替えしても、何番が何個重複したのか一目では解り辛いので、 りんご2 みかん3 ぶどう3 いちご1 と入力結果を一目で確認したいのです。 単純作業を求めているので、 入力＋Enterの繰り返しだけでの作業ですが、 もっと便利な方法があれば、アドバイスも宜しくお願いいたします。
- ベストアンサー
- オフィス系ソフト
- 《Word2000》自動で振った段落番号を、一括で手打ちの番号に入力し直すには
1. りんご （本文） 2. みかん （本文） 3. バナナ （本文） このような構成の文書があります。 それぞれの章タイトル（果物の名前）は、現在段落番号で自動で振られているのですが、これを手打ちでテキスト入力した状態にしたいです。 ひとつひとつ目で見ていくのが確実なのでしょうが、他人が作ったファイルでしかもページ数がとても多いので、見落としが怖く、できれば機械的に行いたいのです。 コピーして「テキストでペースト」する方法は存じております。 ただこちらの方法にしても、見落としがあると数字が変わってしまいますので、最上の策とは言えないと思います。 せめて「自動で段落番号を振った行を検索」する方法があればいいのですが。 ご回答、お待ちしております。
- ベストアンサー
- オフィス系ソフト
- ACCESSでフォームの明細で他の値を参照させたい
ACCESS2010でフォームで明細行のコンボボックスを、他のテキストボックスの値を使って 行単位で動的に変更したいのですが、どのようにしたらよろしいのでしょうか 例えば、 1行目のAのコンボボックスで「果物」を選択したら、Bのコンボボックスは「リンゴ・みかん・イチゴ」を表示させたい 2行目のAのコンボボックスで「野菜」を選択したら、Bのコンボボックスは「きゅうり・きゃべつ」を表示したい もちろん、テーブルに下記のように保存されています 【分類】｜【名称】 野菜｜きゅうり 野菜｜きゃべつ 果物｜りんご 果物｜みかん 果物｜イチゴ
- ベストアンサー
- その他（プログラミング・開発）
- 入力規則のリストボックス
エクセルの入力規則でリストボックスを使って選択したいのですが その時に、数字のみを抽出する方法はないですか？ 例えば 1:りんご 2:みかん 3:バナナ をリストから選択する時、番号のみが表示されるように したいのです。 リストにはその番号がどれに該当するかわかるように りんご、みかん、バナナという内容も表示させたいのです。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- アクセス テーブル ルックアップ について
アクセスです。[売り上げ] というテーブルで、フィールド [年月日] [果物] [個数] があって、[果物] の入力時に マスタテーブル [M果物] を ルックアップ 、 コンボボックス で選択するようにしています。すでにデータ入力してあります。ところが、[M果物] には、リンゴ、ミカン、メロン・・・・・などたくさんあるので、探して選択するのに不便になってきました。そこで、[果物]入力時に、よく売れる個数順に果物を並べ替えて、ルックアップ、コンボボックスに表示して入力を便利にしたいのですが、どのようにしたらよいのでしょうか？宜しくお願い致します。
- ベストアンサー
- オフィス系ソフト
お礼
ありがとうございました。こんなに早くお返事がいただけるとは思いませんでした。これを参考に早速チャレンジしてみます！