PeopleSoft Adoption Made Smooth & Simple!
On-The-Job Training Is made Intuitive & Easy With WalkMe's On-Screen Guidance Tool. Claim Your Free WalkMe Account Now
Function cleanPhoneNumber(thisNumber As String) As String ' this function aspires to clean any phone number format ' to standard format (+9999) 999-999-9999 or 999-999-9999 ' works with almost all phone number formats stored in text Dim retNumber As String For i = 1 To Len(thisNumber) If Asc(Mid(thisNumber, i, 1)) >= Asc("0") And Asc(Mid(thisNumber, i, 1)) <= Asc("9") Then retNumber = retNumber + Mid(thisNumber, i, 1) End If Next If Len(retNumber) > 10 Then ' format for country code as well cleanPhoneNumber = Format(retNumber, "(+#) (000) 000-0000") Else cleanPhoneNumber = Format(retNumber, "(+1) (000) 000-0000") End If End Function
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
|Import / Pull out data with condition from various excel registers to main excel file||10||56|
|VBA how to use Like operator with phrasal verb?||4||25|
|Importing specific cell from Excel to MS Access||17||53|
|Transfer Worksheet Data to Userform & Calculate based on Sum Range||28||45|
Join the community of 500,000 technology professionals and ask your questions.