Note: The other languages of the website are Google-translated. Back to English

Excel에서 여러 확인란이있는 드롭 다운 목록을 만드는 방법은 무엇입니까?

많은 Excel 사용자는 시간당 목록에서 여러 항목을 선택하기 위해 여러 확인란이있는 드롭 다운 목록을 만드는 경향이 있습니다. 실제로 데이터 유효성 검사로 여러 확인란이있는 목록을 만들 수 없습니다. 이 자습서에서는 Excel에서 여러 확인란이있는 드롭 다운 목록을 만드는 두 가지 방법을 보여줍니다.

목록 상자를 사용하여 여러 확인란이있는 드롭 다운 목록 만들기
A : 소스 데이터로 목록 상자 만들기
B : 선택한 항목을 찾을 셀 이름
C : 선택한 항목을 출력하는 데 도움이되는 도형 삽입
놀라운 도구로 체크 박스가있는 드롭 다운 목록을 쉽게 생성
드롭 다운 목록에 대한 추가 자습서 ...


목록 상자를 사용하여 여러 확인란이있는 드롭 다운 목록 만들기

아래 스크린 샷과 같이 현재 워크 시트에서 A2 : A11 범위의 모든 이름이 목록 상자의 원본 데이터가됩니다. C4 셀의 버튼을 클릭하면 선택한 항목을 출력 할 수 있으며 목록 상자에서 선택한 모든 항목은 E4 셀에 표시됩니다. 이를 위해 다음과 같이하십시오.

A. 소스 데이터가있는 목록 상자 만들기

1. 클릭 개발자 > 끼워 넣다 > 목록 상자 (Active X 컨트롤). 스크린 샷보기 :

2. 현재 워크 시트에 목록 상자를 그리고 마우스 오른쪽 단추로 클릭 한 다음 등록 오른쪽 클릭 메뉴에서.

3. 에서 등록 대화 상자에서 다음과 같이 구성해야합니다.

  • 3.1에서 목록 채우기 범위 상자에 목록에 표시 할 소스 범위를 입력합니다 (여기서는 범위를 입력합니다 A2 : A11);
  • 3.2에서 목록 스타일 상자, 선택 1-fmList StyleOption;
  • 3.3에서 다중 선택 상자, 선택 1 – fmMultiSelectMulti;
  • 3.4 닫기 등록 대화 상자. 스크린 샷보기 :

B : 선택한 항목을 찾을 셀 이름

선택한 모든 항목을 E4와 같은 지정된 셀에 출력해야하는 경우 다음과 같이하십시오.

1. E4 셀을 선택하고 목록 상자 출력이름 상자 그리고 엔터 버튼 키.

C. 선택한 항목을 출력하는 데 도움이되는 도형 삽입

1. 클릭 끼워 넣다 > 모양 > 직사각형. 스크린 샷을 참조하십시오 :

2. 워크 시트에 사각형을 그립니다 (여기서는 C4 셀에 사각형을 그립니다). 그런 다음 직사각형을 마우스 오른쪽 버튼으로 클릭하고 매크로 지정 오른쪽 클릭 메뉴에서.

3. 에서 매크로 지정 대화 상자에서 신규클래스 버튼을 클릭합니다.

4. 오프닝에서 응용 프로그램 용 Microsoft Visual Basic 창에서 원래 코드를 바꾸십시오. 모듈 아래 VBA 코드로 창.

VBA 코드 : 여러 확인란이있는 목록 만들기

Sub Rectangle1_Click()
'Updated by Extendoffice 20200730
Dim xSelShp As Shape, xSelLst As Variant, I, J As Integer
Dim xV As String
Set xSelShp = ActiveSheet.Shapes(Application.Caller)
Set xLstBox = ActiveSheet.ListBox1
If xLstBox.Visible = False Then
    xLstBox.Visible = True
    xSelShp.TextFrame2.TextRange.Characters.Text = "Pickup Options"
    xStr = ""
    xStr = Range("ListBoxOutput").Value
    
    If xStr <> "" Then
         xArr = Split(xStr, ";")
    For I = xLstBox.ListCount - 1 To 0 Step -1
        xV = xLstBox.List(I)
        For J = 0 To UBound(xArr)
            If xArr(J) = xV Then
              xLstBox.Selected(I) = True
              Exit For
            End If
        Next
    Next I
    End If
