On Fri, 30 Nov 2007 15:07:00 -0800, ExcelMonkey
wrote:
Does anyone know how to replace all non-operators from a text string? That
is if my string is:
"A1+SUM(B1:B30)-365*Average(Z1:Z30)/$F$4+CostCell"
I want to replace all characters that are not +,-,*,/,^ with "".
Thanks
EM
You can use this UDF.
To enter it, <alt-F11 opens the
VB Editor. Ensure your project is highlighted
in the Project Explorer window, then Insert/Module and paste the code below
into the window that opens.
To use this, enter the function =reNonOps(str) where str is either your string,
or a cell reference containing the string.
================================================== ===
Function reNonOps(str As String) As String
Dim re As Object
Set re = CreateObject("vbscript.regexp")
re.Global = True
re.Pattern = "[^\-+*/^]"
reNonOps = re.Replace(str, "")
End Function
==================================
--ron