콘텐츠
VBA 폼의 확인란과 함께 ListView 컨트롤을 사용하면 옵션을 사용자에게 제공하여 응용 프로그램을보다 동적으로 만들 수 있습니다. ListView는 4 가지 뷰 중 하나를 사용하여 항목을 표시하고 Microsoft Excel 헤더가 있거나없는 열에 정렬합니다. 항목을 추가하려면 "ListItems.Add"속성을 사용하고 사용자가 어떤 항목을 선택했는지 확인하려면 "선택"하십시오.
지침
VBA를 사용하여 Excel에서 ListView 컨트롤 채우기 (Hemera Technologies / Photos.com / Getty Images)-
Microsoft Excel을 열고 "개발자"탭을 클릭 한 다음 "Visual Basic"을 클릭하여 VBA 편집기 창을 엽니 다. "삽입"메뉴를 클릭 한 다음 "사용자 정의 폼"(사용자 폼)을 클릭하여 새 폼을 만듭니다. "도구," "추가 컨트롤"을 클릭하고 "Microsoft ListView Control"(Microsoft ListView 컨트롤) 옆의 확인란을 선택하여 새 "ListView"컨트롤을 폼에 추가합니다.
-
"ListView"컨트롤을 마우스 오른쪽 버튼으로 클릭 한 다음 "속성"을 클릭하십시오. 창을 아래로 스크롤하고 "확인란"옵션 옆의 "참"을 선택하십시오. "도구 상자"창에서 "명령 단추"를 클릭 한 다음 폼에 새 단추를 추가하십시오. 동일한 단계를 사용하여 두 번째 단추를 추가하십시오.
-
"CommandButton1"을 두 번 클릭하여 해당 버튼에 대한 새 이벤트를 만듭니다. 세 가지 항목이있는 인기있는 "ListBox"코드에 다음 코드를 추가합니다.
Me.ListView1.ListItems.Add (1) = "항목 1 확인"Me.ListView1.ListItems.Add (2) = "항목 2 확인"Me.ListView1.ListItems.Add (3) = "항목 3 확인"
-
양식으로 돌아가서 "CommandButton2"를 두 번 클릭하여 해당 버튼에 대한 새 클릭 이벤트를 만듭니다. 다음 코드를 추가하여 "ListBox"항목을 살펴보고 "Immediate"창에서 선택한 항목을 표시합니다.
For counter = 1 To Me.ListView1.ListItems.Count If Me.ListView1.ListItems.Item (카운터) .Checked Then Debug.Print Me.ListView1.ListItems.Item (counter) .Text End If 다음
-
양식으로 돌아가서 "F5"를 클릭하여 프로그램을 실행하십시오. 그런 다음 "CommandButton1"을 클릭하여 "ListView"컨트롤을 채운 다음 "CommandButton2"를 클릭하여 선택한 항목을 표시합니다.
필요한 것
- Microsoft Excel