Computer >> บทช่วยสอนคอมพิวเตอร์ >  >> ซอฟต์แวร์ >> Office

7 เทคนิคลบศูนย์ (0) ใน Excel ทำให้ข้อมูลสะอาด พร้อมใช้งาน

บทความนี้แนะนำ 7 วิธีลบศูนย์ (0) ใน Excel บ่อยครั้งที่เราทำงานกับไฟล์ที่คนอื่นสร้าง พบรูปแบบตัวเลขหลากหลาย เช่น หมายเลขโทรศัพท์ที่มีศูนย์นำหน้า (Leading zeros) หรือเซลล์ที่มีค่าเป็นแค่ 0 ซึ่งอาจส่งผลต่อการคำนวณ (เช่น ค่าเฉลี่ย) โชคดีที่ Excel มีหลายวิธีจัดการทั้ง 2 กรณี มาดูกัน

ดาวน์โหลดไฟล์ฝึกปฏิบัติ

ดาวน์โหลดไฟล์ตัวอย่างที่นี่

7 วิธีง่าย ลบ 0 ใน Excel

1. ใช้ Find and Replace ลบค่า 0 ทั้งหมด

ต้องการลบเซลล์ที่มีค่าเป็น 0 เพียงอย่างเดียว (ไม่ใช่ 0 ในตัวเลขอย่าง 100, 80) ใช้ Find and Replace ตั้งค่า Match entire cell contents

ขั้นตอน:

  • เลือกช่วงข้อมูล (B5:B13)

7 เทคนิคลบศูนย์ (0) ใน Excel ทำให้ข้อมูลสะอาด พร้อมใช้งาน

  • กด Ctrl+H (ไม่ใช่ Ctrl+T) เปิดหน้าต่าง Find and Replace → แท็บ Replace
  • Find what: พิมพ์ 0
  • Replace with: ทิ้งว่าง
  • ติ๊ก Match entire cell contents (สำคัญ! ไม่เช่นนั้น 0 ใน 100, 80 จะหายไป)
  • กด Replace All

7 เทคนิคลบศูนย์ (0) ใน Excel ทำให้ข้อมูลสะอาด พร้อมใช้งาน

  • Excel แจ้งจำนวนที่แทนที่ → OK

7 เทคนิคลบศูนย์ (0) ใน Excel ทำให้ข้อมูลสะอาด พร้อมใช้งาน

  • ค่า 0 ทั้งหมดหายไป เหลือเซลล์ว่าง

7 เทคนิคลบศูนย์ (0) ใน Excel ทำให้ข้อมูลสะอาด พร้อมใช้งาน

2. ลบ Leading Zeros ด้วย Error Checking (Convert Text to Number)

บางครั้ง Leading zeros มาจากการจัดรูปแบบเป็น Text แปลงเป็น Number ได้ทีละคลิก

ขั้นตอน:

  • เลือกข้อมูลที่มี Leading zeros (B5:B13) → จะเห็นไอคอนสามเหลี่ยมเหลืองมุมซ้ายบน

7 เทคนิคลบศูนย์ (0) ใน Excel ทำให้ข้อมูลสะอาด พร้อมใช้งาน

  • คลิกไอคอนเหลือง → เลือก Convert to Number

7 เทคนิคลบศูนย์ (0) ใน Excel ทำให้ข้อมูลสะอาด พร้อมใช้งาน

  • Leading zeros หายไป กลายเป็นตัวเลขธรรมดา

7 เทคนิคลบศูนย์ (0) ใน Excel ทำให้ข้อมูลสะอาด พร้อมใช้งาน

3. ลบ Leading Zeros ด้วยการเปลี่ยน Custom Number Format

บางครั้ง Leading zeros มาจาก Custom Number Format (เช่น จบ 5 หลักเสมอ) แก้ได้โดยเปลี่ยนเป็น General

ขั้นตอน:

  • เลือกข้อมูล (B5:B11)

7 เทคนิคลบศูนย์ (0) ใน Excel ทำให้ข้อมูลสะอาด พร้อมใช้งาน

  • ไปแท็บ Home → กลุ่ม Number → ดรอปดาวน์เลือก General

7 เทคนิคลบศูนย์ (0) ใน Excel ทำให้ข้อมูลสะอาด พร้อมใช้งาน

7 เทคนิคลบศูนย์ (0) ใน Excel ทำให้ข้อมูลสะอาด พร้อมใช้งาน

  • Leading zeros หายไป

7 เทคนิคลบศูนย์ (0) ใน Excel ทำให้ข้อมูลสะอาด พร้อมใช้งาน

4. ลบ Leading Zeros ด้วย Paste Special (Add)

วิธีนี้ใช้ได้ทั้ง Text Format และ Custom Format วิธีคือบวก 0 เข้าไป (Paste Special > Add)

ขั้นตอน:

  • เลือกเซลล์ว่างใดๆ → Copy (Ctrl+C)

