Extract phone numbers from comments in Excel

The video offers a short tutorial on how to extract phone numbers from comments in Excel.

[JagadishVakati]

I am not sure why this is not working for me
😂

[guyschwarts]

and also maybe you should put nice music in the background

[hugegainz]

Public Function PhoneN(s As String) As String
Dim D As Long, p As Long, text As String
Dim CH As String
D = Len(s)
text = ""
PhoneN = ""
For p = 1 To D
CH = Mid(s, p, 1)
If IsNumeric(CH) Then
text = test & CH
If Len(text) = 10 Then
PhoneN = PhoneN & vbCrLf & text
End If
Else
text = ""
End If
Next p
End Function