[땡큐엑셀vba & 엑셀매크로] 셀어디에든 ABCDE 를 입력하면 영어로 바뀌는 매크로 어디없나요 ?

a 입력하면 영어로 바뀜

b 입력하면 영어로 바뀜

 

'http://kin.naver.com/qna/detail.nhn?d1id=1&dirId=102020101&docId=280478645
'
'엑셀에서 VBA (매크로) 작업할때 왼쪽 ABCDE 를 입력하면 자동으로 영어로 바뀌는 매크로는 없나요?
'셀어디에든 ABCDE 를 입력하면 영어로 바뀌는 매크로 어디없나요 ?




''Worksheet의 change이벤트를 사용합니다.
'
'source by 땡큐엑셀vba & 엑셀매크로
'
Private Sub Worksheet_Change(ByVal Target As Range)
    
        
    '이벤트 잠시중단
    Application.EnableEvents = False
    
    '한개의 셀만 선택되었을때
    If Target.Count = 1 Then
    
        'A,B,C,D,E,a,b,c,d,e 일경우
        If UCase(Target) = "A" Or UCase(Target) = "B" Or UCase(Target) = "C" Or UCase(Target) = "D" Or UCase(Target) = "E" Then
            Target = "영어"
        End If
        
    End If
    
    '이벤트 제계
    Application.EnableEvents = True
    
End Sub

 

abcd입력하면 자동으로 문자변환-Worksheet_Change이벤트이용-땡큐엑셀vba.xlsm

0.05MB