Russell hat eine Spalte mit internen IP-Adressen und möchte diese sortieren. Das Problem ist, dass die .100. Adressen kommen vor der .22. Adressen.
Wenn Russell eine neue temporäre Spalte zum Sortieren hinzufügt, kann er diese neue benutzerdefinierte Funktion IPForSort () verwenden. Dieser Code sollte in ein Codemodul in der Arbeitsmappe eingefügt werden.
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
