Russellas turi vidinių IP adresų stulpelį ir nori juos rūšiuoti. Problema ta, kad .100. adresai ateina prieš .22. adresus.
Jei Russellas prideda naują, laikiną stulpelį, kuris bus naudojamas rūšiuoti, jis gali naudoti šią naują pasirinktinę funkciją IPForSort (). Šis kodas turėtų būti įklijuotas į darbaknygės kodo modulį.
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
