*

Access VBA リストボックスに値を追加

公開日: : 最終更新日:2014/04/20 フォーム内操作

リストボックスに値を追加

フォーム内に設置した非連結のリストボックス内に値(データ)を追加するプログラムを説明します。リストボックの作成方法は別記事のリストボックスの作成方法を参照してください。

listbox03今回のモデルフォームはデータベース作成講座の登録フォーム作成で使用したフォームを変更したものになります。
・新規社員データを入力
・「入力」コマンドを押すと、「入力リスト」にデータが反映される
この時点では、未だテーブルへの入力はされていません。
リストに連続入力を行い、最終的にリスト内の全データをテーブルへ反映させる流れになります。

では、実際にVBAをどのように組み込んでいくのか説明します。

スポンサーリンク

コマンドボタン(入力)のクリックイベント

コマンドボタンのイベントは「クリック時」になります。
コマンドボタンを押した際に各テキストボックスのデータをリストボックスへ入力します。
実際のプログラムは以下のようになります。

リストボックスへ値を追加するプログラム例

Private Sub 入力コマンド_Click()

Me.入力リスト.RowSource = Me.入力リスト.RowSource & “;” & Me.社員コード & “;” & Me.名前 & “;” & Me.性別コード & “;” & Me.性別 & “;” & Me.所属部署コード & “;” & Me.所属部署 & “;” & Me.入社日

End Sub

プログラムの説明

リストボックスに値を追加するには「RowSource」を使用します。
各テキストボックスの値を「;」(セミコロン)で区切ります。
Me.入力リスト.RowSource = Me.入力リスト.RowSource &・・・とする理由は既に入力されているデータを残す為です。完全にデータを入れ替える場合にはこの記述は必要ありません。

listbox04
特に難しいプログラムではありません。
コンボボックスも同様の方法でデータの追加が行えます。
次記事ではこのリストボックスに入力されたデータをテーブルへ追加する方法を説明します。

スポンサーリンク

ad-pc

ad-pc

関連記事

listbox02

Access VBA フォーム リストボックスの作成

フォーム リストボックスの作成 フォーム内にリストボックス「リスト0」(非連結)を作成しておきます

記事を読む

listbox04

Access VBA リストボックス内の値をテーブルへ追加

リストボックス内の値をテーブルへ追加 フォーム内に設置したリストボックス内のデータをテーブルへ追加

記事を読む

cbox02

Access VBA フォーム コンボボックスの作成

フォーム コンボボックスの作成 フォーム内にコンボボックス「コンボ3」(非連結)を作成しておきます

記事を読む

pass01

Access VBA フォームをパスワードで制限

フォームをパスワードで制限 Accessで作成したデータベース使用時に一般ユーザーと管理者レベルで

記事を読む

merror01

Access VBA フォーム 未入力エラー回避

フォーム 未入力エラー回避 データ入力フォームなどで、データの未入力エラーを回避するプログラム例で

記事を読む

Message

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

転職01
初心者がAccess VBAの仕事に就く為には

初心者がAccess VBAを使った仕事に就く 私はSEやITエンジ

sound01
Access VBA 音を鳴らす PlaySound

音を鳴らす PlaySound Access上で効果音を鳴らすプログ

pass01
Access VBA フォームをパスワードで制限

フォームをパスワードで制限 Accessで作成したデータベース使用時

prg01
Access VBA 処理の進行状況を表示するプログレスバー(ProgressBar)

処理の進行状況を表示するプログレスバー Accessで処理に時間のか

excel03
Access VBA AccessのデータをExcel(エクセル)へ変換

AccessのデータをExcel(エクセル)へ変換 Accessで使

→もっと見る

PAGE TOP ↑