Else
    xLstBox.Visible = False
    xSelShp.TextFrame2.TextRange.Characters.Text = "Select Options"
    For I = xLstBox.ListCount - 1 To 0 Step -1
        If xLstBox.Selected(I) = True Then
        xSelLst = xLstBox.List(I) & ";" & xSelLst
        End If
    Next I
    If xSelLst <> "" Then
        Range("ListBoxOutput") = Mid(xSelLst, 1, Len(xSelLst) - 1)
    Else
        Range("ListBoxOutput") = ""
    End If
End If
End Sub

참고 : 코드에서 직사각형 1 모양 이름입니다. ListBox1 목록 상자의 이름입니다. 옵션 선택픽업 옵션 모양의 표시된 텍스트입니다. 그리고 목록 상자 출력 출력 셀의 범위 이름입니다. 필요에 따라 변경할 수 있습니다.

5. 프레스 다른 + Q 키를 동시에 닫아 응용 프로그램 용 Microsoft Visual Basic 창.

6. 사각형 버튼을 클릭하면 목록 상자가 접히거나 확장됩니다. 목록 상자가 확장되면 목록 상자의 항목을 확인한 다음 사각형을 다시 클릭하여 선택한 모든 항목을 셀 E4로 출력합니다. 아래 데모를 참조하십시오.

7. 그런 다음 통합 문서를 Excel MacroEnable 통합 문서 나중에 코드를 재사용하기 위해.


놀라운 도구로 확인란이있는 드롭 다운 목록 만들기

위의 방법은 너무 다단계이므로 쉽게 처리 할 수 ​​없습니다. 여기에 적극 추천합니다 확인란이있는 드롭 다운 목록 ~의 유용성 용 Kutools 뛰어나다 필요에 따라 지정된 범위, 현재 워크 시트, 현재 통합 문서 또는 열려있는 모든 통합 문서의 확인란이있는 드롭 다운 목록을 쉽게 만들 수 있습니다. 아래 데모를 참조하십시오.
지금 다운로드하여 사용해보십시오! (30 일 무료 트레일)

위의 데모 외에도이 작업을 수행하기 위해이 기능을 적용하는 방법을 보여주는 단계별 가이드도 제공합니다. 다음과 같이하십시오.

1. 데이터 유효성 검사 드롭 다운 목록을 설정 한 워크 시트를 열고 쿠툴 > 드롭 다운 목록 > 확인란이있는 드롭 다운 목록 > 설정. 스크린 샷을 참조하십시오 :

2. 에서 확인란 설정이있는 드롭 다운 목록 대화 상자에서 다음과 같이 구성하십시오.

  • 2.1)에서 적용하다 섹션에서 드롭 다운 목록의 항목에 대한 확인란을 만들 적용 범위를 지정합니다. 지정할 수 있습니다 특정 범위, 현재 워크 시트, 현재 통합 문서 or 열린 모든 통합 문서 필요에 따라.
  • 2.2)에서 모드 섹션에서 선택한 항목을 출력하려는 ​​스타일을 선택하십시오.
  • 여기에 걸립니다 수정 예를 들어 옵션을 선택하면 선택한 항목에 따라 셀 값이 변경됩니다.
  • 2.3)에서 분리 기호 상자에 여러 항목을 구분하는 데 사용할 구분 기호를 입력하십시오.
  • 2.4)에서 텍스트 방향 섹션에서 필요에 따라 텍스트 방향을 선택하십시오.
  • 2.5) 클릭 OK 버튼을 클릭합니다.

3. 마지막 단계에서 쿠툴 > 드롭 다운 목록 > 확인란이있는 드롭 다운 목록 > 확인란 드롭 다운 목록 활성화 이 기능을 활성화합니다.

이제부터는 지정된 범위의 드롭 다운 목록이있는 셀을 클릭하면 목록 상자가 팝업되며, 아래 데모와 같이 셀에 출력 할 체크 박스를 체크하여 항목을 선택하세요. (수정 모드를 예로 들어 ).

이 기능에 대한 자세한 내용은 여기를 방문하십시오.

  이 유틸리티의 무료 평가판 (30 일)을 받으려면 그것을 다운로드하려면 클릭하십시오을 클릭 한 다음 위 단계에 따라 작업 적용으로 이동합니다.


