• ベストアンサー

Access初心者向けに

データ出力時に、 作成するエクセルファイルのD列に、出力画面で指定したコンボボックスの値に よって入力する内容を選択し表示させるには、どうしたら良いでしょうか? D列へ入力する値のは、C列と同じデータ数だけ入力させます。 出力テーブル作成時に、 手数料コードというフィールドがあり特定のコードの時には、 手数料名称の欄にある手数料名の後ろに(課税)と表示したい。 どのようにするのが時間が掛からず簡単にできますか? (初心者でも) ある処理の時にだけ、コードの通らせないようにする部分があるが、 どうしたら良いでしょうか?

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

  • ベストアンサー
  • ruru0707
  • ベストアンサー率68% (20/29)
回答No.2

テーブルから直接エクスポートせずに出力対象のクエリーを作成すればいいと思います。 D列にあたる部分にクエリーの列を挿入し、手数料コードとフォームのコンボの値の条件を記入します。 例えば、 フォームのコンボの値が001だったら(課税)と表示するなら クエリーのD列にあたるフィールドに IIf([Forms]![フォーム1]![Cbo手数料コード]=[テーブル]![手数料コード],"(課税)",Null) と記入すればいいのではないでしょうか?

その他の回答 (1)

  • CHRONOS_0
  • ベストアンサー率54% (457/838)
回答No.1

Accessの一般機能ではExcelへ場所を指定してエクスポートすることは出来ません OLEオートメーションという手法を使いVBAでExcelをたちあげ Excel側から取り込むというVBAコードをAccessのほうに書くことになります >(初心者でも) となると、Accessだけで何とかしようとせず ExcelのほうからAccessのデータを取り込むように考えたほうが簡単でしょうね >ある処理の時にだけ、コードの通らせないようにする部分があるが、 >どうしたら良いでしょうか? プログラミングの初歩ですね、VBAの入門書を読みましょう ヒントはIf、Select Case

