엑셀(EXCEL), 셀에 있는 함수 내용 추출하는 FORMULATEXT 함수와 VBA의 코드 작성

엑셀에서 함수를 사용하면 셀에서는 결과값이 보여줍니다.

함수내용이 보고 싶으면 셀을 클릭하면 함수창에 나타납니다.

그외도 수식 표시 기능등이 있지만 함수를 셀에 내용으로 작성할 때가 있습니다.

 

수식보기

 

 

FORMULATEXT(reference) : 셀에 사용되는 함수와 내용에 대해서 표시합니다.

• reference : 사용하려고 하는 셀에 대한 것입니다. 단일 셀만 받아들이고 범위를 사용할 때는 배열함수를 써야 합니다.
• 함수를 반환할 때는 등호(=)를 포함합니다. right 함수등을 활용해서 삭제할 수 있습니다.

 

formulatext 함수 사용하기

 

등호(=)와 함수가 참조한 범위를 포함해서 내용을 전체 다 반환합니다.

이 함수는 Office 365 이상의 버전에만 사용할 수 있는 함수입니다.

그 이전에 버전에서 사용하기 위한 VBA 소스를 하나 소개합니다.

Cell 메소스의 fomula 속성을 사용하면 되는 간단한 함수입니다.

 

코드를 소개합니다.

VBA 편집창을 열 때는 엑셀에서 사용 중에 ALT + F11 단축키를 사용하면 편집기가 열립니다.

그리고는 왼쪽의 프로젝트를 오른쪽 클릭해서 모듈을 새로 만들어서 아래 내용을 복사해 붙여 넣으면 됩니다.

 

 

Function GetFunctionName(cell As Range) As String
    Dim formula As String
    Dim funcName As String
    
    ' 셀에 수식이 있는지 확인
    If cell.HasFormula Then
        formula = cell.formula
        
        ' 함수 이름 추출
        funcName = Split(Mid(formula, 2), "(")(0)
        GetFunctionName = funcName
    Else
    	'수식이 없으면 내용을 그대로 가져옵니다.
		GetFunctionName = cell.Value
	End If
End Function

 

 

사용자함수로 "GetFunctionName" 라는 이름의 함수를 추가합니다.

셀에 수식이 있으면 함수이름만 가져오고 아니면 그 값을 그대로 출력합니다.

어려운 함수는 아닙니다.

 

사용자 함수 사용하기

 

사용이 쉬운 함수이지만 작성한 파일을 첨부하겠습니다.

혹시 필요하신 분은 가져다 쓰시면 됩니다.

 

함수 읽기.xlsm

0.02MB