Vba:문자열에서 숫자를 제거하는 방법

VBA에서 다음 함수를 만들어 Excel 셀의 문자열에서 숫자를 제거할 수 있습니다.

 Function RemoveNumbers(CellText As String) As String

With CreateObject(" VBScript.RegExp ")
    .Global = True
    .Pattern = " [0-9] "
    RemoveNumbers = .Replace(CellText, "")
End With

End Function

그런 다음 이 기능을 사용하여 Excel에서 원하는 셀의 숫자를 제거할 수 있습니다.

다음 예에서는 이 기능을 실제로 사용하는 방법을 보여줍니다.

예: VBA를 사용하여 문자열에서 숫자 제거

Excel에 다음과 같은 직원 ID 목록이 있다고 가정합니다.

직원 ID 열의 각 문자열에서 숫자를 제거한다고 가정해 보겠습니다.

이를 위해 VBA에서 다음 함수를 만들 수 있습니다.

 Function RemoveNumbers(CellText As String) As String

With CreateObject(" VBScript.RegExp ")
    .Global = True
    .Pattern = " [0-9] "
    RemoveNumbers = .Replace(CellText, "")
End With

End Function

이 함수를 만든 후에는 B2 셀에 다음 수식을 입력하여 모든 숫자가 제거된 직원 번호를 셀 A2 에 반환할 수 있습니다.

 =RemoveNumbers( A2 )

그런 다음 이 수식을 클릭하여 B열의 나머지 각 셀로 드래그할 수 있습니다.

B열에는 A열의 각 문자열이 숫자가 제거되어 표시됩니다.

예를 들어:

• 4009앤디는 앤디 가 된다
• 1540 밥이 밥이 되다
• 1500Chad09가 차드가 됨
• 1600더그가 더그가 되다

등등.

추가 리소스

다음 자습서에서는 VBA를 사용하여 다른 일반적인 작업을 수행하는 방법을 설명합니다.

VBA: 문자열에서 문자 발생 횟수를 계산하는 방법
VBA:문자열에 다른 문자열이 포함되어 있는지 확인하는 방법
VBA: 특정 텍스트가 포함된 셀 수를 계산하는 방법