วิธีแยกชื่อย่อจากชื่อใน Excel

เมื่อคุณกำลังประมวลผลบันทึกของลูกค้าหรือทำจดหมายเวียนการเรียกชื่อย่อจากชื่อที่กำหนดอาจเป็นประโยชน์สำหรับคุณตัวอย่างเช่น HG สำหรับ Hal Greer ดังนั้นที่นี่ฉันจะแนะนำเทคนิคบางอย่างเพื่อให้คุณแยกชื่อย่อจากรายการชื่อใน Excel ได้อย่างรวดเร็ว

แยกชื่อย่อด้วยสูตรใน Excel

แยกชื่อย่อโดยใช้ฟังก์ชันที่กำหนดใน Excel

แยกชื่อย่อด้วยสูตรใน Excel

วิธีแรกคือการใช้สูตรเพื่อแยกชื่อย่อจากชื่อใน Microsoft Excel

เลือกเซลล์ว่างตัวอย่างเช่นเซลล์ C2 พิมพ์สูตรนี้ =LEFT(A2)&IF(ISNUMBER(FIND(" ",A2)),MID(A2,FIND(" ",A2)+1,1),"")&IF(ISNUMBER(FIND(" ",A2,FIND(" ",A2)+1)),MID(A2,FIND(" ",A2,FIND(" ",A2)+1)+1,1),"")(A2 คือเซลล์แรกของรายการชื่อของคุณ) ให้กด เข้าสู่ จากนั้นลากที่จับเติมเพื่อเติมช่วง ตอนนี้คุณจะเห็นชื่อย่อทั้งหมดของแต่ละชื่อถูกดึงออกมาจากรายการชื่อ

แยกชื่อย่อโดยใช้ฟังก์ชันที่กำหนดใน Excel

นอกจากสูตรแล้วคุณสามารถใช้ฟังก์ชันที่กำหนดเพื่อแยกชื่อย่อจากชื่อที่ระบุได้อย่างง่ายดายใน Microsoft Excel

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

2. ในหน้าต่างป็อปอัพคลิก สิ่งที่ใส่เข้าไป > โมดูลจากนั้นวางรหัส VBA ต่อไปนี้ลงในโมดูล

VBA: แยกชื่อย่อจากชื่อ

Function FirstCharacters(pWorkRng As Range) As String
'Updateby20140514
Dim arr As Variant
Dim xValue As String
Dim OutValue As String
xValue = pWorkRng.Value
arr = VBA.Split(Trim(xValue))
For i = 0 To UBound(arr)
    OutValue = OutValue & VBA.Left(arr(i), 1) & "."
Next
FirstCharacters = OutValue
End Function

3. บันทึกรหัสและปิดหน้าต่างเลือกเซลล์ว่างแล้วพิมพ์สูตรนี้ = FirstCharacters (A2)จากนั้นกด เข้าสู่ แล้วลากที่จับเติมเพื่อเติมช่วงที่คุณต้องการ หลังจากนั้นคุณจะเห็นชื่อย่อของแต่ละชื่อที่แยกออกมา

ปลาย: คุณสามารถเปลี่ยนตัวคั่น "" ชื่อย่อตามที่คุณต้องการใน VBA ข้างต้น

บทความญาติ:

• แยกค่าที่ไม่ซ้ำกันใน Excel
• แยกข้อความตัวหนาใน Excel