VBA 발 | VBA VAL 기능은 어떻게 사용하나요? (예제 포함)

Excel VBA Val 함수

vba의 Val 함수 는 문자열 함수 아래에 있으며 데이터 변수에서 숫자 값을 가져 오는 데 사용되는 VBA의 내장 함수입니다. 변수에 A10 값이 있으면 val 함수가 출력으로 10을 제공한다고 가정합니다. 문자열을 인수로 취하고 문자열에있는 숫자를 반환합니다.

VAL은 VBA 용어로 VALUE를 나타냅니다. 이 함수는 숫자가 포함 된 문자열을 실제 숫자로 변환합니다. 예를 들어 "1234 Global"이라는 텍스트 문자열을 제공하면 숫자 부분 즉 1234 만 반환됩니다.

종종 웹 번호에서 데이터를 다운로드하거나 가져올 때 일반적으로 스프레드 시트에 텍스트 값으로 저장됩니다. Excel에서 올바른 기능을 모르는 경우 텍스트를 숫자로 변환하는 것이 가장 어려운 작업입니다. 일반 워크 시트 함수로 워크 시트의 간단한 함수를 사용하여 숫자를 나타내는 모든 문자열을 정확한 숫자로 변환하는 VALUE라는 함수가 있습니다. 이 기사에서는 VAL 함수를 사용하여 VBA에서이를 달성하는 방법을 보여줍니다.

통사론

하나의 인수, 즉 문자열 만 있습니다.

  • 문자열 : 단순히 숫자 부분을 가져 오려는 문자열 값입니다.

따라서 VAL 함수는 제공된 문자열을 숫자 값으로 변환합니다.

참고 : VAL 함수는 항상 공백 문자를 무시하고 공백 문자 뒤의 숫자를 계속 읽습니다.

예를 들어 제공된 문자열이 "145 45 666 3"이면 공백 문자를 무시하고 결과를 "145456663"으로 반환합니다.

Excel VBA의 VAL 함수 예

이 VBA Val 함수 Excel 템플릿을 여기에서 다운로드 할 수 있습니다 – VBA Val 함수 Excel 템플릿

예 1

간단한 숫자 "14 56 47"로 첫 번째 예를 들어 보겠습니다.

아래 코드는 당신을위한 것입니다.

암호:

 Sub Val_Example1 () Dim k As Variant k = Val ( "14 56 47") '위를 145647 MsgBox k End Sub로 변환 

F5 키를 사용하거나 수동으로 VBA 코드를 실행하면 아래 이미지와 같이 모든 공백 문자를 무시하여 결과를 "145647"로 반환합니다.

예제 # 2

이 예에서 문자열의 결과가 "+456"인지 확인합니다.

암호:

 Sub Val_Example2 () Dim k As Variant k = Val ( "+ 456") '위를 456 MsgBox k End Sub로 변환 

이 코드를 수동으로 실행하거나 F5 키를 통해 +456을 무시하여 값을 456으로 반환 할 수 있습니다.

예제 # 3

이제 음수 부호로 같은 숫자를 시도해 보겠습니다.

암호:

 Sub Val_Example3 () Dim k As Variant k = Val ( "-456") '위를 -456 MsgBox k End Sub로 변환 

이 코드는 연산자 기호가있는 숫자가 표시되어야하기 때문에 값을 -456으로 반환합니다.

예 # 4

이제이 문자열“100 Kg”를 시도해 보겠습니다.

암호:

 Sub Val_Example4 () Dim k As Variant k = Val ( "100 KG") 'KG를 무시하고 100 MsgBox k 만 반환합니다. 

이 코드를 수동으로 실행하거나 F5 키를 사용하는 경우 위 코드는 "KG"를 무시하고 VBA 메시지 상자에 "100"만 반환합니다.

예 # 5

이제 날짜 문자열, 즉“14-05-2018”을 시도하십시오.

암호:

Sub Val_Example5 () Dim k As Variant k = Val ( "14-05-2019") '결과로 14를 반환합니다. MsgBox k End Sub

위의 코드는 VAL 함수가 숫자 이외의 문자를 찾을 때까지 숫자 값만 가져올 수 있기 때문에 결과로 14를 반환합니다.

예제 # 6

이제 문자열“7459Good456”을 시도하십시오.

암호:

Sub Val_Example6 () Dim k As Variant k = Val ( "7459 Good 456") '결과로 7459를 반환합니다. MsgBox k End Sub

이것은 숫자가 아닌 문자를 찾을 때까지 숫자를 추출합니다. 즉 결과는 7459입니다. 숫자가 아닌 값 "Good"뒤에 숫자 값이 있더라도 그 이후의 숫자는 완전히 무시됩니다.

예제 # 7

이제 문자열 값 "H 12456"을 시도합니다.

암호:

Sub Val_Example7 () Dim k As Variant k = Val ( "H 12456") '결과로 0을 반환합니다. MsgBox k End Sub

바로 가기 키 F5를 사용하거나 수동으로 위 코드를 실행하면 결과가 0으로 반환됩니다. 우리가 제공 한 문자열의 첫 번째 문자는 숫자가 아닌 문자이므로 결과는 0입니다.

예제 # 8

이제이 문자열“24545. 2”.

암호:

Sub Val_Example8 () Dim k As Variant k = Val ( "24545. 2") '결과로 24545.2를 반환합니다. MsgBox k End Sub

VBA VAL 함수는 문자 점 (.)을 10 진수 문자로 간주하고 그에 따라 결과를 반환하므로 코드는 결과를 24545.2로 반환합니다.