ไปยังเนื้อหาหลัก

วิธีการเพิ่มที่อยู่ IP ด้วยศูนย์ใน Excel

เมื่อได้รับแผ่นงานที่มีที่อยู่ IP บางส่วนที่มีตัวเลขสองหลักในบางส่วนคุณอาจต้องการเติมที่อยู่ IP ด้วยเลขศูนย์ถึงสามหลักในทุกส่วนดังภาพด้านล่าง ในบทความนี้ฉันแนะนำเทคนิคบางอย่างในการเพิ่มที่อยู่ IP ใน Excel อย่างรวดเร็ว
doc pad ip ที่มีศูนย์ 1

Pad ที่อยู่ IP ด้วยศูนย์ตามสูตร

แพดที่อยู่ IP ด้วยศูนย์โดยฟังก์ชันที่กำหนด

Pad ที่อยู่ IP ด้วยศูนย์ตามสูตร

นี่คือสูตรยาวที่สามารถช่วยให้คุณใส่ที่อยู่ IP ด้วยศูนย์ได้อย่างรวดเร็ว

เลือกเซลล์ว่างพิมพ์สูตรนี้

=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 คือที่อยู่ IP ที่คุณใช้กด เข้าสู่ ลากเติมที่จับลงไปที่เซลล์ที่ต้องการสูตรนี้ ดูภาพหน้าจอ:

doc pad ip ที่มีศูนย์ 2
doc ลูกศรลง
doc pad ip ที่มีศูนย์ 3

แพดที่อยู่ IP ด้วยศูนย์โดยฟังก์ชันที่กำหนด

หากคุณคุ้นเคยกับรหัส VBA นี่คือรหัสที่สามารถช่วยคุณในการเพิ่มที่อยู่ IP ได้

1 กด Alt + F11 คีย์เพื่อเปิดใช้งาน Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่างคลิก สิ่งที่ใส่เข้าไป > โมดูล เพื่อสร้างโมดูลใหม่ ดูภาพหน้าจอ:
doc pad ip ที่มีศูนย์ 4

2 ใน โมดูล สคริปต์วางโค้ดด้านล่างลงไปจากนั้นบันทึกโค้ดและปิดหน้าต่าง VBA ดูภาพหน้าจอ:

VBA: Pad ที่อยู่ IP

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

doc pad ip ที่มีศูนย์ 5

3. ไปที่เซลล์ว่างที่คุณจะวางผลลัพธ์จากการคำนวณพิมพ์สูตรนี้ = IP (A1)กดปุ่ม Enter แล้วลากที่จับเติมลงไปที่เซลล์ที่คุณต้องการ ดูภาพหน้าจอ:

doc pad ip ที่มีศูนย์ 6 ลูกศรยิงไปทางขวา doc pad ip ที่มีศูนย์ 7

บทความสัมพัทธ์

สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน

🤖 Kutools AI ผู้ช่วย: ปฏิวัติการวิเคราะห์ข้อมูลโดยยึดตาม: การดำเนินการที่ชาญฉลาด   |  สร้างรหัส  |  สร้างสูตรที่กำหนดเอง  |  วิเคราะห์ข้อมูลและสร้างแผนภูมิ  |  เรียกใช้ฟังก์ชัน Kutools...
คุณสมบัติยอดนิยม: ค้นหา เน้น หรือระบุรายการที่ซ้ำกัน   |  ลบแถวว่าง   |  รวมคอลัมน์หรือเซลล์โดยไม่สูญเสียข้อมูล   |   รอบโดยไม่มีสูตร ...
การค้นหาขั้นสูง: VLookup หลายเกณฑ์  |   VLookup หลายค่า  |   VLookup ข้ามหลายแผ่น   |   การค้นหาที่ไม่ชัดเจน ....
รายการแบบเลื่อนลงขั้นสูง: สร้างรายการแบบหล่นลงอย่างรวดเร็ว   |  รายการแบบหล่นลงขึ้นอยู่กับ   |  เลือกหลายรายการแบบหล่นลง ....
ผู้จัดการคอลัมน์: เพิ่มจำนวนคอลัมน์เฉพาะ  |  ย้ายคอลัมน์  |  สลับสถานะการมองเห็นของคอลัมน์ที่ซ่อนอยู่  |  เปรียบเทียบช่วงและคอลัมน์ ...
คุณสมบัติเด่น: กริดโฟกัส   |  มุมมองการออกแบบ   |   บาร์สูตรใหญ่   |  สมุดงานและตัวจัดการชีต   |  ห้องสมุดทรัพยากร (ข้อความอัตโนมัติ)   |  เลือกวันที่   |  รวมแผ่นงาน   |  เข้ารหัส/ถอดรหัสเซลล์   |  ส่งอีเมลตามรายการ   |  ซุปเปอร์ฟิลเตอร์   |   ตัวกรองพิเศษ (กรองตัวหนา/ตัวเอียง/ขีดทับ...) ...
ชุดเครื่องมือ 15 อันดับแรก:  12 ข้อความ เครื่องมือ (เพิ่มข้อความ, ลบอักขระ, ... )   |   50 + แผนภูมิ ประเภท (แผนภูมิ Gantt, ... )   |   40+ ใช้งานได้จริง สูตร (คำนวณอายุตามวันเกิด, ... )   |   19 การแทรก เครื่องมือ (ใส่ QR Code, แทรกรูปภาพจากเส้นทาง, ... )   |   12 การแปลง เครื่องมือ (ตัวเลขเป็นคำ, การแปลงสกุลเงิน, ... )   |   7 ผสานและแยก เครื่องมือ (แถวรวมขั้นสูง, แยกเซลล์, ... )   |   ... และอื่น ๆ

เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา  คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...

รายละเอียด

แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก

  • เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
  • เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
  • เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!
Comments (1)
No ratings yet. Be the first to rate!
Chris H
Chris H
This comment was minimized by the moderator on the site
The Excel equation above has a flaw that will yield incorrect padded IPv4s in some circumstances. Use this instead:
=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("~",SUBSTITUTE(A1,".","~",2))),"000.")&TEXT(MID(A1,FIND("~",SUBSTITUTE(A1,".","~",3))+1,LEN(A1)-FIND(".",A1)-1),"000")
Reply
0
0
There are no comments posted here yet
Please leave your comments in English
Guest
Posting as Guest
×
Rate this post:
Reset
0   Characters
Suggested Locations