I'm struggling to follow this guide...

[templeowls]

Yes, good point. That's what happens when I rush and have had no coffee yet. I'm about to take care of that right now. So more like?

s = Replace(s, "-", " ")
s = Replace(s, ")", "")
s = Replace(s, "(", "")
s = Replace(s, "+", "")

If InStr(s, "x") > 0 Then s = Left(s, InStr(s, "x") - 1)
ExtractPhoneNum = s

Note that I dropped the string variable as it's not needed.

Thanks! That works for me.

One final question...for cells that have no phone number and are blank, this process adds a zero to those cells. If possible, I'd prefer them to remain blank. Any suggestions on how to do that? Should the query have some sort of 'if not null' statement? Or is there a better way to do that?

[Micron]

perhaps
myQueryCalculatedField:IIF(ExtractPhoneNum([otherField])="","",ExtractPhoneNum([otherField])
Probably would have to see your query design and/or sql. The field must be a text field otherwise you couldn't have those characters in the values, and the function should return "" if no value is passed so I can't see why your query creates zeros. Unless maybe you're using some other function as a wrapper.

[CJ_London]

this process adds a zero to those cells

you are not using the process outlined by micron - the zero is caused by the val function which he is not using

learn to use the immediate window to test what you are doing. Val returns 0 when the value is a zls

you don't need the val function which returns a number and will give you a funny result if there are 16 or more characters - because you are storing as a string

?cstr(val(""))
0

?cstr(val("1234567890123456"))
1.23456789012346E+15

drop the val function and use another replace to replace the spaces with a zls

[templeowls]

Thank you!!!