ExcelBanter - View Single Post

Ron Rosenfeld

On Tue, 18 Dec 2007 23:35:40 -0800 (PST), wrote:

How to remove vowels from words? Fpr example, in one row we have
google, excell, macro,... and the result in another row is ggl, xcll,
mcr,... Thanks.

Here's a UDF:

==============================
Option Explicit
Function NV(str As String) As String
Dim re As Object
Set re = CreateObject("vbscript.regexp")
re.IgnoreCase = True
re.Global = True
re.Pattern = "[aeiou]"
NV = re.Replace(str, "")
End Function
==============================
--ron