관련 기사 :

Excel 드롭 다운 목록에 입력 할 때 자동 완성
큰 값이있는 데이터 유효성 검사 드롭 다운 목록이있는 경우 적절한 항목을 찾기 위해 목록에서 아래로 스크롤하거나 전체 단어를 목록 상자에 직접 입력해야합니다. 드롭 다운 목록에 첫 글자를 입력 할 때 자동 완성을 허용하는 방법이 있다면 모든 것이 더 쉬워 질 것입니다. 이 튜토리얼은 문제를 해결하는 방법을 제공합니다.

Excel의 다른 통합 문서에서 드롭 다운 목록 만들기
통합 문서 내의 워크 시트간에 데이터 유효성 검사 드롭 다운 목록을 만드는 것은 매우 쉽습니다. 그러나 데이터 유효성 검사에 필요한 목록 데이터가 다른 통합 문서에있는 경우 어떻게 하시겠습니까? 이 자습서에서는 Excel의 다른 통합 문서에서 드롭 fown 목록을 만드는 방법에 대해 자세히 알아 봅니다.

Excel에서 검색 가능한 드롭 다운 목록 만들기
값이 많은 드롭 다운 목록의 경우 적절한 값을 찾는 것은 쉬운 일이 아닙니다. 이전에는 드롭 다운 상자에 첫 글자를 입력 할 때 드롭 다운 목록을 자동 완성하는 방법을 도입했습니다. 자동 완성 기능 외에도 드롭 다운 목록에서 적절한 값을 찾을 때 작업 효율성을 높이기 위해 드롭 다운 목록을 검색 가능하게 만들 수도 있습니다. 드롭 다운 목록을 검색 가능하게 만들려면이 자습서의 방법을 시도하십시오.

Excel 드롭 다운 목록에서 값을 선택할 때 다른 셀 자동 채우기
셀 범위 B8 : B14의 값을 기반으로 드롭 다운 목록을 만들었다 고 가정 해 보겠습니다. 드롭 다운 목록에서 값을 선택할 때 셀 범위 C8 : C14의 해당 값이 선택한 셀에 자동으로 채워지기를 원합니다. 문제를 해결하기 위해이 튜토리얼의 방법이 도움이 될 것입니다.

드롭 다운 목록에 대한 추가 자습서 ...


최고의 사무 생산성 도구

Excel 용 Kutools는 대부분의 문제를 해결하고 생산성을 80 % 향상시킵니다.

  • 재사용: 빠르게 삽입 복잡한 공식, 차트 그리고 이전에 사용한 모든 것; 셀 암호화 암호로; 메일 링리스트 생성 이메일 보내기 ...
  • 슈퍼 포뮬러 바 (여러 줄의 텍스트와 수식을 쉽게 편집 할 수 있습니다.) 레이아웃 읽기 (많은 수의 셀을 쉽게 읽고 편집합니다.) 필터링 된 범위에 붙여 넣기...
  • 셀 / 행 / 열 병합 데이터 손실없이; 셀 내용 분할; 중복 행 / 열 결합... 중복 셀 방지; 범위 비교...
  • 중복 또는 고유 선택 행; 빈 행 선택 (모든 셀이 비어 있음); 슈퍼 찾기 및 퍼지 찾기 많은 통합 문서에서; 무작위 선택 ...
  • 정확한 사본 수식 참조를 변경하지 않고 여러 셀; 참조 자동 생성 여러 시트에; 글 머리 기호 삽입, 확인란 등 ...
  • 텍스트 추출, 텍스트 추가, 위치 별 제거, 공간 제거; 페이징 부분합을 만들고 인쇄합니다. 셀 내용과 주석 간 변환...
  • 슈퍼 필터 (다른 시트에 필터 구성표 저장 및 적용) 고급 정렬 월 / 주 / 일, 빈도 등 특수 필터 굵은 기울임 꼴로 ...
  • 통합 문서와 워크 시트 결합; 키 열을 기반으로 테이블 병합; 데이터를 여러 시트로 분할; xls, xlsx 및 PDF 일괄 변환...
  • 300 개 이상의 강력한 기능. Office / Excel 2007-2019 및 365를 지원합니다. 모든 언어를 지원합니다. 기업 또는 조직에 쉽게 배포 할 수 있습니다. 전체 기능 30 일 무료 평가판. 60 일 환불 보장.
