Namig: drugi jeziki so prevedeni v Google. Lahko obiščete English različico te povezave.
Vpiši se
x
or
x
x
Registracija
x

or

Kako potrdite celice, ki sprejemajo samo naslov IP v Excelu?

Med uporabo Excela veste, kako nastaviti stolpec ali vrsto celic, ki sprejemajo samo naslov IP (xxx.xxx.xxx.xxx)? V tem članku je na voljo več načinov, s katerimi se boste lahko lotili.

Potrdite celice, ki sprejemajo samo naslov IP s funkcijo preverjanja podatkov

Potrdite celice, ki sprejemajo samo naslov IP z VBA kodo


Potrdite celice, ki sprejemajo samo naslov IP s funkcijo preverjanja podatkov


Funkcija preverjanja podatkov vam lahko pomaga, da omejite veljavne vnose v določenih celicah, da dovolite le vnos IP-naslova v Excelu. Prosimo, naredite na naslednji način.

1. Izberite celice, ki jih boste dovolili samo vnesite format IP naslova, nato kliknite datum > Preverjanje podatkov. Prikaz slike:

2. V Ljubljani Preverjanje podatkov pogovorno okno, izberite po meri v Dovoli spustni seznam, vnesite formulo =AND((LEN(A1)-LEN(SUBSTITUTE(A1,".","")))=3,ISNUMBER(SUBSTITUTE(A1,".","")+0)) v Formula polje in nato kliknite OK gumb.

Opomba: V formuli je A1 prva celica izbranega obsega celic. Prosimo, spremenite ga, kot ga potrebujete.

Od zdaj naprej lahko v te določene celice vnesete samo vsebino oblike naslova IP.

Če je bila zaznana vsebina neprestane oblike, se bo prikazalo opozorilno polje, kot je prikazano spodaj.


Potrdite celice, ki sprejemajo samo naslov IP z VBA kodo

Uporabite lahko tudi spodnjo kodo VBA, da potrdite celice, če želite sprejeti samo obliko naslova IP v Excelu. Prosimo, naredite na naslednji način.

1. Odprite delovni list, potrdite celice, z desno miškino tipko kliknite kartico stanja in kliknite Ogled kode iz kontekstnega menija.

2. V odprtju Microsoft Visual Basic za aplikacije okno, kopirajte spodnjo kodo VBA vanj.

VBA koda: validiraj celice, ki sprejmejo le naslov IP v Excelu

Private Sub Worksheet_Change(ByVal Target As Range)
'Update by ExtendOffice 2018/10/25
Dim xArrIp() As String
Dim xIntIP1, xIntIP2, xIntIP3, xIntIP4 As Integer
If Intersect(Target, Range("A1:A20")) Is Nothing Then
    Exit Sub
Else
    If Target = "" Then
        Exit Sub
    End If
    xArrIp = Split(Target.Text, ".")
    If UBound(xArrIp) <> 3 Then
        GoTo EIP
    Else
    xIntIP1 = CInt(xArrIp(0))
    xIntIP2 = CInt(xArrIp(1))
    xIntIP3 = CInt(xArrIp(2))
    xIntIP4 = CInt(xArrIp(3))
    If (xIntIP1 < 1) Or (xIntIP1 > 255) _
    Or (xIntIP2 < 1) Or (xIntIP2 > 255) _
    Or (xIntIP3 < 1) Or (xIntIP3 > 255) _
    Or (xIntIP4 < 1) Or (xIntIP4 > 255) Then
    GoTo EIP
     End If
    End If
End If
Exit Sub
EIP:
    MsgBox "Please enter correct IP address"
    Target = ""
End Sub

Opomba: V kodi A1: A20 je obseg celic, ki ga potrdite s tipom vnosa. Prosimo, spremenite obseg glede na vaše potrebe.

3. Pritisnite druga + Q tipke za zapiranje Microsoft Visual Basic za aplikacije okno.

Od zdaj naprej lahko v te določene celice vnesete samo vsebino oblike naslova IP.

Če je vnesena vsebina neprevadašene oblike, se bo prikazalo opozorilo, kot je prikazano spodaj.


Priporočena orodja za produktivnost za Excel

zavihek kte 201905

Kutools za Excel vam pomaga, da vedno končate delo pred časom in izstopite iz množice

  • Več kot zmogljive napredne funkcije 300, zasnovane za 1500 delovne scenarije, ki povečujejo produktivnost z 70%, vam dajejo več časa za skrb za družino in uživanje v življenju.
  • Ne potrebujete več pomnilniških formul in VBA kod, od zdaj naprej pa dajate svojim možganom počitek.
  • Postanite strokovnjak za Excel v minutah 3, zapletene in ponavljajoče se operacije lahko opravite v nekaj sekundah,
  • Vsak dan zmanjšajte število operacij tipkovnice in miške, zdaj se poslovite od poklicnih bolezni.
  • 110,000 visoko učinkovite ljudi in 300 + svetovno priznanih podjetij izbiro.
  • Brezplačna preizkusna različica 60 dneva. 60-dnevno jamstvo vračila denarja. 2 let brezplačne nadgradnje in podpore.

Prinaša kartično brskanje in urejanje za Microsoft Office, veliko močnejši od zavihkov brskalnika

  • Office Tab je namenjen za Word, Excel, PowerPoint in druge Office aplikacije: Založnik, Dostop, Visio in Projekt.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Z 50% poveča vašo produktivnost in vsak dan zmanjša na stotine klikov z miško!
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.