Russell má sloupec interních IP adres a chce je seřadit. Problém je v tom, že 0,100. adresy přicházejí před .22. adresy.
Pokud Russell přidá nový dočasný sloupec, který se má použít pro třídění, může použít tuto novou vlastní funkci IPForSort (). Tento kód by měl být vložen do modulu kódu v sešitu.
Public Function IPforSort(OrigVal) IPforSort = "" OrigVal = OrigVal & "." Bg = 1 For i = 1 To Len(OrigVal) If Mid(OrigVal, i, 1) = "." Then IPforSort = IPforSort & Format(Mid(OrigVal, Bg, i - Bg), "000") & "." Bg = i + 1 End If Next i IPforSort = Left(IPforSort, Len(IPforSort) - 1) End Function
