Hoe IP-adres met nul opvullen in Excel?
Wanneer u een blad ontvangt dat enkele IP-adressen met twee cijfers in sommige segmenten bevat, wilt u misschien het IP-adres vullen met nul tot drie cijfers in elk segment, zoals hieronder wordt getoond. In dit artikel introduceer ik enkele trucs om snel IP-adressen in Excel op te vullen.
Voer het IP-adres in met nul volgens formule
Pad IP-adres met nul door gedefinieerde functie
Voer het IP-adres in met nul volgens formule
Hier is een lange formule waarmee u het IP-adres snel met nul kunt opvullen.
Selecteer een lege cel, typ deze formule,
=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 is het IP-adres dat u gebruikt, druk op Enter toets, sleep de vulgreep omlaag naar de cellen die deze formule nodig hadden. zie screenshot:
Pad IP-adres met nul door gedefinieerde functie
Als u bekend bent met VBA-code, is hier een code die u ook kan helpen bij het opvullen van het IP-adres.
1. druk op Alt + F11 toetsen om in te schakelen Microsoft Visual Basic voor toepassingen venster klikt Invoegen > Module om een nieuwe module te maken. Zie screenshot:
2. In de Module script, plak onderstaande code erin, sla de code op en sluit het VBA-venster. Zie screenshot:
VBA: Pad IP-adres
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. Ga naar een lege cel waarin u het berekende resultaat plaatst, typ deze formule = IP (A1), druk op de Enter-toets en sleep de vulgreep naar de cellen die je nodig hebt. Zie screenshot:
Relatieve artikelen
- Hoe een string uit een IP-adres te extraheren in Excel?
- Hoe voeg ik hetzelfde e-mailadres toe aan een lijst met namen in Excel?
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!