Excel'de hücreleri yalnızca IP adresi kabul edecek şekilde doğrulamak için üç yöntem

Excel'i kullanırken, bir sütunu veya bir dizi hücreyi yalnızca IP adresi formatını (xxx.xxx.xxx.xxx) kabul edecek şekilde nasıl ayarlayacağınızı biliyor musunuz? Bu makale, bu sorunu çözmek için size birkaç yöntem sunmaktadır.

Veri Doğrulama işleviyle hücreleri yalnızca IP adresi kabul edecek şekilde doğrulayın

Veri Doğrulama işlevi, belirli hücrelere yalnızca IP adresinin girilmesine izin verecek şekilde geçerli girişleri kısıtlamanıza yardımcı olabilir. Lütfen aşağıdaki adımları izleyin.

1. Yalnızca IP adresi formatı girişi yapmak istediğiniz hücreleri seçin, ardından Veri > Veri Doğrulama'ya tıklayın. Ekran görüntüsüne bakın:

2. Veri Doğrulama iletişim kutusunda, İzin Verilen açılır liste kutusundan Özel'i seçin, aşağıdaki formülü Formül kutusuna kopyalayın ve ardından Tamam düğmesine tıklayın.

=AND((LEN(A2)-LEN(SUBSTITUTE(A2,".","")))=3,ISNUMBER(SUBSTITUTE(A2,".","")+0))

Not: Formülde, A2 seçilen hücre aralığının ilk hücresidir. Gerektiğinde değiştirin.

Şimdi itibaren, bu belirlenen hücrelere yalnızca IP adresi formatındaki içerik girebilirsiniz.

Eşleşmeyen format içeriği algılanırsa, aşağıdaki ekran görüntüsünde gösterildiği gibi bir uyarı kutusu açılacaktır.

VBA koduyla hücreleri yalnızca IP adresi kabul edecek şekilde doğrulayın

Ayrıca, hücreleri yalnızca IP adresi formatını kabul edecek şekilde doğrulamak için aşağıdaki VBA kodunu da uygulayabilirsiniz. Lütfen aşağıdaki adımları izleyin.

1. Doğrulama yapacağınız çalışma sayfasını açın, sayfa sekmesine sağ tıklayın ve bağlam menüsünden Kodu Görüntüle'ye tıklayın.

2. Açılan Microsoft Visual Basic for Applications penceresinde, aşağıdaki VBA kodunu kopyalayın.

VBA kodu: Excel'de hücreleri yalnızca IP adresi kabul edecek şekilde doğrulayın

Private Sub Worksheet_Change(ByVal Target As Range)
'Update by ExtendOffice 20180809
Dim xArrIp() As String
Dim xIntIP1, xIntIP2, xIntIP3, xIntIP4 As Integer
If Intersect(Target, Range("A2:A10")) 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

Not: Kodda, A1:A10 doğrulama yapacağınız hücre aralığıdır. Gereksinimlerinize göre aralığı değiştirin.

3. Microsoft Visual Basic for Applications penceresini kapatmak için Alt + Q tuşlarına basın.

Şimdi itibaren, bu belirlenen hücrelere yalnızca IP adresi formatındaki içerik girebilirsiniz.

Eşleşmeyen format içeriği girilirse, aşağıdaki ekran görüntüsünde gösterildiği gibi bir uyarı kutusu açılacaktır.

Harika bir özellik ile kolayca hücreleri yalnızca IP adresi kabul edecek şekilde doğrulayın

1. Yalnızca IP adresinin girilmesine izin vermek istediğiniz hücre aralığını seçin. Kutools > Giriş Sınırlama > IP Adresini Doğrula'ya tıklayın. Ekran görüntüsüne bakın:

2. Ardından açılan Kutools for Excel iletişim kutusunda Tamam'a tıklayın.

Şimdi itibaren, yalnızca belirlenen hücre aralığına IP adresi formatındaki veriler girilebilir.