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

Excel의 드롭 다운 목록을 사용하여 셀 위에 복사 및 붙여 넣기를 방지하는 방법은 무엇입니까?

데이터 유효성 검사 드롭 다운 목록이있는 셀의 경우 다른 셀에서 콘텐츠를 복사하여 붙여 넣으면 드롭 다운 목록이 사라지고 새 붙여 넣기 콘텐츠로 바뀝니다. 경우에 따라 드롭 다운 목록이있는 셀 위에 다른 내용을 복사하여 붙여 넣는 것을 방지하고 싶습니다. 어떻게 처리 하시겠습니까? 이 기사에서는이 문제를 처리하는 VBA 방법에 대해 설명합니다.

Excel의 드롭 다운 목록을 사용하여 셀 위에 복사 및 붙여 넣기 방지


Excel의 드롭 다운 목록을 사용하여 셀 위에 복사 및 붙여 넣기 방지

1. 복사 및 붙여 넣기를 방지 할 드롭 다운 목록 셀이있는 워크 시트를 엽니 다.

2. 프레스 다른 + F11 동시에 열려면 키 Microsoft Visual Basic 애플리케이션 창.

3. 에서 Microsoft Visual Basic 애플리케이션 창에서 왼쪽 창에서 현재 워크 시트 이름을 두 번 클릭 한 다음 아래 VBA 코드를 복사하여 코드 편집기에 붙여 넣습니다. 스크린 샷보기 :

VBA 코드 : 드롭 다운 목록으로 셀 위에 복사 및 붙여 넣기 방지

Private Sub Worksheet_Change(ByVal Target As Range)
'Updated by Extendoffice 20200903
    Dim xValue As String
    Dim xCheck1 As String
    Dim xCheck2 As String
    Dim xRg As Range
    Dim xArrCheck1() As String
    Dim xArrCheck2() As String
    Dim xArrValue()
    Dim xCount, xJ As Integer
    Dim xBol As Boolean
'    If Target.Count > 1 Then
'        Exit Sub
'        End If
    xCount = Target.Count
    ReDim xArrCheck1(1 To xCount)
    ReDim xArrCheck2(1 To xCount)
    ReDim xArrValue(1 To xCount)
    Application.EnableEvents = False
    On Error Resume Next
    xJ = 1
    For Each xRg In Target
        xArrValue(xJ) = xRg.Value
         xArrCheck1(xJ) = xRg.Validation.InCellDropdown
        xJ = xJ + 1
    Next

    Application.Undo

    xJ = 1
    For Each xRg In Target
        xArrCheck2(xJ) = xRg.Validation.InCellDropdown
        xJ = xJ + 1
    Next

    xBol = False
    For xJ = 1 To xCount
        If xArrCheck2(xJ) <> xArrCheck1(xJ) Then
            xBol = True
            Exit For
        End If
    Next

    If xBol Then
       MsgBox "The selected cells containg data validation drop-down lists, no pasting allowed."
    Else
        xJ = 1
        For Each xRg In Target
            xRg.Value = xArrValue(xJ)
            xJ = xJ + 1
        Next

    End If

    Application.EnableEvents = True
End Sub

4. 프레스 다른 + Q 나가는 열쇠 Microsoft Visual Basic 애플리케이션 창.

5. 드롭 다운 목록이있는 셀에 내용을 붙여 넣으면 붙여 넣기가 허용되지 않음을 알리는 대화 상자가 나타납니다. 스크린 샷보기 :

주의 사항:이 VBA는 단일 셀 붙여 넣기에서 작동합니다. 여러 셀에 복사하여 붙여 넣으면 작동하지 않습니다.

Excel에서 확인란을 사용하여 드롭 다운 목록을 쉽게 만들 수 있습니다.

또한 확인란이있는 드롭 다운 목록 ~의 유용성 Excel 용 Kutools 필요에 따라 지정된 범위, 현재 워크 시트, 현재 통합 문서 또는 열려있는 모든 통합 문서의 확인란이있는 드롭 다운 목록을 쉽게 만들 수 있습니다.
전체 기능 다운로드 30-Excel 용 Kutools의 일 무료 트레일!


