How about this little user-defined function:
Then, with your data in cell A1:![]()
Function SplitString(sTargetString As String, sOperation As String, Optional sDelimiter = "-") As Variant Dim sSplit As String sSplit = "{" & Replace(sTargetString, sDelimiter, ";") & "}" SplitString = Evaluate("=" & sOperation & "(" & sSplit & ")") If IsError(SplitString) Then SplitString = "#VALUE" End If End Function
=SplitString(A1,"MAX")
or
=SplitString(A1,"MIN")
Bookmarks