# EXTRACT TEXT AND NUMBER IN EXCEL VBA CODE (DESCRIPTION ⬇️)

# EXTRACT TEXT AND NUMBER IN EXCEL
VBA CODE

Function ExtractNumbers(Value As String)
Dim StrLength As Integer
StrLenth = Len(Value)
Dim i As Integer
Dim NumbericChars As String
For i = 1 To StrLength
If IsNumeric(Mid(Value, i, 1)) Then NumericChars = NumericChars & Mid(Value,
i,1)
Next i
ExtractNumbers = NumericChars
End Function
Function ExtractText(Value As String)
Dim StrLength As Integer
StrLenth = Len(Value)
Dim i As Integer
Dim TextChars As String
For i = 1 To StrLength
If IsNumeric(Mid(Value, i, 1)) Then TextChars = TextChars & Mid(Value, i, 1)
Next i
ExtractText = TextChars
End Function

Видео # EXTRACT TEXT AND NUMBER IN EXCEL VBA CODE (DESCRIPTION ⬇️) канала CHAUDHARY ZUEHB