엑셀 매크로 VBA 셀색 폰트 글꼭 색상 추출 사용자 정의 함수 방법
엑셀 매크로 VBA 셀색 폰트 글꼭 색상 추출 사용자 정의 함수 방법
엑셀 작업 시 여러 가지 내용을 입력하면서 진행합니다. 필요에 따라
실색이나 글꼴 색상을 표시해서 색상 코드 값을 표시할 수 있는데요.
엑셀에서 색상 코드를 추출해주는 함수는 없습니다.
필요에 따라 매크로를 이용해서 사용자 정의 함수를 만들어서 사용하는데요.
방법이 어렵지 않으니 따라 하시면 됩니다.
간단한 엑셀 샘플을 준비했습니다.
셀에 색을 적용하고 우측에 사용자 정의 함수를 이용해서 색상 코드가 나오도록 해보겠습니다.
"Alt + F11 " 키를 눌러 Microsoft visual Basic for Applcations 프로그램을 실행합니다.
창이 열리면 상단 메뉴 중 [삽입] -[모듈]을 선택합니다.
모듈 창이 열리면 아래 내용을 입력해 주세요
Function ColorCode(ran As Range, op As Variant)
If op = 0 Then
ColorCode = Hex(ran.Font.Color)
Else
ColorCode = Hex(ran.Interior.Color)
End If
End Function
이제 엑셀로 이동 해주세요
새로 만든 사용자 정의 함수 사용 방법은 아래와 같습니다.
ColorCode(셀 주소,옵션)
옵션 : 0 폰트 색상
1 셀 색상
직접 사용해보겠습니다.
=ColorCode(c3,1)을 입력하면 색상 코드가 FF로 나오는 것을 확인할 수 있습니다.
다른 셀에 적용하기 위해 사용자 정의 함수가 적용된 셀 우측 하단 모서리 부분을 드래그해서 아래로 내려줍니다
다른 셀에도 색상 코드값이 반환됩니다.
이번엔 폰트 글꼴 색상을 확인해보겠습니다.
=ColorCode(D3,0) 을 입력합니다. 옵션값을 "0"으로 넣어서 글꼴 색상값을 얻는 겁니다.
수식이 입력된 셀 우측 하단 모서리를 선택 후 아래로 내려서 수식을 복사합니다.
글꼴 색상 코드값이 나옵니다.
엑셀 매크로 VBA 셀색 폰트 글꼭 색상 추출 사용자 정의 함수 방법을 알아보았습니다.