Excel 2016 VBA에서 래퍼 함수 사용 방법 - 더미

여기서 비교적 간단한 사용자 지정 Excel VBA 워크 시트 기능을 찾을 수 있습니다. 이러한 함수는 내장 VBA 요소를 감싸는 코드로 구성되므로 래퍼 함수 라고합니다. 즉, 워크 시트 수식에서 VBA 함수를 사용할 수 있습니다.

Function User () '현재 사용자 User = Application의 이름을 반환합니다. UserName End Function

이 함수는 본질적으로 수식을 Application 개체의 UserName 속성에 액세스 할 수있게합니다.

NumberFormat 함수

이 함수는 단순히 셀의 숫자 형식을 표시합니다. 셀 그룹이 모두 동일한 숫자 형식을 가져야하는 경우 유용 할 수 있습니다.

함수 NumberFormat (Cell) '셀의 숫자 서식을 반환합니다. NumberFormat = Cell (1). NumberFormat End Function

Cell (1) 사용에주의하십시오. 다중 셀 범위가 인수로 사용되면 첫 번째 셀만 사용됩니다.

셀의 텍스트 색, 배경색, 글꼴 등을 반환하는 유사한 함수를 쉽게 작성할 수 있습니다.

ExtractElement 함수

이 래퍼 함수는 분리 문자로 구분 된 여러 요소를 포함하는 텍스트 문자열에서 하위 문자열을 반환합니다. 예를 들어이 수식은 cow를 반환합니다. cow는 공백을 구분 기호로 사용하는 문자열의 세 번째 요소입니다. 인수는 물론 셀 참조 일 수 있습니다.

Function ExtractElement (Txt, n, 9 월) '요소가 지정된 구분 기호 문자로 구분 된 텍스트 문자열의 n 번째 요소를 반환합니다. ExtractElement = Split (응용 프로그램, Trim (Txt), 9 월) (n - 1) End Function

워크 시트 수식에 사용되는 ExtractElement 함수 A 열은 텍스트 문자열을 포함하고 B 열은 추출 할 요소 번호를 포함하고 C 열은 구분 기호 (공백으로 표시되는 셀은 공백 문자 포함)를 포함합니다.

ExtractElement 함수를 사용하여 문자열에서 요소를 반환합니다.

SayIt 함수

이 간단한 함수는 응용 프로그램의 Speak 메서드에 대한 래퍼입니다. 음성 개체. 그것은 논쟁을 "말하는"합성 된 음성을 사용합니다.

기능 SayIt (txt) '응용 프로그램의 인수를 말합니다. 연설. = IF (C10> 10000, SayIt ("Over budget"), "OK")

수식은 셀 C10을 확인합니다. 값이 10, 000보다 크면이 함수는 "Over budget"텍스트를 읽습니다."값이 10, 000보다 작 으면이 함수는 텍스트를 OK로 표시합니다 (아무 것도 말하지 않습니다).

조금씩 사용하십시오. 이 기능을 두 번 이상 사용하면 매우 혼란 스러울 수 있습니다. 또한 워크 시트가 계산 될 때마다이 함수가 평가되므로 많은 변경을 수행하면 음성이 매우 성가 시게됩니다. 이 기능은 오락 목적에 더 적합 할 것입니다.

IsLike 함수

VBA의 Like 연산자는 텍스트 문자열을 비교하는 매우 유연한 방법입니다. VBA 도움말 시스템에서 확인하십시오.

함수 IsLike (text, pattern) '첫 번째 인수가 두 번째 인수와 같은 경우 True를 반환합니다. IsLike = text Like 패턴 End Function