関連するQ&A

  • access初心者です

    業務効率化のため、accessを用いてデータ突合できるようなものを作成しようとしています。 システムから抽出したデータ(1)と申込の内容を手入力したもののデータ(2)を突合させ、正誤をとりたいです。 コンボボックスで手入力したデータ(2)のキーワード(企業名)などから検索、サブフォームで対象企業のシステムデータ(1)から結果を表示させたいです。 いまつまづいているのは、 1.コンボボックスで企業名を出すと、リストに同じ企業が複数表示される。手入力データでは1つしか企業名の入力をしていないはずですが、フォームの参照クエリでシステムデータの企業名と手入力データの企業名を結合させているのが原因だと思います。 ただ、結合しないとコンボボックスから引っ張ってきた時にシステムデータの結果をフィールドに表示させられないため、困っています。 2.コンボボックスで検索したあと、サブフォームでその企業のシステムデータ内容を引っ張ってきたいのですが、そのやり方が分からず困っています。 拙い文章、access知識が浅いため伝わりづらい部分多々あると思います。 webで検索してもなかなか自分のやりたいことの例が載っておらず、かれこれ1ヶ月くらい格闘しています… よろしければ知恵をお貸しください。よろしくお願いします。

  • アクセス初心者です。

    アクセスのフォームについてです。番号を選ぶとリスト表示がでてきて自動的にテキストに文字列が入るように作ったのですが、思うようにいきません。 コンボボックス 名前     cmb_コード 列数     2 値集合タイプ テーブル/クエリ 値集合ソース T_ 納品物コード 列幅     2;4 連結列    1 で、テキストフィールドに[cmb_コード].column(1) としました。 コンボボックスに2列分のデータが出てくるのですが、列数も2列分表示されるのですが、コンボボックスの2幅ぶんでしか見れません。上下左右ともスクロールが表示されています。左右スクロールを表示しなくても2列分のデータが見れるようにしたいのですが、どのようにすればいいのでしょうか?別項目はきちんとできているのですが、この部分だけできません。見比べたのですが、違いが分かりません。よろしくお願いします。

  • データコンボについて

    VB6でMySQL4に接続して データベースにデータを格納するため 入力フォームを作っているんですが、 データコンボに手入力で入力した値datacombo1.SelectedText と データコンボに連結されて、表示しているフィールド DataCombo1.ListField = "name" を比べて、ListField内の値と手入力した値が 一致した場合、 その一致したレコードの DataCombo1.BoundColumn = "ID" の値をかえしたいんですが、どうしたらいいですか? データコンボに表示されるフィールドの 数が多いので直接データコンボに手入力をした方が データコンボ内の多い数のフィールドから 目的の値を選ぶより 手間がいらない時があるので・・。 データコンボと連結しているテーブルのフィールドは ID name です。 データコンボにはnameを表示させて、 データベースにはデータコンボで選んだnameの レコードのIDを格納します。

  • Accessコンボボックスについて(初心者)

    例えば以下のような2フィールドのテーブルがあり 商品コード 商品名 1111  パソコン   ・     ・   ・     ・ フォームでひとつのコンボボックスを作る際このテーブルを参照し、2フィールドとも表示され、なおかつ入力出来るようにしたいのですが・・。 表示はするものの入力となると商品コードのフィールドのデータしか入力出来ません。 要は商品コードを入力すれば同じレコードの商品名が入力出来るようになれば良いので、別のやり方があればかまわないのですが・・。 良きアドバイスをお願いします。

  • コンボボックスにつきまして

    JComboBoxを使って、コンボボックスを作成したいのすが、 表示は名称で、実際の値取得はコードで取りたいのですが、 可能でしょうか? 例えば、 コード  名称 001   りんご 002   ぶどう 003   パイン というデータをセットし、 コンボボックスのドロップダウンでは「りんご」を選択したときには、 「001」という値を取得したいのです。 よろしくお願いします。

    • ベストアンサー
    • Java
  • Excel:コンボボックスの値をセルにセットする場合

    Excel2000を使っています。 コンボボックスで選択した内容をアクティブなセルに入力するために、以下のようなコードを作成しました。 (ユーザフォームにコンボボックスを1つ作成しています) ------------------------------------------ Private Sub UserForm_Initialize() ComboBox1.ColumnCount = 2 For I = 0 To 10 ComboBox1.AddItem Worksheets("元ネタ").Cells(I + 2,1).Value ComboBox1.List(I, 1) = Worksheets("元ネタ").Cells(I + 2,2).Value Next End Sub ------------------------------------------ Private Sub ComboBox1_Change() Worksheets("入力用").Activate ActiveCell.Value = ComboBox1.Text End Sub ------------------------------------------ このコンボボックスは、2列を表示させています。最後にセルに値を入力すると、今のコードでは1列目の値が入りますが、実際には2列目の値だけを入れたいんです。でもコンボボックスの選択時は、先頭列に1列目の値を表示させたいんです。 どうすれば、2列目の値をアクティブセルに入力できるでしょうか?

  • こんにちは。Access初心者です。

    こんにちは。Access初心者です。 現在、Access2003でデータベーステーブル更新機能を作成しています。 連結テキストボックスを作成し、入力規制を以下のように設定しました。 ●フィールドサイズ16(プロパティで設定) ●入力必須(プロパティで設定) ●未入力の場合はエラーメッセージ表示(プロパティで式を設定) このテキストボックスに対して「4」を入力した際、上記エラーメッセージが表示されてしまいます。 他のテキストボックスに「4」を入力した場合は同様の現象は起こりません。 これはAccessの入力規則等に関係するのでしょうか? もしくは設定ミスでしょうか? もし何かご存知でしたら、回答をお願いいたします。

  • Access→Excelへの出力とVBA

    エクセルのシート1のB列に2種類の数値どちららかを選択させ、 A列の行数にそって入力させたいと考えています。 数値の判断は、 AccessのフォームABCにあるコンボボックスAで ○×を選んだときは「1」、 AccessのフォームABCにあるコンボボックスAで ☆★を選んだときは「2」 をA列に入力されている値の行数だけB列に値を入力させるには、 どの様にしたら良いのでしょうか? Access単品の操作では出来ないと聞きました。 よろしくお願いします。

  • Accessのフォーム その2

    すいません、以前にも同じ質問をしたのですが、私の質問の仕方が悪くてうまくいきませんでした。 回答してくださった方、ありがとうございました! もう一度、詳しく質問しなおします。 顧客データを登録しているのですが、テーブルを元に登録フォームを作成しました。 商品がたくさんあって、4つのコードに分かれています。フォームの中に[A][B][C][D]と4つのコンボボックスを作成し、絞込み検索ができるようにはしました。 しかし、選んだデータの[A]しかテーブルに表示されません。例えば[A]のコンボボックスの中から[1010]を選択、[B]のコンボボックスから選択しようとしても空っぽです。 テーブルを見ると、[A]で選んだ[1010]だけが表示されています。 非連結のときはうまく出てたんですが・・。 もしかして連結列が間違ってるのでしょうか?? 元になるテーブルは Aコード A  Bコード B Aコード Cコード C Bコード Dコード D Cコード この2列目を表示したいのです。(2列目が[1010]など表示したいデータ) 列数はそれぞれ「2」で連結列は「2」です。 更新後処理は以下の通りです。 Private Sub コンボ0_AfterUpdate() Me!コンボ2.Requery End Sub Private Sub コンボ2_AfterUpdate() Me!コンボ4.Requery End Sub Private Sub コンボ4_AfterUpdate() Me!コンボ6.Requery End Sub ぜひよろしくお願いします。

  • Access抽出クエリの基本的なこと

    お世話になります。 初心者で苦労しながらもAccess2000でデータベースを作成しています。 非常に基本的な質問だと思うのですが、どなたかご教授願います。 日付を含むフィールドがあるテーブルがあり、クエリにてその日付から 年と月を拾っています。 ID   入力日   年:Year([入力日])   月:Month([入力日]) 1   2001/07/06    2001          6 2   2002/06/07    2002          6 3   2002/07/19    2002          7 別に作成したフォームに年と月を絞り込むためのコンボボックスをそれぞれ配置し、 入力された値によって上記クエリの抽出条件に反映させたいのですが、コンボに何も 入力されていないときは全てのデータを表示したいんです。 「コンボ月=2002」&「コンボ月=6」でID=2のデータのみを、 「コンボ月=(Null)」&「コンボ月=6」でID=1と2のデータを表示したいんです。 (判りにくくてすみません。。) このような場合、抽出条件に記述する式はどのように設定したら良いのでしょうか? IIfでIsNullの条件式を組んだのですが、Nullの時に返す値が判りません。 どうかよろしくお願いします。