Excel VBA質問箱 IV

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

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


10548 / 13644 ツリー ←次へ | 前へ→

【21157】listbox に 配列 追加 VBAトーシロ 05/1/13(木) 15:48 質問[未読]
【21158】Re:listbox に 配列 追加 Jaka 05/1/13(木) 16:04 回答[未読]
【21160】Re:listbox に 配列 追加 IROC 05/1/13(木) 16:07 回答[未読]
【21161】Re:listbox に 配列 追加 VBAトーシロ 05/1/13(木) 16:19 質問[未読]
【21163】Re:listbox に 配列 追加 Jaka 05/1/13(木) 16:54 回答[未読]
【21166】Re:listbox に 配列 追加 VBAトーシロ 05/1/13(木) 17:12 質問[未読]
【21184】Re:listbox に 配列 追加 Jaka 05/1/14(金) 9:52 回答[未読]
【21189】Re:listbox に 配列 追加 VBAトーシロ 05/1/14(金) 12:18 お礼[未読]

【21157】listbox に 配列 追加
質問  VBAトーシロ  - 05/1/13(木) 15:48 -

引用なし
パスワード
   dim 変数(0 to 14) as Valiant
'と変数宣言して
for i = 0 to 14
  変数(i) = listbox1.list(0,i)
next

'こんな感じで変数に15個データを入れます。
'そしてこのデータを

for i = 0 to 14
  listbox2.list(0,i) = 変数(i)
next

といった感じでデータをコピーしたいと思いますが、
エラーが発生します。

誰かいい方法を教えてください。

【21158】Re:listbox に 配列 追加
回答  Jaka  - 05/1/13(木) 16:04 -

引用なし
パスワード
   こんにちは。

> for i = 0 to 14
>  listbox2.list(0,i) = 変数(i)
> next

これだけでよくないですか?
listbox2.list = 変数

【21160】Re:listbox に 配列 追加
回答  IROC  - 05/1/13(木) 16:07 -

引用なし
パスワード
   AddItem を使っては如何でしょうか?

for i = 0 to 14
  listbox2.additem 変数(i)
next

【21161】Re:listbox に 配列 追加
質問  VBAトーシロ  - 05/1/13(木) 16:19 -

引用なし
パスワード
   ▼IROC さん:
▼Jaka さん:
ありがとうございます!

入るには、はいったのですが・・・。
縦方向に入ったりして。
できれば横方向に入れたいのですが
そういう方法ってあるのでしょうか?

ワケの分からない質問してすいません。

【21163】Re:listbox に 配列 追加
回答  Jaka  - 05/1/13(木) 16:54 -

引用なし
パスワード
   listbox2.ColumnCount = 5
listbox2.ColumnWidths = "30;30;30;30;30" '列間隔、適当に直してね。
listbox2.Column = 変数

【21166】Re:listbox に 配列 追加
質問  VBAトーシロ  - 05/1/13(木) 17:12 -

引用なし
パスワード
   ▼Jaka さん:
>listbox2.ColumnCount = 5
>listbox2.ColumnWidths = "30;30;30;30;30" '列間隔、適当に直してね。
>listbox2.Column = 変数

入りました! ありがとうございます。

そこで、すいませんが又新しい質問があるのですが、
一度上記の用にデータをlistbox2 に入れた後、
変数の中身のデータを変えて
listbox2にあるデータに1段下げて、データを
加える場合には一体どうすればよいのでしょうか?

listbox2.additem 変数 で2段目だけ追加みたいな
ことができれば良かったのですが。
なかなかできません。

【21184】Re:listbox に 配列 追加
回答  Jaka  - 05/1/14(金) 9:52 -

引用なし
パスワード
   配列を作り直して、Listに当てはめてください。

【21189】Re:listbox に 配列 追加
お礼  VBAトーシロ  - 05/1/14(金) 12:18 -

引用なし
パスワード
   ▼Jaka さん:
>配列を作り直して、Listに当てはめてください。

ありがとうございます。
ヒントをいただいたおかげでできました。
配列にlistbox2のデータを格納し、
それに追加して行く形で処理できました。

またよろしくお願いします。

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