ユーザー定義関数を使用する方法です。 ExcelということですがVerが不明なので、一応97から対応するようにSplit関数を 使っていません。 使用方法は、A1にIPアドレスがあるとして =IpAdd(A1) と入力すると3桁ずつの IPアドレスが表示されます。 コードの設定方法: Alt + F11 を押し、メニューから[挿入]->[標準モジュール]で開いたウインドウに 下記コードを貼り付けます。 Function IpAdd(Ip As String) As String Dim StrIp As String Dim s As String If IsEmpty(Ip) Then IpAdd = "" Exit Function End If StrIp = Mid("00" & Ip, InStr(Ip, ".") - 1, 4) s = Right(Ip, Len(Ip) -
![ipアドレスを並び替えたい - OKWAVE](https://cdn-ak-scissors.b.st-hatena.com/image/square/a3202632a5b19efa6d7dbcca644fc13bfa3453dc/height=288;version=1;width=512/https%3A%2F%2Fgazo.okwave.jp%2Fokwave%2Fspn%2Fimages%2Flogo%2Ffacebook_okwave.jpg)