Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1659 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【5932】変わった出力の仕方 さとこ 05/8/19(金) 18:10 質問[未読]
【5933】Re:変わった出力の仕方 Gin_II 05/8/19(金) 18:26 回答[未読]
【5952】Re:変わった出力の仕方 さとこ 05/8/22(月) 13:38 質問[未読]
【5975】Re:変わった出力の仕方 さとこ 05/8/23(火) 11:41 お礼[未読]
【5932】変わった出力の仕方
質問  さとこ  - 05/8/19(金) 18:10 -
引用なし
パスワード
   こんにちは。いつもお世話になっています。
宜しくお願いします。

フォーム−銀行−テキストボックス−"本店ID"、"支店ID"、"総合"、"銀行数"
テーブル−"銀行出力テーブル"、フィールド"出力"
コマンドボタン−登録

テキストボックス"総合"には本店IDと支店IDを組み合わせた英数字（テキスト型）を自動表示させるようにしてあります。
ここからが本題なのですが、コマンドボタン"登録"をクリックすることにより"銀行数"（一応テキスト型にしてありますが数値のみ）に入力した数値分だけ、"総合"の値を"銀行出力テーブル"に出力されるようにしたいのです。
"銀行出力テーブル"はエクセル"表示.xls"にエクスポートされるように設定はできています。

例）"総合"の値がAAA123　、　"銀行数"の値が2
　　　　　　　　　　　　↓
テーブル名"銀行出力テーブル"
フィールド名
"出力"
AAA123
AAA123


のように出力されるように設定したいのです。（VBAで）


お願いします。m(__)m
【5933】Re:変わった出力の仕方
回答  Gin_II  - 05/8/19(金) 18:26 -
引用なし
パスワード
   >テーブル名"銀行出力テーブル"
>フィールド名
>"出力"
>AAA123
>AAA123
>
>のように出力されるように設定したいのです。（VBAで）

バージョンは記載しましょう。

Dim lngCnt As Long

For lngCnt = 1 To Me!銀行数
　　CurrentDb.Execute "INSERT INTO 銀行出力テーブル(出力) " _
　　　　　　　　　　　& "VALUES('" & Me!総合 & "') "
Next lngCnt

とかでは？
【5952】Re:変わった出力の仕方
質問  さとこ  - 05/8/22(月) 13:38 -
引用なし
パスワード
   有り難うございます。
ここでもう一つご質問がございます。
宜しくお願いします。

クリックすると1件のレコードを追加しますか?と出て、銀行数に2と入力したのにも関わらず、一つ増えた3つ出力されてしまいます。

これはどうしたらよいのでしょうか？
【5975】Re:変わった出力の仕方
お礼  さとこ  - 05/8/23(火) 11:41 -
引用なし
パスワード
   ［本文なし］
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1659 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
1078247
(SS)C-BOARD v3.8 is Free