kte 탭 201905

Office Tab은 Office에 탭 인터페이스를 제공하여 작업을 훨씬 쉽게 만듭니다.

  • Word, Excel, PowerPoint에서 탭 편집 및 읽기 사용, Publisher, Access, Visio 및 Project.
  • 새 창이 아닌 동일한 창의 새 탭에서 여러 문서를 열고 만듭니다.
  • 생산성을 50 % 향상시키고 매일 수백 번의 마우스 클릭을 줄입니다!
officetab 하단
코멘트 (67)
아직 평가가 없습니다. 가장 먼저 평가하세요!
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
환상적이다. 그러나 커서가 활성화된 위치에 다중 선택을 배치할 수 있으면 더 좋습니다. 반드시 코드가 지정하는 것은 아닙니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
이것이 바로 내가 찾던 것입니다. 선택한 데이터가 열 아래에 있는 별도의 셀에 표시되도록 코드를 수정할 수 있습니까? 그래서 대신 월요일, 화요일, 수요일, 다음으로 표시합니다. 월요일 화요일 수요일
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
이것은 내가 찾고 있던 것입니다. 목록 상자의 다음 선택 항목을 다음 줄에 넣는 코드 수정이 있습니까? 예를 들어 하나 둘 셋 대신: 하나, 둘, 셋
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
E4 셀에 ListBoxOutput을 추가한 방법을 설명해 주시겠습니까?
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕하세요 다중 셀에 대해 이 목록 상자를 복사하는 방법입니다. 그냥 복사 붙여넣기가 작동하지 않습니다. 예를 들어 각 셀(E5,E6,E7,E8,...)에서 이 선택 상자를 어떻게 배치할 수 있는지 설명해 주시겠습니까?
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
100행에 대해 이 목록 상자를 어떻게 쉽게 복사할 수 있는지 설명해 주시겠습니까? (100개 행 각각에 대해 별도의 목록 상자)
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
출력이 완료되고 다시 버튼을 누르면 목록 상자에서 이전에 선택한 항목을 변경할 수 없습니다. 해결 방법?
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
고맙습니다! 훌륭하고 작동합니다!
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
저는 이것에 대한 초보자이지만 예를 들어 이름을 선택할 때 열리는 다중 선택 ListBox를 만드는 방법을 알려줄 수 있는 사람이 있습니까? 목록 상자가 하나의 크기에 맞도록 하고 싶습니다.
예: 연락처 정보 등이 포함된 이름 목록이 있습니다. 내 목록의 각 이름에 대해 중복 목록 상자를 만들고 싶습니다. 이름을 선택할 때 자동으로 열리고 다른 정보 행으로 이동할 때 셀로 축소되기를 원합니다. 조언 부탁드립니다. 미리 감사드립니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
친애하는 랜디,
죄송합니다 이 문제를 해결할 수 없습니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
지침에 따라 완벽하게 작동하지만 시트를 보호하면 오류가 발생합니다. 이에 대한 해결 방법이 있습니까?
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
지침에 따라 완벽하게 작동합니다. 그러나 보호 시트에서 이것을 어떻게 사용할 수 있습니까? 현재 시트를 보호한 후 이것을 사용하면 "런타임 오류 '-2147024809(80070057)': 지정된 값이 범위를 벗어났습니다"라는 오류가 발생합니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
친애하는 Amit Sood,
워크시트를 보호하기 전에 출력 셀을 잠금 해제된 형식으로 지정한 다음 아래 VBA 코드를 적용하십시오. 당신의 의견에 감사드립니다.

