Сортиране на IP адреси - Съвети на Excel

Съдържание

Ръсел има колона с вътрешни IP адреси и той иска да ги сортира. Проблемът е, че .100. адресите идват преди .22. адреси.

Ако Ръсел добави нова, временна колона, която да се използва за сортиране, той може да използва тази нова персонализирана функция IPForSort (). Този код трябва да се постави в кодов модул в работната книга.

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

Интересни статии...