เคล็ดลับ: ภาษาอื่น ๆ ได้รับการแปลโดย Google คุณสามารถเยี่ยมชม English รุ่นของลิงก์นี้
เข้าสู่ระบบ
x
or
x
x
สมัครสมาชิก
x

or

วิธีการแยกตัวอักษรตัวแรกของแต่ละคำออกจากเซลล์?

สมมติว่าคุณมีรายชื่อประเทศในแผ่นงานของคุณและตอนนี้คุณต้องแยกตัวอักษรตัวแรกของแต่ละคำในเซลล์ดังภาพต่อไปนี้ โดยปกติแล้วไม่มีคุณลักษณะตรงที่จะรับอักษรตัวแรกของแต่ละคำใน Excel แต่ที่นี่ฉันสามารถพูดคุยเกี่ยวกับวิธีที่เป็นประโยชน์ในการแก้ปัญหานี้

doc-สารสกัดแรก letter1

แยกตัวอักษรตัวแรกของแต่ละคำออกจากเซลล์ด้วยฟังก์ชันที่ผู้ใช้กำหนดเอง

เครื่องมือเพิ่มประสิทธิภาพที่แนะนำสำหรับ Excel / Office

แท็บ Office: นำการแก้ไขแท็บไปใช้ Excel และซอฟต์แวร์ Office อื่น ๆ เช่นเดียวกับ Chrome, Firefox และ Safariการทดลองใช้ฟรีไม่ จำกัด 30 วัน

Kutools สำหรับ Excel: คุณลักษณะที่มีประสิทธิภาพของ 300 ช่วยให้ Excel ใช้งานได้ง่ายและเพิ่มประสิทธิภาพการทำงานได้ทันทีการทดลองใช้ฟรีไม่ จำกัด 60 วัน


ลูกศรสีฟ้าด้านขวาแยกตัวอักษรตัวแรกของแต่ละคำออกจากเซลล์ด้วยฟังก์ชันที่ผู้ใช้กำหนดเอง


ใน Excel คุณสามารถสร้าง a ฟังก์ชันที่กำหนดโดยผู้ใช้ เพื่อแยกตัวอักษรตัวแรกของทุกคำในเซลล์ โปรดทำดังนี้:

1. กดค้างไว้ ALT + F11 คีย์เพื่อเปิด หน้าต่าง Microsoft Visual Basic for Applications.

2. คลิก สิ่งที่ใส่เข้าไป > โมดูลและวางรหัสต่อไปนี้ลงใน หน้าต่างโมดูล</ p>

Function GetFirstLetters(rng As Range) As String
'Update 20140325
    Dim arr
    Dim I As Long
    arr = VBA.Split(rng, " ")
    If IsArray(arr) Then
        For I = LBound(arr) To UBound(arr)
            GetFirstLetters = GetFirstLetters & Left(arr(I), 1)
        Next I
    Else
        GetFirstLetters = Left(arr, 1)
    End If
End Function

3. จากนั้นให้บันทึกและปิดโค้ดนี้กลับไปที่แผ่นงานและป้อนสูตรนี้ = GetFirstLetters (A2) (A2 หมายถึงเซลล์ที่คุณต้องการแยกตัวอักษรตัวแรกออกคุณสามารถเปลี่ยนได้ตามความต้องการ) ลงในเซลล์ว่าง ดูภาพหน้าจอ:

doc-สารสกัดแรก letter1

4. แล้วกด เข้าสู่ คีย์และเลือกเซลล์ B2 จากนั้นลากที่จับเติมเพื่อเซลล์ที่คุณต้องการใช้สูตรนี้ และตัวอักษรตัวแรกทั้งหมดจะถูกแยกออกจากชุดคำต่างๆดูภาพหน้าจอ:

doc-สารสกัดแรก letter1


บทความที่เกี่ยวข้อง:

วิธีการแยกคำแรก / สุดท้าย / nth จากสตริงข้อความใน Excel?



เครื่องมือเพิ่มประสิทธิภาพที่แนะนำ

แท็บ Office

gold star1 นำแท็บที่มีประโยชน์ไปยัง Excel และซอฟต์แวร์ Office อื่น ๆ เช่นเดียวกับ Chrome, Firefox และ Internet Explorer ใหม่

Kutools สำหรับ Excel

gold star1 น่าทึ่ง! เพิ่มประสิทธิภาพการทำงานของคุณในอีก 5 นาที ไม่จำเป็นต้องมีทักษะพิเศษประหยัดสองชั่วโมงทุกวัน!

gold star1 300 คุณสมบัติใหม่สำหรับ Excel, Make Excel ง่ายมากและมีประสิทธิภาพ:

  • ผสานเซลล์ / แถว / คอลัมน์โดยไม่สูญเสียข้อมูล
  • รวมและรวมแผ่นงานหลายแผ่นและสมุดงาน
  • เปรียบเทียบช่วง, คัดลอกหลายช่วง, แปลงข้อความเป็นวันที่, หน่วยและการแปลงสกุลเงิน
  • นับตามสี, เพจย่อยย่อย, การเรียงลำดับขั้นสูงและตัวกรอง Super,
  • เพิ่มเติมเลือก / แทรก / ลบ / ข้อความ / รูปแบบ / ลิงก์ / ความคิดเห็น / เวิร์คบุ๊ค / แผ่นงานเครื่องมือ ...

ภาพหน้าจอของ Kutools for Excel

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Oleg · 9 months ago
    Подскажите пожалуйста, можно ли модифицировать код чтобы забиралась не первые а Заглавные буквы?
  • To post as a guest, your comment is unpublished.
    nawal jha · 2 years ago
    i think it has one bug, it's automatically removed from module when sheet is closed, need to again every time when open sheet same process to be required, please advice how to save this formula in excel permanently.
  • To post as a guest, your comment is unpublished.
    NoOne · 2 years ago
    Please include this part:

    If you create a function called DISCOUNT in a workbook called Personal.xlsb and you call that function from another workbook, you must type =personal.xlsb!discount(), not simply =discount().

    https://support.office.com/en-us/article/Create-Custom-Functions-in-Excel-2007-2f06c10b-3622-40d6-a1b2-b6748ae8231f
  • To post as a guest, your comment is unpublished.
    Adam Pavey · 2 years ago
    Very helpful. Exactly what I was after.
  • To post as a guest, your comment is unpublished.
    Sridhar · 3 years ago
    Thank you very much.. its working.. u rocks