''ORACLE FORMATS TO TEXT- Missing is an ISO LIST in EXCEL of the COUNTRY/STATE codes. Attribute VB_Name = "tEXTtOOLS" Option Explicit Function CleanString ( strString As String ) Dim result , re Set re = New RegExp With re . Global = True . IgnoreCase = True ''' http://www.regular-expressions.info/vbscriptexample.html '''regex = *. 9999 . RFA or RVT or RTE ''.Pattern = ".*?(\.)(\d{4})(\.)(rfa|rvt|rte)" . Pattern = "[^A-Z,0-9,a-z]" CleanString = . Replace ( strString , "_" ) End With Set re = Nothing End Function Function SplitOracle ( strOracle As String , Optional retval As Integer ) ''United States/CA/San Diego/US - San Diego, CA - 401 West A Street retval = retval - 1 Dim result , re , objRow Dim ISO As ListObject Set ISO = shtISO3166.ListObjects ( "IS