관련 기사 :

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

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

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

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

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


최고의 사무 생산성 도구

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

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

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

  • Word, Excel, PowerPoint에서 탭 편집 및 읽기 사용, Publisher, Access, Visio 및 Project.
  • 새 창이 아닌 동일한 창의 새 탭에서 여러 문서를 열고 만듭니다.
  • 생산성을 50% 높이고 매일 수백 번의 마우스 클릭을 줄입니다!
officetab 하단
코멘트 (12)
아직 평가가 없습니다. 가장 먼저 평가하세요!
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
이것은 작동하지만 값을 붙여넣으면 드롭다운 목록에 없는 데이터가 허용됩니다. 목록에 없는 값을 제한하는 모든 방법.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕하세요 Dilip, 문제를 해결할 수 있었습니까? 저도 비슷한 문제가 있습니다. 제한해야 하는 데이터 유효성 검사 셀의 드롭다운 값에 대해서만 복사, 붙여넣기를 허용해야 합니다. 솔루션을 공유할 수 있습니까? 고마워 라오
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕하세요, 이 매크로를 실행하는 동안 "Application.Undo" 디버그 오류가 발생했습니다. Pls는 최대한 빨리 해결
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕하세요, 위에서 언급한 vba 코드가 실행되지 않습니다. 친절하게 해결됩니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
Private Sub Worksheet_Change(ByVal Target As Range) Dim xValue As String Dim xCheck1 As String Dim xCheck2 As String If Target.Count > 1 then Exit Sub End If Application.EnableEvents = False xValue = Target.Value On Error Resume Next xCheck1 = Target. Validation.InCellDropdown On Error GoTo 0 Application.Undo On Error Resume Next xCheck2 = Target.Validation.InCellDropdown On Error GoTo 0 If xCheck1 = xCheck2 then Target = xValue Else MsgBox "붙여넣기가 허용되지 않습니다!" End If Application.EnableEvents = True End Sub 이 매크로는 다른 통합 문서나 워크시트에서 복사할 때 작동하지 않으므로 이러한 것들을 피하는 방법도 알려주세요.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
매우 감사합니다 !! 나를 위해 잘 작동합니다 !!! 단일 셀에 복사하는 것은 제한됩니다. 하지만 셀 목록을 복사하여 붙여넣으면.. 붙여넣기가 허용됩니다. 내가 이것을 조정할 수 있는지 보자 ..어쨌든 감사합니다
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
Jepson, 여러 셀에 복사하여 붙여넣는 문제를 해결했습니까? 미리 감사드립니다!
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
Hi Dilip, 붙여넣기 값을 사용하여 데이터를 허용하는 문제를 해결할 수 있습니까? 저도 같은 문제에 직면하고 있습니다. 도와주세요.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
Hi Dilip, 붙여넣기 값을 사용하여 데이터 허용 문제를 해결할 수 있습니까?
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
여러 셀에 복사하여 붙여넣는 문제를 해결하셨습니까? 미리 감사드립니다!
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
아니, 나는 그것을 알아내지 못했다. 나는 잠시 후 해결하려고하지 않았습니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
나는 작동하지만 코드를 넣은 후에는 아무 것도 취소할 수 없습니다. 단 한 발의 뒤로도 허용되지 않습니다.
아직 코멘트가 없습니다
여러분의 의견을 남겨
게스트로 게시
×
이 게시물 평가 :
0   등장 인물
추천 위치

Follow Us

저작권 © 2009 - WWW.extendoffice.com. | 판권 소유. 에 의해 구동 ExtendOffice. | | 사이트 맵
Microsoft 및 Office 로고는 미국 및 / 또는 기타 국가에서 Microsoft Corporation의 상표 또는 등록 상표입니다.
Sectigo SSL로 보호