7 เทคนิคลบศูนย์ (0) ใน Excel ทำให้ข้อมูลสะอาด พร้อมใช้งาน

  • เลือกข้อมูลเป้าหมาย (B5:B13) → คลิกขวา Paste Special

7 เทคนิคลบศูนย์ (0) ใน Excel ทำให้ข้อมูลสะอาด พร้อมใช้งาน

  • ในหน้าต่าง Paste Special: เลือก Add ในกลุ่ม Operation → OK

7 เทคนิคลบศูนย์ (0) ใน Excel ทำให้ข้อมูลสะอาด พร้อมใช้งาน

  • Leading zeros หาย ไปพร้อมกัน

7 เทคนิคลบศูนย์ (0) ใน Excel ทำให้ข้อมูลสะอาด พร้อมใช้งาน

5. ใช้ฟังก์ชัน VALUE ลบ Leading Zeros

ฟังก์ชัน VALUE แปลงข้อความที่เป็นตัวเลข → ตัวเลขจริง ใช้ได้ทั้ง Text และ Custom Format

ขั้นตอน:

  • ที่ C5 ใส่: =VALUE(B5)

7 เทคนิคลบศูนย์ (0) ใน Excel ทำให้ข้อมูลสะอาด พร้อมใช้งาน

  • ลาก Fill Handle คัดลอกสูตรลงไป

7 เทคนิคลบศูนย์ (0) ใน Excel ทำให้ข้อมูลสะอาด พร้อมใช้งาน

  • ได้ตัวเลขไม่มี Leading zeros

6. ลบ Leading Zeros จากข้อความผสม (Text + Digits) ด้วยฟังก์ชันรวม

กรณีเซลล์มีทั้งตัวอักษรและตัวเลข (เช่น "000ABCD") ใช้ชุดฟังก์ชัน: RIGHT, LEN, FIND, LEFT, SUBSTITUTE

สูตร:

=RIGHT(B5,LEN(B5)-FIND(LEFT(SUBSTITUTE(B5,"0",""),1),B5)+1)

7 เทคนิคลบศูนย์ (0) ใน Excel ทำให้ข้อมูลสะอาด พร้อมใช้งาน

7 เทคนิคลบศูนย์ (0) ใน Excel ทำให้ข้อมูลสะอาด พร้อมใช้งาน

แยกวิเคราะห์สูตร:

  • SUBSTITUTE(B5,"0","") → ลบ 0 ทั้งหมด เหลือ "ABCD"
  • LEFT(...,1) → ตัวอักษรแรก "A"
  • FIND("A",B5) → หาตำแหน่งของ "A" ในสตริงเดิม = 3
  • LEN(B5) - 3 + 1 → ความยาวที่ต้องการเก็บ
  • RIGHT(...) → ดึงข้อความขวาส่วนที่ไม่มีศูนย์นำหน้า

7. ลบ Leading Zeros ด้วย VBA Macro

ใช้ VBA เปลี่ยน Format เป็น General แล้วเขียนค่าทับเดิม

ขั้นตอน:

  • เลือกข้อมูล (B5:B13)

7 เทคนิคลบศูนย์ (0) ใน Excel ทำให้ข้อมูลสะอาด พร้อมใช้งาน

  • คลิกขวาที่ชื่อ Sheet → View Code

7 เทคนิคลบศูนย์ (0) ใน Excel ทำให้ข้อมูลสะอาด พร้อมใช้งาน

  • วางโค้ดใน Module:
Sub RemoveZero() 
    Dim Range As Range 
    Dim WorkRange As Range 
    On Error Resume Next 
    xTitleId = "Excel" 
    Set WorkRange = Application.Selection 
    Set WorkRange = Application.InputBox("Range", xTitleId, WorkRange.Address, Type:=8) 
    WorkRange.NumberFormat = "General" 
    WorkRange.Value = WorkRange.Value 
End Sub

7 เทคนิคลบศูนย์ (0) ใน Excel ทำให้ข้อมูลสะอาด พร้อมใช้งาน

  • กด Run (F5)

7 เทคนิคลบศูนย์ (0) ใน Excel ทำให้ข้อมูลสะอาด พร้อมใช้งาน

  • Leading zeros หายหมดจากข้อมูล

7 เทคนิคลบศูนย์ (0) ใน Excel ทำให้ข้อมูลสะอาด พร้อมใช้งาน

สรุป

บทความนี้ครอบคลุม 7 วิธี: 1) Find & Replace (ลบค่า 0 เป๊ะ) 2) Error Checking (Text→Number) 3) เปลี่ยน Format เป็น General 4) Paste Special Add 5) ฟังก์ชัน VALUE 6) สูตรรวมสำหรับข้อความผสม 7) VBA Macro เลือกวิธีที่เหมาะกับรูปแบบข้อมูลของคุณครับ