Vba에서 문자열을 long으로 변환하는 방법(예제 포함)
VBA에서 CLng 함수를 사용하여 텍스트 문자열을 긴 데이터 유형으로 변환할 수 있습니다.
실제로 이 기능을 사용하는 두 가지 일반적인 방법은 다음과 같습니다.
방법 1: VBA에서 문자열을 Long으로 변환
Sub ConvertStringToLong () Dim i As Integer For i = 2 To 11 Range(" B " & i) = CLng(Range(" A " & i)) Next i End Sub
이 특정 매크로는 A2:A11 범위의 각 문자열을 긴 데이터 유형으로 변환하고 B2:B11 범위의 긴 값을 표시합니다.
방법 2: VBA에서 문자열을 Long으로 변환(문자열이 숫자인 경우에만)
Sub ConvertStringToLong()
Dim i As Integer
For i = 2 To 11
If IsNumeric(Range(" A " & i)) Then
Range(" B " & i) = CLng(Range(" A " & i))
Else
Range(" B " & i) = 0
End If
Next i
End Sub
이 특정 매크로는 문자열이 숫자인 경우에만 A2:A11 범위의 각 문자열을 긴 데이터 유형으로 변환합니다. 그렇지 않으면 문자열이 null 값으로 변환됩니다.
다음 예에서는 각 방법을 실제로 사용하는 방법을 보여줍니다.
예제 1: VBA에서 문자열을 Long으로 변환
Excel에 현재 텍스트 문자열 형식으로 지정된 다음과 같은 값 열이 있다고 가정해 보겠습니다.
각 문자열을 긴 데이터 유형으로 변환하여 B 열에 표시한다고 가정합니다.
이를 위해 다음 매크로를 생성할 수 있습니다:
Sub ConvertStringToLong () Dim i As Integer For i = 2 To 11 Range(" B " & i) = CLng(Range(" A " & i)) Next i End Sub
이 매크로를 실행하면 다음과 같은 출력이 나타납니다.
A열의 각 텍스트 문자열은 Long 데이터 유형으로 변환되어 B열에 표시됩니다.
예제 2: VBA에서 문자열을 long으로 변환(문자열이 숫자인 경우에만)
Excel에 현재 텍스트 문자열 형식으로 지정된 다음과 같은 값 열이 있다고 가정해 보겠습니다.
문자열이 숫자인 경우에만 각 문자열을 긴 데이터 유형으로 변환하여 B 열에 표시한다고 가정합니다.
이를 위해 다음 매크로를 생성할 수 있습니다:
Sub ConvertStringToLong()
Dim i As Integer
For i = 2 To 11
If IsNumeric(Range(" A " & i)) Then
Range(" B " & i) = CLng(Range(" A " & i))
Else
Range(" B " & i) = 0
End If
Next i
End Sub
이 매크로를 실행하면 다음과 같은 출력이 나타납니다.
A열의 숫자인 텍스트 문자열만 B열의 긴 데이터 형식으로 변환됩니다.
그렇지 않으면 텍스트 문자열이 단순히 null 값으로 변환됩니다.
참고 : 여기에서 VBA CLng 함수에 대한 전체 설명서를 찾을 수 있습니다.
추가 리소스
다음 자습서에서는 VBA에서 다른 일반적인 작업을 수행하는 방법을 설명합니다.
VBA: 문자열에서 공백을 제거하는 방법
VBA: 문자열에서 문자 발생 횟수를 계산하는 방법
VBA:문자열에 다른 문자열이 포함되어 있는지 확인하는 방법