Excel (VBA)

Excel VBAに関するフォーラムです。
  • 解決済みのトピックにはコメントできません。
このトピックは解決済みです。
質問

 
(Windows 8 : Excel 2013)
データ選択について
投稿日時: 18/05/23 09:40:14
投稿者: oka2018

ユーザーフォームにて、A3〜A500に入力した数字を選択し、シートに記入したいと思っております。
一つだけ選択した場合は、下記のようで取り敢えず出来ました。
 
Private Sub 実行_Click()
 On Error GoTo err
 Range("O13").Value = ComboBox1.List(ComboBox1.ListIndex)
err:
End Sub
 
また、不連続で選択も出来るといいです。宜しくお願い致します。

回答
投稿日時: 18/05/23 11:26:57
投稿者: mattuwan44

コンボボックスを使うなら、
 
コンボボックスは選択肢から選択したものが、上のテキストボックスに入る仕様なので、
複数選択することは想定されていません。
 
複数選択するなら、リストボックスを使ってください。
別のユーザーフォームにリストボックスを配置し必要な時にポップアップするようにしたらいいと思います。
 
参考URL>>
http://www.eurus.dti.ne.jp/~yoneyama/Excel/vba/vba_userform03b.html

回答
投稿日時: 18/05/23 18:21:14
投稿者: WinArrow
投稿者のウェブサイトに移動

>また、不連続で選択も出来るといいです。
 
不連続で選択
とは、どのような操作ですか?
 
受取側のセルは、常に固定なんですか?
 
もう一つ、エラートラップは、何のための措置ですか?

投稿日時: 18/05/25 10:54:06
投稿者: oka2018

すみません、大変遅くなりました。
 
解決できました。有難うございます。