Russell ima stolpec notranjih naslovov IP in jih želi razvrstiti. Težava je v tem, da .100. naslovi prihajajo pred .22. naslovi.
Če Russell doda nov začasni stolpec za razvrščanje, lahko uporabi novo funkcijo po meri IPForSort (). To kodo je treba prilepiti v modul kode v delovnem zvezku.
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
