Excel VBA質問箱 IV

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

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


3839 / 13645 ツリー ←次へ | 前へ→

【59870】コンボックスについて教えてください POPO 09/1/14(水) 19:14 質問[未読]
【59871】Re:コンボックスについて教えてください マクロマン 09/1/14(水) 19:32 発言[未読]
【59896】Re:コンボックスについて教えてください POPO 09/1/15(木) 17:40 お礼[未読]

【59870】コンボックスについて教えてください
質問  POPO  - 09/1/14(水) 19:14 -

引用なし
パスワード
   どなたか教えていただけないでしょうか?

コンボボックスで入力した値をセルに順次格納するにはどのように組み込んだら
いいのかわかりません。

順序としましては、コンボックスで入力したデーターを(sheet2)のセルA1から下に順に格納していきたいのですが?

よろしければどなたか教えていただけたらありがたいです。

         お願いします。

【59871】Re:コンボックスについて教えてください
発言  マクロマン  - 09/1/14(水) 19:32 -

引用なし
パスワード
   コンボボックスに格納されているリストではなく、コンボボックスで選択されている
項目でもなくコンボボックスに入力した値ですか?

テキストボックスでも十分な気がしますが・・・。

Dim rw As Long
 If Worksheets("Sheet2").Cells(1, 1).Value = "" Then
   rw = 1
 Else
   rw = Worksheets("Sheet2").Cells(Worksheets("Sheet2").Cells.Rows.Count, 1).End(xlUp).Row + 1
 End If
 Worksheets("Sheet2").Cells(rw, 1).Value = Me.ComboBox1.Value

【59896】Re:コンボックスについて教えてください
お礼  POPO  - 09/1/15(木) 17:40 -

引用なし
パスワード
   ご丁寧にありがとうございました。
うまく動きました。

勉強になりました。
まだ、まだ初心者なものですから、少しづづ覚えて生きたいと思います。

今回は本当にありがとうございました。
また、よろしくお願いします。

3839 / 13645 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free