Excel VBA質問箱 IV

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

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


14848 / 76734 ←次へ | 前へ→

【67374】Re:List Viewについて
お礼  まい  - 10/11/29(月) 10:21 -

引用なし
パスワード
   ▼Jaka さん:

アドバイスありがとうございます
やっぱり、地道にアイテム行を検索しつつ反映させる方法でいこうと
思っています

いろいろと教えていただいてありがとうございました
助かりました


>▼まい さん:
>>一つききたいのですが、
>>リストに反映させる場合は、やはり、一から対称アイテムの行を検索して、
>>値を入力させるといった形になるのでしょうか?
>>そういうやり方しかないのでしょうか?
>>毎回、チェックしたアイテムを一つ一つ探しにいって、値を代入させるのは、時間もかかりそうで・・・
>
>その方がいいですよ。
>たいした時間でもないと思うし。
>
>無理やりなら、配列に入れておくとか。
>ただ、これだと配列のクリアのタイミングとか、チェックを外した時とか、
>色々考えないとならないから、私ならやりません。
>あ、都度配列を拡張しないで、あらかじめリストアイテム分の配列を作っておけば、
>配列のインデックスとリストインデックスが一致するから?(+1が必要かも)
>それなりに出来るでしょうが、やっぱりやりません。
>
>Dim ItemTb() As Long, Tbub As Long
>
>Private Sub ListView1_ItemCheck(ByVal Item As MSComctlLib.ListItem)
>On Error Resume Next
>Tbub = UBound(ItemTb)
>If Err Then
>  Tbub = 1
>End If
>ReDim Preserve ItemTb(1 To Tbub)
>ItemTb(Tbub) = Item.Index
>'MsgBox Item.Index
>End Sub

1 hits

【67311】List Viewについて まい 10/11/23(火) 14:24 質問
【67312】Re:List Viewについて まい 10/11/23(火) 15:26 質問
【67315】Re:List Viewについて neptune 10/11/23(火) 21:30 回答
【67329】Re:List Viewについて まい 10/11/25(木) 13:05 質問
【67334】Re:List Viewについて neptune 10/11/25(木) 19:12 発言
【67343】Re:List Viewについて まい 10/11/26(金) 14:33 発言
【67346】Re:List Viewについて neptune 10/11/26(金) 18:19 発言
【67373】Re:List Viewについて まい 10/11/29(月) 10:18 お礼
【67341】Re:List Viewについて Jaka 10/11/26(金) 9:23 発言
【67344】Re:List Viewについて まい 10/11/26(金) 14:54 質問
【67345】Re:List Viewについて Jaka 10/11/26(金) 16:48 発言
【67374】Re:List Viewについて まい 10/11/29(月) 10:21 お礼

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