꿀팁
[VBA] 다중드롭박스
CHATGPT랑 머리카락 뜯어가며 만들었네요.(말귀를 못알아 들음)
VBA는 제가 초보이니 귀엽게 봐주십시오...
고칠 점 알려주시면 감사하겠습니다.. 또는 고수님들의 해결책이나 소스 올려주세요
더블클릭 하면 콤보박스 뜨게 수정하였습니다.
매크로는 되돌리기가 안되므로 사용상 숙지하시고 사용하십시오.
런타임 오류가 나는 경우 보안센터에서 액티브X 제한을 수정해주세요..

VBA는 제가 초보이니 귀엽게 봐주십시오...
고칠 점 알려주시면 감사하겠습니다.. 또는 고수님들의 해결책이나 소스 올려주세요
더블클릭 하면 콤보박스 뜨게 수정하였습니다.
매크로는 되돌리기가 안되므로 사용상 숙지하시고 사용하십시오.
런타임 오류가 나는 경우 보안센터에서 액티브X 제한을 수정해주세요..
박
레
댓글 2
=> BeforeDoubleClick 이벤트를 사용하되 끝에 Cancel = True를 추가하여 사용하는 것이 사용상 좋을 듯 합니다.
Cancel = True로 하면 더블클릭했을 때에 셀 수정모드로 들어가지 않도록 해서 작업이 정상적으로 진행되도록 합니다.
그러면, 셀 선택후 복사나 지우기 등의 일반적인 작업이 가능해 져서 더 유용해 질 것 같아요...
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) '이전 TempMultiCombo가 있으면 삭제 On Error Resume Next Me.OLEObjects("TempMultiCombo").Delete On Error GoTo 0 'H2:J10 범위 클릭 시, 선택된 셀이 1개일 때만 매크로1 실행 If Not Intersect(Target, Me.Range("H2:J10")) Is Nothing Then ' <==여기에 적용범위 설정 If Target.Count = 1 Then Call 다중드롭박스선택하기 End If End If Cancel = True End Sub추가로 다른 오류 때문에 매크로가 중단된 경우 Application.EnableEvents = True를 복구해 주는 뭔가가 있어면 좋습니다. 별도 버튼을 사용하지 않는 경우 Worksheet_Activate 이벤트에 넣어 두면 다른 시트를 선택하고 다시 오면 정상 작동하도록 할 수 있습니다.
마지막으로 매크로 방법은 항상 "되돌리기"를 지워버리기 때문에 주의가 필요함을 꼭 알려 주세요.