そのリストボックスコントロールの RowSource を変更した場合に RowSource や ListBox.ListCount の 値は正常に変更されるのにリストボックスの内容が更新されない問題もあります。 ボタンなどから更新したときは正常に動作するのですが。 prettyprint コピー Private Sub CommandButton1_Click(...
ForEachemployeeDataInemployeeList'部署ごとで振り分けるIfdic.Exists(employeeData.Department)ThenSetlist=dic(employeeData.Department)' キー既に存在した場合は、Dictionaryから中身を取り出すElseSetlist=NewCollection' キーが存在しない場合は初期化するEndIflist.AddemployeeData' 値を追加するSetdic(employee...