XL2000: 목록 상자나 콤보 상자에 모든 항목 제거 방법

중요: 본 문서는 전문 번역가가 번역한 것이 아니라 Microsoft 기계 번역 소프트웨어로 번역한 것입니다. Microsoft는 번역가가 번역한 문서 및 기계 번역된 문서를 모두 제공하므로 Microsoft 기술 자료에 있는 모든 문서를 한글로 접할 수 있습니다. 그러나 기계 번역 문서가 항상 완벽한 것은 아닙니다. 따라서 기계 번역 문서에는 마치 외국인이 한국어로 말할 때 실수를 하는 것처럼 어휘, 구문 또는 문법에 오류가 있을 수 있습니다. Microsoft는 내용상의 오역 또는 Microsoft 고객이 이러한 오역을 사용함으로써 발생하는 부 정확성, 오류 또는 손해에 대해 책임을 지지 않습니다. Microsoft는 이러한 문제를 해결하기 위해 기계 번역 소프트웨어를 자주 업데이트하고 있습니다.

213721
이 문서가 보관되었습니다. "그대로" 제공되었으며, 업데이트가 되지 않을 것입니다.
요약
목록 상자나 콤보 상자에 컨트롤에 사용자 정의 폼에 있는 모든 항목을 제거하는 데 사용할 수 있는 단일 방법이 없습니다. 항목을 제거하는 데 사용할 메서드를 워크시트에 목록 상자나 콤보 상자에 컨트롤이 바인딩되어 있는지 여부에 달라집니다. 이 문서에서는 바인딩된 샘플 컨트롤에서 항목 제거 예가 포함되어 워크시트 예제 즉 않는 제어 및 워크시트에 바인딩된.
추가 정보
Microsoft을 배제하며 제한되지 않은 묵시적된 보증 (상품성 및 특정 목적에의 적합성에 대한 묵시적인, 목적으로만 프로그래밍 예제를 제공합니다. 이 문서에서는 프로시저를 작성하고 디버깅하는 데 사용되는 도구 및 여기서 설명하는 프로그래밍 언어에 익숙한 사용자를 대상으로 합니다. Microsoft 기술 지원 담당자는 특정 절차에 대한 기능을 설명할 수 있지만 추가 기능을 제공하거나 특정 요구 사항에 맞도록 프로시저를 구성하지는 이 예제를 수정하지 않습니다.
프로그래밍 경험이 제한되어 있으면 Microsoft 인증 파트너 문의하거나 Microsoft 자문 서비스 할 수 있습니다. 자세한 내용은 다음 Microsoft 웹 사이트를 방문하십시오.

Microsoft 파트너 - https://partner.microsoft.com/global/30000104 인증

Microsoft 권고 서비스 - http://support.microsoft.com/gp/advisoryservice

사용할 수 있는 지원 옵션 및 Microsoft 연락하는 방법에 대한 자세한 내용은 다음 Microsoft 웹 사이트를 방문하십시오: http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMS

목록 상자나 콤보 상자에 워크시트에 바운드 여부 제어

워크시트에 바인딩된 ListBox 컨트롤이 포함된 사용자 정의 폼 예제 빌드 및 다음 컨트롤에서 항목을 제거하려면 다음과 같이 하십시오.
  1. 닫기 및 열려 있는 모든 통합 문서를 저장하고 통합 문서를 새로 만듭니다.
  2. 다음 값을 Sheet1의 입력합니다:
           A1: Alpha       A2: Bravo       A3: Charlie       A4: Delta       A5: Echo					
  3. Alt + F11 키를 눌러 VBA 편집기를 시작하십시오.
  4. 속성 창이 보이지 않으면 보기 메뉴에서 속성 을 클릭합니다 (또는 F4 키를 누릅니다).
  5. 프로젝트 탐색기 창이 표시되지 않으면 보기 메뉴에서 프로젝트 탐색기 를 클릭하십시오.
  6. 삽입 메뉴에서 사용자 정의 폼 을 클릭하십시오.
  7. UserForm을 ListBox 컨트롤을 그립니다.
  8. F4 키를 눌러 속성 창으로 전환하십시오.
  9. ListBox 컨트롤의 RowSource 속성을 다음 값으로 변경하십시오.
    Sheet1! A1: A5
  10. UserForm을명령 단추 컨트롤을 그립니다.
  11. CommandButton에 대한 코드 창을 열려면 명령 단추 두 번 클릭하십시오.
  12. 모듈에서 CommandButton Click 이벤트에 다음 코드를 입력합니다:
    Private Sub CommandButton1_Click()    ListBox1.RowSource = ""End Sub					
  13. 사용자 정의 폼 을 실행하십시오.

    UserForm 을 위해 추가된 목록 상자는 Sheet1에서 입력한 값으로 채워집니다.
  14. 명령 단추 를 클릭하십시오.
모든 항목을 ListBox1에서 제거됩니다.

목록 상자나 워크시트에 바운드 Is Not 콤보 상자에

UserForm 을 로드되면 값의 배열을 채울 ListBox 컨트롤이 포함된 사용자 정의 폼 예제 빌드 및 컨트롤에서 항목을 제거하려면 다음 이 단계를 수행하십시오.
  1. 닫기 및 열려 있는 모든 통합 문서를 저장하고 통합 문서를 새로 만듭니다.
  2. Alt + F11 키를 눌러 VBA 편집기를 시작하십시오.
  3. 속성 창이 보이지 않으면 보기 메뉴에서 속성 을 클릭합니다 (또는 F4 키를 누릅니다).
  4. 삽입 메뉴에서 사용자 정의 폼 을 클릭하십시오.
  5. 사용자 정의 폼에 대한 코드 창을 열려면 UserForm을 두 번 클릭하십시오.
  6. 모듈에서 UserForm 을 Initialize 이벤트에 대한 다음 코드를 입력합니다:
    Private Sub UserForm_Initialize()    Dim MyArray As Variant    Dim i As Integer    'Initialize array with values to populate ListBox.    MyArray = Array("Alpha", "Bravo", "Charlie", "Delta","Echo")    For i = LBound(MyArray) To Ubound(MyArray)        'Add a value from MyArray to ListBox1.        UserForm1.ListBox1.AddItem MyArray(i)    NextEnd Sub						
    사용자 정의 폼 을 로드할 때 이 절차는 ListBox1 채웁니다.
  7. UserForm을 ListBox 컨트롤을 그립니다.
  8. UserForm을명령 단추 컨트롤을 그립니다.
  9. CommandButton에 대한 코드 창을 열려면 명령 단추 두 번 클릭하십시오.
  10. 모듈에서 다음 코드에 대한 CommandButton 입력합니다 Click 이벤트:
    Private Sub CommandButton1_Click()    Dim i As Integer    For i = 1 To ListBox1.ListCount        'Remove an item from the ListBox.        ListBox1.RemoveItem 0    Next iEnd Sub						
    이 Visual Basic 프로시저를 ListBox1 보낸 항목을 모두 제거합니다.
  11. 사용자 정의 폼 을 실행하십시오.
  12. 명령 단추 를 클릭하십시오.
모든 항목을 ListBox1에서 제거됩니다.
참조
Visual Basic 편집기에서 ListBox 컨트롤을 사용하는 방법에 대한 자세한 내용은 도움말 메뉴에서 Microsoft Visual Basic 도움말 을, ListBox 컨트롤 을 Office 길잡이나 도움말 마법사에서 입력한 다음 항목을 보려면 검색 을 누릅니다.

Visual Basic 편집기에서 RowSource 속성을 사용하는 방법에 대한 자세한 내용은 도움말 메뉴에서 Microsoft Visual Basic 도움말 을, Office 길잡이나 도움말 마법사에서 Rowsource 속성 을 입력한 다음 항목을 검색 을 클릭하십시오.

Visual Basic 편집기에서 RemoveItem 메서드를 사용하는 방법에 대한 자세한 내용은 도움말 메뉴에서 Microsoft Visual Basic 도움말 을, removeitem 메서드 를 Office 길잡이나 도움말 마법사에서 입력한 다음 항목을 보려면 검색 을 누릅니다.

xl2000

경고: 이 문서는 자동으로 번역되었습니다.

속성

문서 ID: 213721 - 마지막 검토: 12/05/2015 12:17:47 - 수정: 3.5

Microsoft Excel 2000 Standard Edition

  • kbnosurvey kbarchive kbmt kbhowto kbprogramming kbui KB213721 KbMtko
피드백