在 Excel 中驗證儲存格僅接受 IP 位址的三種方法
使用 Excel 時,您知道如何設定欄或儲存格範圍,使其僅接受 IP 位址格式(xxx.xxx.xxx.xxx)嗎?本文提供多種方法,協助您輕鬆達成此需求。
使用「資料驗證」功能驗證儲存格僅接受 IP 位址
「資料驗證」功能可協助您限制特定儲存格僅能輸入 IP 位址,請依下列步驟操作:
1. 選取僅允許輸入 IP 位址格式的儲存格,然後點擊資料> 資料驗證。請參閱截圖:

2. 在「資料驗證」對話方塊中,從「允許」下拉式清單選取「自訂」,將下方公式貼入「公式」欄位,然後點擊「確定」。
=AND((LEN(A2)-LEN(SUBSTITUTE(A2,".","")))=3,ISNUMBER(SUBSTITUTE(A2,".","")+0))

注意:公式中的 A2 為所選儲存格範圍的第一個儲存格,請依實際需求調整。
從現在起,您只能在這些指定的儲存格中輸入 IP 位址格式的內容。
若偵測到不符合格式的內容,系統將彈出如下方截圖所示的警告對話框。

只需幾次點擊,即可輕鬆驗證儲存格僅接受 IP 位址
僅能輸入 IP 位址的功能,可協助您輕鬆設定儲存格範圍,僅允許透過點擊輸入 IP 位址。請參閱下方示範:Kutools for Excel 立即下載試用!(30 天免費試用)
Download and try it now! (30-day free trail)
使用 VBA 程式碼驗證儲存格僅接受 IP 位址
您也可以套用下方的 VBA 程式碼,在 Excel 中驗證儲存格僅接受 IP 位址格式。請依下列步驟操作。
1. 開啟您要驗證儲存格的工作表,以滑鼠右鍵按一下工作表分頁,然後從捷徑選單中點選。檢視程式碼。
2. 在開啟的 Microsoft Visual Basic for Applications 視窗中,將下方 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. 按下 Alt+Q 鍵,即可關閉 Microsoft Visual Basic for Applications 視窗。
從現在起,您只能在這些指定的儲存格中輸入 IP 位址格式的內容。
若輸入不符合格式的內容,將會彈出如下方截圖所示的警告方塊。

使用超強功能輕鬆驗證儲存格僅接受 IP 位址
以下介紹一項實用功能-僅能輸入 IP 地址,屬於 Kutools for Excel,只需幾次點擊,即可快速驗證儲存格僅接受 IP 位址!
1. 選取僅允許輸入 IP 位址的儲存格範圍,然後點擊 Kutools> 限制輸入> 僅能輸入 IP 位址。 請參閱截圖:

2. 接著在彈出的 Kutools for Excel 對話方塊中,點擊「確定」。

從現在起,僅能向限定區域儲存格範圍中輸入 IP 位址格式的資料。

想免費試用此工具 30 天嗎?立即下載,並依照上述步驟操作!
最佳 Office 生產力工具
| 🤖 | KUTOOLS AI 助手:基於以下內容徹底革新數據分析:智慧執行 | 產生程式碼| 建立自訂公式 | 分析資料並產生圖表| 呼叫增強函數…… |
| 熱門功能:尋找、醒目提示或標記重複值 | 刪除空白行 | 合併列或儲存格而不遺失資料 | 不使用公式的四捨五入…… | |
| 高級 LOOKUP:多重條件 VLookup | 多重數值 VLookup | 跨多個工作表 VLookup | 模糊查找…… | |
| 高級下拉列表:快速建立下拉式清單 | 相依式下拉式清單 | 多選下拉式清單…… | |
| 欄位管理員:新增指定數量的欄位|移動欄位|切換隱藏欄位的可見狀態|比較範圍與欄位…… | |
| 精選功能:網格聚焦 | 設計視圖 |增強編輯欄 | 工作簿與工作表管理員 | 資源庫(自動文字)| 日期提取 | 合併工作表 | 加密/解密儲存格 | 依清單傳送電子郵件 | 超級篩選 | 特殊篩選(篩選粗體儲存格/斜體/刪除線……) ...... | |
| 頂尖 15 工具組:12 文字工具(添加文本,刪除特定字符,……)| 50+ 圖表 類型(甘特圖,……)| 40+ 實用公式(基於生日計算年齡,……)| 19 插入工具(插入二維碼,從路徑插入圖片,……)| 12 轉換工具(金額轉大寫,匯率轉換,……)| 7 合併和拆分工具(高級合併行,分割儲存格,……)|……以及更多 |
運用 Kutools for Excel 強化您的 Excel 技能,體驗前所未有的高效能!Kutools for Excel 提供超過 300 項進階功能,大幅提升生產力並節省寶貴時間。立即點擊,取得您最需要的功能……
Office Tab 為 Office 帶來分頁式介面,讓您的工作更輕鬆自在!
- 在 Word、Excel、PowerPoint 中啟用分頁式編輯與閱讀功能,以及 Access、Visio 與 Project。
- 在同視窗的新分頁中開啟並建立多份文件,而非另開新視窗。
- 每天為您提升 50% 的工作效率,並省下數百次滑鼠點擊!
所有 Kutools 增益集,一個安裝程式
Kutools for Office 套件整合了 Excel、Word、Outlook 與 PowerPoint 的增益集,以及 Office Tab Pro,非常適合需要跨多個 Office 應用程式協作的團隊使用!
- 全能套件— 包含 Excel、Word、Outlook 與 PowerPoint 增益集,以及 Office Tab Pro
- 一個安裝程式,一個授權— 數分鐘內即可完成設定(支援 MSI)
- 協同運作更出色— 在多個 Office 應用程式間實現流暢的生產力體驗
- 30 天完整功能試用— 無需註冊,無需信用卡
- 超值之選— 比單獨購買各增益集更省費用