¿Cómo ordenar rápidamente la dirección IP de menor a mayor en Excel?
En general, usamos la función Ordenar para ordenar cadenas en Excel. Pero si hay algunas direcciones IP necesarias para ordenar, el orden de clasificación puede ser incorrecto al usar la función Ordenar directamente como se muestra a continuación. Ahora tengo algunas formas de ordenar las direcciones IP rápida y correctamente en Excel.
Clasificación incorrecta por función de clasificación | Orden correcto |
Ordenar la dirección IP por fórmula
Ordenar la dirección IP por VBA
Ordenar la dirección IP por texto en columnas
Ordenar la dirección IP por fórmula
Use una fórmula para completar la dirección IP y luego ordene.
1. Seleccione una celda adyacente a la dirección IP y escriba esta fórmula
=TEXT(LEFT(A1,FIND(".",A1,1)-1),"000") & "." & TEXT(MID(A1,FIND( ".",A1,1)+1,FIND(".",A1,FIND(".",A1,1)+1)-FIND(".",A1,1)-1),"000") & "." & TEXT(MID(A1,FIND(".",A1,FIND(".",A1,1)+1)+1,FIND(".",A1, FIND(".",A1,FIND(".",A1,1)+1)+1)-FIND(".",A1,FIND(".",A1,1)+1)-1), "000") & "." & TEXT(RIGHT(A1,LEN(A1)-FIND(".",A1,FIND(".",A1,FIND( ".",A1,1)+1)+1)),"000")
prensa Participar y arrastre el controlador de relleno sobre las celdas para aplicar esta fórmula.
2. Copie los resultados de la fórmula y péguelos como valor en la siguiente columna. Ver captura de pantalla:
3. mantenga seleccionado el valor pegado y haga clic en Datos > Ordenar de la A a la Z.
4. En el Ordenar Waring diálogo, mantener Amplia la seleccion comprobado.
5. clic Ordenar. Ahora las direcciones IP se han ordenado de menor a mayor.
Puede eliminar las columnas auxiliares.
Ordenar la dirección IP por VBA
Aquí hay un código VBA que también puede ayudarlo.1. Prensa Alt + F11 claves para habilitar el Microsoft Visual Basic para aplicaciones ventana.
2. Hacer clic en recuadro > Módulo, copie y pegue el código en el script en blanco.
VBA: Complete la dirección IP
Sub FormatIP()
'UpdatbyExtendoffice20171215
Dim xReg As New RegExp
Dim xMatches As MatchCollection
Dim xMatch As Match
Dim xRg As Range
Dim xCell As Range
Dim I As Long
Dim xArr() As String
On Error Resume Next
Set xRg = Application.InputBox("Select cells:", "KuTools For Excel", Selection.Address, , , , , 8)
If xRg Is Nothing Then Exit Sub
With xReg
.Global = True
.Pattern = "\d{1,3}\.+\d{1,3}\.+\d{1,3}\.+\d{1,3}"
For Each xCell In xRg
Set xMatches = .Execute(xCell.Value)
If xMatches.Count = 0 Then GoTo xBreak
For Each xMatch In xMatches
xArr = Split(xMatch, ".")
For I = 0 To UBound(xArr)
xArr(I) = Right("000" & xArr(I), 3)
If I <> UBound(xArr) Then
xArr(I) = xArr(I) & "."
End If
Next
Next
xCell.Value = Join(xArr, "")
xBreak:
Next
End With
End Sub
3. Luego haga clic Herramientas > Referenciay verificar Expresiones regulares de Microsoft VBScript 5.5 en el diálogo emergente.
4. Hacer clic en OK y pulse F5 , aparece un cuadro de diálogo para recordarle que seleccione un rango para trabajar.
5. Hacer clic en OK. Entonces las direcciones IP se han llenado con cero.
6. Seleccione las direcciones IP y haga clic en Datos > Ordenar de la A a la Z para ordenarlos.
Ordenar la dirección IP por texto en columnas
En realidad, la función Texto a columnas también puede hacerte un favor en Excel.
1. Seleccione las celdas que usa y haga clic en Datos > Texto a columnas. Ver captura de pantalla:
2. En el Convertir texto al asistente de columnas diálogo, haga lo siguiente:
cheque DelimitadoY haga clic en Siguiente;
cheque Otro y el tipo . en el cuadro de texto y haga clic en Siguiente;
Seleccione una celda al lado de la dirección IP para colocar el resultado. Hacer clic Acabado.
3. Seleccione todas las celdas que contienen las direcciones IP y las celdas divididas, y haga clic en Datos > Ordenar.
4. En el Ordenar cuadro de diálogo, haciendo clic Agregar nivel para ordenar datos de la columna B a la E (las celdas divididas). Ver captura de pantalla:
5. Hacer clic en OK. Ahora las columnas han sido ordenadas.
Las mejores herramientas de productividad de oficina
Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haga clic aquí para obtener la función que más necesita...
Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
- ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!