하위 Rectangle2_Click()
Dim xSelShp As Shape, xSelLst As Variant, I As Integer
오류에 대한 다음 재개
xSelShp = ActiveSheet.Shapes(Application.Caller) 설정
xLstBox = ActiveSheet.ListBox1 설정
xLstBox.Visible = False이면
xLstBox.Visible = 참
xSelShp.TextFrame2.TextRange.Characters.Text = "픽업 옵션"
다른
xLstBox.Visible = 거짓
xSelShp.TextFrame2.TextRange.Characters.Text = "옵션 선택"
I = xLstBox.ListCount - 1에서 0으로 단계 -1의 경우
xLstBox.Selected(I) = True이면
xSelLst = xLstBox.List(I) & ";" & xSelLst
END IF
다음
xSelLst <> ""이면
범위("ListBoxOutput") = 중간(xSelLst, 1, Len(xSelLst) - 1)
다른
범위("목록 상자 출력") = ""
END IF
END IF
최종 하위
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
"설명한 대로 ActiveX 목록 상자를 사용하여 파일을 만들었습니다. 거기에 일부 데이터를 입력하고 일부 속성도 추가했습니다. 목록의 확인란을 사용하여 일부 데이터를 확인하고 파일을 저장하고 종료했습니다. 하지만 파일을 다시 열면 확인된 데이터가 표시되지 않습니다. 업데이트를 저장하도록 제안할 수 있는 사람이 있습니까?"
아무도 도와주세요.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
좋은 날,
ThisWorkbook 코드 창에 아래 VBA 코드를 삽입하십시오.
코드에서 Sheet6은 아래 스크린샷과 같이 선택 항목을 유지하려는 목록 상자가 포함된 워크시트의 기본 이름입니다. 그리고 ListBox1은 목록 상자의 이름입니다. 필요에 따라 변경하십시오.

Private Sub Workbook_BeforeSave(ByVal SaveAsUI를 부울로, 취소를 부울로)
SaveSelections 호출
최종 하위

개인 서브 Workbook_Open ()
Call RestoreSelections
최종 하위

개인 하위 SaveSelections()

Dim arr() As Variant, i As Long, j As Long

Sheet6.OLEObjects("ListBox1").Object 사용
.ListIndex > 0이면
i = 0에서 .ListCount - 1까지
If .Selected(i) 다음
j = j + 1
ReDim 보존 arr(1에서 j까지)
arr(j) = 나
END IF
다음
Names.Add Name:="Selections", RefersTo:=arr, Visible:=False
END IF


최종 하위

Private Sub RestoreSelections()

Dim rr As Variant, i As Integer

arr = [선택]

Sheet6.OLEObjects("ListBox1").Object 사용
i = 1 UBound(arr)까지
.Selected(arr(i)) = 참
다음


최종 하위
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
답장을 보내주셔서 감사합니다. 하지만 내 파일의 경우 작동하지 않습니다. 내 파일을 우편으로 보낼 수 있도록 메일 ID를 보내 주시겠습니까?
미리 감사드립니다
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
친애하는 만주샤 이삭,
파일을 zxm@addin99.com으로 보내주십시오. 내가 도울 수 있기를 바랍니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
또한 통합 문서를 Excel 매크로 사용 통합 문서로 저장하고 목록 상자의 선택 항목을 변경할 때마다 코드를 활성화해야 합니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
다른 열의 이름을 자동으로 업데이트하고 싶습니다. 가능한 경우 코드를 친절하게 공유할 수 있습니까?
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
놀랍게도 작동하지만 Excel을 닫고 다시 열면 확인란의 체크가 사라지므로 버튼을 클릭하면 모든 목록이 사라집니다.
누가 좀 도와주세요
고급에 너무 감사합니다
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
친애하는 천사,
"Excel에서 ActiveX 목록 상자 선택을 저장하거나 유지하는 방법" 기사를 게시했습니다. 통합 문서를 닫았다가 다시 연 후 목록 상자 선택을 저장하는 방법을 소개합니다.
이 링크를 따라가면 더 많은 정보를 얻을 수 있습니다: https://www.extendoffice.com/documents/excel/5051-excel-listbox-save-selection.html
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
작동하는 것이 놀랍지만 파일을 저장하고 다시 열면 한 가지 문제가 있습니다. 확인란 목록의 모든 확인이 모두 사라졌습니다.
이 일을 도와줄 수 있습니까? 정말 감사합니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
또한 누군가가이 문제에 대한 해결책을 가지고 있다면 파일을 저장하고 다시 연 후 항상 목록 상자와 모양의 크기를 변경합니다. 저를 도와주세요

