Сортирање ИП адреса - Екцел савети

Преглед садржаја

Русселл има колону интерних ИП адреса и жели да их сортира. Проблем је у томе што .100. адресе долазе пре .22. адресе.

Ако Русселл дода нову, привремену колону која ће се користити за сортирање, може да користи ову нову прилагођену функцију ИПФорСорт (). Овај код треба залепити у модул кода у радној свесци.

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

Занимљиви Чланци...