¿Cómo rellenar la dirección IP con cero en Excel?
Al recibir una hoja que contiene algunas direcciones IP con dos dígitos en algunos segmentos, es posible que desee rellenar la dirección IP con cero a tres dígitos en cada segmento, como se muestra a continuación. En este artículo, presento algunos trucos para rellenar rápidamente la dirección IP en Excel.
Rellene la dirección IP con cero por fórmula
Rellene la dirección IP con cero por función definida
Rellene la dirección IP con cero por fórmula
Aquí hay una fórmula larga que puede ayudarlo a rellenar rápidamente la dirección IP con cero.
Seleccione una celda en blanco, escriba esta fórmula,
=TEXT(LEFT(A1,FIND(".",A1)-1),"000.")&TEXT(MID(A1,FIND(".",A1)+1,FIND("~",SUBSTITUTE(A1,".","~",2))-FIND(".",A1)-1),"000.")&TEXT(MID(A1,FIND("~",SUBSTITUTE(A1,".","~",2))+1,FIND("~",SUBSTITUTE(A1,".","~",3))-FIND(".",A1)-1),"000.")&TEXT(MID(A1,FIND("~",SUBSTITUTE(A1,".","~",3))+1,LEN(A1)-FIND(".",A1)-1),"000")
A1 es la dirección IP que usa, presione Participar , arrastre el controlador de relleno hacia las celdas que necesitan esta fórmula. ver captura de pantalla:
Rellene la dirección IP con cero por función definida
Si está familiarizado con el código VBA, aquí hay un código que también puede ayudarlo a rellenar la dirección IP.
1. Prensa Alt + F11 claves para habilitar Microsoft Visual Basic para aplicaciones ventana, haga clic recuadro > Módulo para crear un nuevo módulo. Ver captura de pantalla:
2. En el Módulo script, pegue el código debajo, y luego guarde el código y cierre la ventana de VBA. Ver captura de pantalla:
VBA: dirección IP del pad
Function IP(Txt As String) As String
'UpdatebyExtendoffice20170725
Dim xList As Variant
Dim I As Long
xList = Split(Txt, ".")
For I = LBound(xList) To UBound(xList)
xList(I) = Format(xList(I), "000")
Next
IP = Join(xList, ".")
End Function
3. Vaya a una celda en blanco donde colocará el resultado calculado, escriba esta fórmula = IP (A1), presione la tecla Intro y arrastre el controlador de relleno hacia las celdas que necesita. Ver captura de pantalla:
Artículos relativos
- ¿Cómo extraer una cadena de una dirección IP en Excel?
- ¿Cómo agregar la misma dirección de correo electrónico a una lista de nombres en Excel?
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!