Russell mempunyai lajur alamat IP dalaman dan dia mahu menyusunnya. Masalahnya ialah .100. alamat akan datang sebelum .22. alamat.
Sekiranya Russell menambah lajur sementara yang baru untuk digunakan untuk menyusun, dia dapat menggunakan fungsi khusus baru IPForSort (). Kod ini harus ditampal ke modul kod dalam buku kerja.
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
