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

วิธีลบอักขระที่ไม่ใช่ภาษาอังกฤษในคอลัมน์ Excel

ตัวอย่างเช่น, นี่คือรายชื่อของชื่อที่มีอักขระที่ไม่ใช่ภาษาอังกฤษ คุณจะลบเซลล์ที่มีอักขระที่ไม่ใช่ภาษาอังกฤษใน Excel ได้อย่างไร?

ลบแถวที่มีอักขระที่ไม่ใช่ภาษาอังกฤษโดย VBA

ลบอักขระที่ไม่ใช่ภาษาอังกฤษออกจากสตริงโดย Remove Charactersความคิดที่ดี 3


ลบแถวที่มีอักขระที่ไม่ใช่ภาษาอังกฤษโดย VBA

นี่คือ VBA ที่สามารถลบแถวที่มีอักขระที่ไม่ใช่ภาษาอังกฤษใน Excel

1. ใช้งานแผ่นงานที่มีอักขระที่คุณต้องการลบแล้วกด Alt + F11 คีย์เพื่อเปิดใช้งานไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

2 คลิก สิ่งที่ใส่เข้าไป > โมดูลและวางโค้ดด้านล่างลงในไฟล์ โมดูล.

VBA: ลบอักขระที่ไม่ใช่ภาษาอังกฤษ

Sub RemoveNonEnglish()
'UpdatebyExtendoffice20171204
    Dim xRg As Range
    Dim xCell As Range
    Dim I As Long
    Dim J As Long
    Dim xRows As Long
    Dim xAsc As Long
    On Error Resume Next
    Set xRg = Application.InputBox("Select single column:", "KuTools For Excel", Selection.Address, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    xRows = xRg.Rows.Count
    Set xRg = xRg(1)
    For I = 1 To xRows
        Set xCell = xRg.Offset(I - 1)
        If xCell.Value <> "" Then
            For J = 1 To Len(xCell.Value)
                xAsc = Asc(UCase(Mid(xCell.Value, J, 1)))
                If xAsc < 65 Or xAsc > 90 Then
                    xCell.EntireRow.Delete
                    I = I - 1
                    Exit For
                End If
            Next
        End If
    Next
    Application.ScreenUpdating = True
    MsgBox "Completed...", vbInformation
End Sub

doc ลบตัวอักษรที่ไม่ใช่ภาษาอังกฤษ 1

3 กด F5 เพื่อเลือกรายการคอลัมน์ที่คุณต้องการใช้ในกล่องโต้ตอบ popping
doc ลบตัวอักษรที่ไม่ใช่ภาษาอังกฤษ 2

4 คลิก OK > OKจากนั้นแถวที่มีอักขระที่ไม่ใช่ภาษาอังกฤษจะถูกลบออก
doc ลบตัวอักษรที่ไม่ใช่ภาษาอังกฤษ 3

doc ลบตัวอักษรที่ไม่ใช่ภาษาอังกฤษ 4 doc ลูกศรขวา doc ลบตัวอักษรที่ไม่ใช่ภาษาอังกฤษ 5

หมายเหตุ: VBA นี้ใช้ได้กับคอลัมน์เดียวเท่านั้น


ลบอักขระที่ไม่ใช่ภาษาอังกฤษออกจากสตริงโดย Remove Characters

หากคุณต้องการลบอักขระที่ไม่ใช่ภาษาอังกฤษออกจากสตริงตามภาพด้านล่างนี้คุณสามารถสมัครได้ Kutools สำหรับ Excel's ลบอักขระ คุณลักษณะที่จะทำให้เสร็จได้อย่างรวดเร็ว

doc ลบตัวอักษรที่ไม่ใช่ภาษาอังกฤษ 6 doc ลูกศรขวา doc ลบตัวอักษรที่ไม่ใช่ภาษาอังกฤษ 7
Kutools สำหรับ Excel, ที่มีมากกว่า 300 ฟังก์ชั่นที่มีประโยชน์ทำให้งานของคุณง่ายขึ้น 

หลังจากการติดตั้ง Kutools สำหรับ Excel โปรดทำดังนี้:(ดาวน์โหลด Kutools for Excel ฟรีทันที!)

1. เลือกช่วงที่คุณต้องการแล้วคลิก Kutools > ข้อความ > ลบอักขระ. ดูภาพหน้าจอ:
doc ลบตัวอักษรที่ไม่ใช่ภาษาอังกฤษ 8

2 ตรวจสอบ ไม่ใช่อัลฟ่า เฉพาะใน ลบอักขระ คุณสามารถดูผลลัพธ์ได้ในไฟล์ ดูตัวอย่าง ก่อน
doc ลบตัวอักษรที่ไม่ใช่ภาษาอังกฤษ 9

3 คลิก Okอักขระที่ไม่ใช่ภาษาอังกฤษถูกลบออกจากสตริง
doc ลบตัวอักษรที่ไม่ใช่ภาษาอังกฤษ 7

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

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

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

kte แท็บ 201905


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

  • เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
  • เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
  • เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!
Comments (3)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
How do i get rid of non-english characters in an essy even if i deleted comas, fullstops, apostrophes etc.....but keeps on popping?
This comment was minimized by the moderator on the site
Hi, Husama Abass, please give me more description about your question, I do not get it clearly.
This comment was minimized by the moderator on the site
Hi. I used this just now to remove Chinese characters from may crew list but it also removed the spaces in between the alpha names. Hoping that there is an option to remove non-alpha characters but leave out spaces in the process.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations