Skip to content

Instantly share code, notes, and snippets.

@ndthanh

ndthanh/RemoveText_regex.bas Secret

Created July 26, 2021 14:42
Show Gist options
  • Save ndthanh/a570ba4fbe5a1a5cd04306bd34e44957 to your computer and use it in GitHub Desktop.
Save ndthanh/a570ba4fbe5a1a5cd04306bd34e44957 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
RemoveText_regex.bas
Function RemoveText(str As String) As String
With CreateObject("VBScript.RegExp")
.Global = True
.Pattern = "[^0-9]"
RemoveText = .Replace(str, "")
End With
End Function
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment