验证单元格以仅接受Excel中IP地址的三种方法

使用Excel时，您知道如何设置一列或一系列单元格以仅接受IP地址格式（xxx.xxx.xxx.xxx）吗？ 本文提供了几种处理方法。

---

使用数据验证功能验证单元以仅接受IP地址

数据验证功能可以帮助您限制指定单元格上的有效条目，以仅允许在Excel中输入IP地址。 请执行以下操作。

1.选择仅允许输入IP地址格式的单元格，然后单击 数据 > 数据验证。 看截图：

2.在“数据验证”对话框中，在“允许”下拉列表中选择“自定义”，将以下公式复制到“公式”框中，然后单击“确定”按钮。

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

请注意： 在公式中，A2是所选像元范围的第一个像元。 请根据需要进行更改。

从现在开始，您只能在这些指定的单元格中输入IP地址格式的内容。

如果检测到格式不匹配的内容，将弹出警告框，如下图所示。

---

---

验证单元以仅接受带有VBA代码的IP地址

您还可以应用下面的VBA代码来验证单元格，使其仅接受Excel中的IP地址格式。 请执行以下操作。

1.打开您将验证单元格的工作表，右键单击工作表选项卡，然后单击 查看代码 从上下文菜单。

2.在开幕 Microsoft Visual Basic应用程序 窗口，将下面的VBA代码复制到其中。

VBA代码：验证单元格以仅接受Excel中的IP地址

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

请注意： 在代码中，A1：A10是您将验证输入类型的单元格范围。 请根据需要更改范围。

3。 按 其他 + Q 关闭键 Microsoft Visual Basic应用程序 窗口。

从现在开始，您只能在这些指定的单元格中输入IP地址格式的内容。

如果输入格式不匹配的内容，将弹出警告框，如下图所示。

---

轻松验证单元以仅接受具有出色功能的IP地址

1.选择仅允许输入IP地址的单元格范围。 请点击 库工具 > 防止打字 > 验证IP地址。 看截图：

2.然后在弹出窗口中单击“确定”。 Kutools for Excel 对话。

从现在开始，只能将IP地址格式数据输入到指定的单元格范围内。