Here is a VBA module string I have been using successfully with Microsoft Outlook desktop client. It extracts the phone number from the BODY of an incoming email message.

PhoneNumberString = 1 & NumericOnly(Strings.Mid(Item.Body, InStr(Item.Body, "From") + 5, InStr(Item.Body, "To") - InStr(Item.Body, "From")))


Well, now my email provider is placing the phone number instead in the SUBJECT field of incoming messages !!! Ugh.

Here is a typical actual typical NEW email subject line:

Voicemail received from (647) 906-8121 (0:04s) on ext 500



How can I extract the phone number from its new location in the SUBJECT field?

. . . in the above example, it would extract . . . (647) 906-8121



Thanks for anyone’s help.