감사
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
친애하는 마크,
"Excel에서 ActiveX 목록 상자 선택을 저장하거나 유지하는 방법" 기사를 게시했습니다. 통합 문서를 닫았다가 다시 연 후 목록 상자 선택을 저장하는 방법을 소개합니다.
이 링크를 따라가면 더 많은 정보를 얻을 수 있습니다: https://www.extendoffice.com/documents/excel/5051-excel-listbox-save-selection.html
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕하세요

픽업 옵션을 둘 이상의 셀(E4뿐만 아니라)로 지정하거나 체크리스트에서 여러 옵션을 선택할 수 있도록 선택 항목을 드롭다운 체크리스트로 만드는 방법이 있는지 궁금합니다. 내가 만든 다른 선택. 예를 들어, 동일한 픽업 목록에서 E5, E6, E7 등에 다른 항목 선택을 입력하기 위해 동일한 픽업 옵션 목록을 사용하는 방법은 무엇입니까?

고맙습니다
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕하세요 리즈캣츠입니다.
아래 코드를 시도하십시오. 내가 도울 수 있기를 바랍니다. 고맙습니다.

하위 Rectangle2_Click()

'에 의해 업데이트됨 Extendoffice 20200529

Dim xSelShp As Shape, xSelLst as Variant, i As Integer

xSelShp = ActiveSheet.Shapes(Application.Caller) 설정

xLstBox = ActiveSheet.ListBox1 설정

범위로 Dim xRg

Dim xCount, xFNum, xR, xC를 정수로

Dim xStr을 문자열로

xLstBox.Visible = False이면

xLstBox.Visible = 참

xSelShp.TextFrame2.TextRange.Characters.Text = "픽업 옵션"

다른

xLstBox.Visible = 거짓

xSelShp.TextFrame2.TextRange.Characters.Text = "옵션 선택"

xRg 설정 = Range("ListBoxOutput")

xCount = xLstBox.ListCount - 1

xStr = ""

i = xLstBox.ListCount - 1 ~ 0 단계 -1의 경우

xLstBox.Selected(i) = True이면

xStr = xLstBox.List(i) & ";" & xStr

END IF

다음 i



xRg.Value = ""이면

xRg.값 = xStr

다른

xRg = xRg.Offset(1, 0) 설정

Do While xRg.Value <> ""

xRg = xRg.Offset(1, 0) 설정

고리

xRg.값 = xStr

END IF

END IF

최종 하위
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
잘 작동하고 있습니다. 많은 도움을 주셔서 감사합니다. 여기서 한 가지 문제가 있습니다. 모든 출력이 동일한 셀 E4에서 발생합니다. 어떻게 다른 셀에서 출력을 얻을 수 있습니까? 예: E4의 C4, E5의 C5, E6의 C6 등
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
좋은 날,
말씀하신 문제는 아직 해결할 수 없습니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
Добрый день! 감사합니다.
Как сделать так чтобы каждое значение выходило на новой клетке? чтобы по выходило по вертикали?
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
돕다!!! 다른 범위에서 어떻게 출력합니까(수직)?
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
하위 Rectangle2_Click()
'에 의해 업데이트됨 Extendoffice 20190924
Dim xSelShp As Shape, xSelLst As Variant, I As Integer
범위로 Dim xRg
xSelShp = ActiveSheet.Shapes(Application.Caller) 설정
xLstBox = ActiveSheet.ListBox1 설정
xLstBox.Visible = False이면
xLstBox.Visible = 참
xSelShp.TextFrame2.TextRange.Characters.Text = "픽업 옵션"
다른
xLstBox.Visible = 거짓
xSelShp.TextFrame2.TextRange.Characters.Text = "옵션 선택"
xRg 설정 = Range("ListBoxOutput")
I = 0에서 xLstBox.ListCount - 1로
xLstBox.Selected(I) = True이면
xSelLst = xLstBox.List(I)
xRg.Value = 중간(xSelLst, 1, Len(xSelLst))
xRg = xRg.Offset(1, 0) 설정
END IF
다음
END IF
최종 하위
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
Como puedo replicar éste ejercicio en las filas loweres ?
아래 행에서 이 연습을 어떻게 복제할 수 있습니까?
아직 코멘트가 없습니다
더보기
여러분의 의견을 남겨
게스트로 게시
×
이 게시물 평가 :
0   등장 인물
추천 위치