コンテンツ
VBAフォームのチェックボックスでListViewコントロールを使用すると、ユーザーにオプションを提供することでアプリケーションをより動的にすることができます。 ListViewは、4つの異なるビューのいずれかを使用して項目を表示し、Microsoft Excelヘッダーの有無にかかわらず列に並べます。項目を追加するには "ListItems.Add"プロパティを使用し、ユーザーが選択した項目を確認するには "Checked"を使用します。
説明書
VBAを使用してExcelでListViewコントロールに入力する (Hemera Technologies / Photos.com / Getty Images)-
Microsoft Excelを開き、「開発者」タブをクリックしてから「Visual Basic」をクリックしてVBAエディタウィンドウを開き、「挿入」メニューをクリックしてから「UserForm」(ユーザーフォーム)をクリックして新しいフォームを作成します。 [ツール]、[追加のコントロール]の順にクリックし、[Microsoft ListView Control](Microsoft ListViewコントロール)の横にあるボックスをオンにして、新しい "ListView"コントロールをフォームに追加します。
-
「ListView」コントロールを右クリックしてから「Properties」を右クリックします。ウィンドウを下にスクロールして、[チェックボックス]オプションの横にある[True]を選択します。 [ツールボックス]ペインの[コマンドボタン]をクリックし、次にフォーム上で新しいボタンを追加します。同じ手順で2番目のボタンを追加します。
-
「CommandButton1」をダブルクリックしてそのボタンの新しいイベントを作成します。次のコードを3つのアイテムを含む人気のある "ListBox"に追加します。
Me.ListView1.ListItems.Add(1)= "チェック項目1" Me.ListView1.ListItems.Add(2)= "チェック項目2" Me.ListView1.ListItems.Add(3)= "チェック項目3"
-
フォームに戻り、 "CommandButton2"をダブルクリックしてそのボタンの新しいクリックイベントを作成します。次のコードを追加して「ListBox」項目を調べ、選択した項目を「イミディエイト」ウィンドウに表示します。
counter = 1の場合Me.ListView1.ListItems.Countの場合Me.ListView1.ListItems.Item(counter)。チェックした後Debug.Print Me.ListView1.ListItems.Item(counter)の場合。
-
フォームに戻って「F5」をクリックしてプログラムを実行してください。次に、[CommandButton1]をクリックして[ListView]コントロールを作成し、次に[CommandButton2]をクリックして選択した項目を表示します。
必要なもの
- マイクロソフトエクセル