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

or

วิธีการแบ่งเซลล์ค่าในแนวตั้งใน Excel?

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

แบ่งเซลล์ออกเป็นแถวตามแนวตั้งโดยใช้ตัวคั่นด้วยรหัส VBA

แบ่งเซลล์ออกเป็นแถวตามแนวตั้งโดยคั่นด้วย Kutools for Excel


แบ่งเซลล์ออกเป็นแถวตามแนวตั้งโดยใช้ตัวคั่นด้วยรหัส VBA


รหัส VBA ต่อไปนี้สามารถช่วยให้คุณแบ่งค่าของเซลล์ลงในแถวตามแนวตั้งโดยใช้ตัวคั่นตามที่คุณต้องการโปรดทำดังนี้:

1. กดค้างไว้ ALT + F11 คีย์เพื่อเปิด Microsoft Visual Basic สำหรับแอ็พพลิเคชัน หน้าต่าง

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

รหัส VBA: แบ่งเซลล์ออกเป็นแถวตามแนวตั้งโดยใช้ตัวคั่นเฉพาะ

Sub splitvertically()
'updatebyExtendoffice 20160303
    Dim xRg As Range
    Dim xOutRg As Range
    Dim xCell As Range
    Dim xTxt As String
    Dim xStr As String
    Dim xOutArr As Variant
    On Error Resume Next
    xTxt = ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Set xOutRg = Application.InputBox("please select output cell:", "Kutools for Excel", , , , , , 8)
    If xOutRg Is Nothing Then Exit Sub
    For Each xCell In xRg
        If xStr = "" Then
            xStr = xCell.Value
        Else
            xStr = xStr & ";" & xCell.Value
        End If
    Next
    xOutArr = VBA.Split(xStr, ";")
    xOutRg.Range("A1").Resize(UBound(xOutArr) + 1, 1) = Application.WorksheetFunction.Transpose(xOutArr)
End Sub

3. จากนั้นกด F5 เพื่อเรียกใช้รหัสนี้และกล่องพร้อมท์จะปรากฏขึ้นเพื่อเตือนให้คุณเลือกค่าของเซลล์ที่คุณต้องการแบ่งตามแนวตั้งดูภาพหน้าจอ:

doc แยกตามแนวตั้ง 1

4. จากนั้นคลิก OK ปุ่มอื่นจะปรากฏขึ้นเพื่อเตือนให้คุณเลือกเซลล์เพื่อใส่ผลดูภาพหน้าจอ:

doc แยกตามแนวตั้ง 2

5. คลิก OK และค่าเซลล์ถูกแบ่งออกเป็นรายการโดยคั่นโปรดดูภาพหน้าจอ:

doc แยกตามแนวตั้ง 3

หมายเหตุ: ในโค้ดด้านบนคุณสามารถเปลี่ยนเครื่องหมายอัฒภาค ; ตัวคั่นอื่น ๆ ที่คุณต้องการ


แบ่งเซลล์ออกเป็นแถวตามแนวตั้งโดยคั่นด้วย Kutools for Excel

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

Kutools สำหรับ Excel : มี Excel Add-ins ที่มีประโยชน์มากกว่า 300 และสามารถทดลองใช้ฟรีโดยไม่มีข้อ จำกัด ใน 60 วัน.

หลังจากการติดตั้ง Kutools สำหรับ Excelโปรดทำดังนี้

1. เลือกเซลล์ที่คุณต้องการแบ่งเป็นแถวโดยตัวคั่นที่ระบุ

2. จากนั้นคลิก Kutools > ข้อความ > แยกเซลล์, ดูภาพหน้าจอ:

doc แยกตามแนวตั้ง 4

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

doc แยกตามแนวตั้ง 5

4. จากนั้นคลิก Ok ในกล่อง popping เลือกเซลล์เพื่อส่งออกผลดูภาพหน้าจอ:

doc แยกตามแนวตั้ง 6

5. และคลิก OK ค่าเซลล์ถูกแยกออกเป็นแถวตามตัวคั่นเฉพาะดังภาพต่อไปนี้:

doc แยกตามแนวตั้ง 7

ดาวน์โหลดและทดลองใช้ฟรี Kutools สำหรับ Excel Now!


Demo: แบ่งเซลล์ออกเป็นแถวเรียงตามแนวตั้งโดยคั่นด้วย Kutools for Excel

Kutools สำหรับ Excel: มี Excel Add-ins ที่มีประโยชน์มากกว่า 200 และสามารถทดลองใช้ฟรีโดยไม่มีข้อ จำกัด ใน 60 วัน ดาวน์โหลดและทดลองใช้ฟรี Now!


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

แท็บ kte 201905

Kutools สำหรับ Excel ช่วยให้คุณทำงานให้เสร็จก่อนเวลาและโดดเด่นจากฝูงชน

  • มากกว่าคุณสมบัติขั้นสูงที่ทรงพลัง 300 ออกแบบมาสำหรับสถานการณ์การทำงาน 1500 เพิ่มประสิทธิภาพการผลิตโดย 70% ให้เวลากับการดูแลครอบครัวและสนุกกับชีวิตมากขึ้น
  • ไม่จำเป็นต้องจำสูตรและรหัส VBA อีกต่อไปให้สมองได้พักผ่อนจากนี้
  • มาเป็นผู้เชี่ยวชาญของ Excel ใน 3 นาทีการดำเนินการที่ซับซ้อนและซ้ำ ๆ สามารถทำได้ในไม่กี่วินาที
  • ลดการใช้แป้นพิมพ์และเมาส์หลายพันรายการทุกวันบอกลาโรคจากการทำงานตอนนี้
  • 110,000 บุคลากรที่มีประสิทธิภาพสูงและตัวเลือก 300 + บริษัท ที่มีชื่อเสียงระดับโลก
  • ทดลองใช้ 60 เต็มวันฟรี รับประกันคืนเงิน 60 ต่อวัน อัพเกรดและรองรับ 2 ปีฟรี

นำเสนอการท่องเว็บแบบแท็บและแก้ไขไปยัง Microsoft Office ซึ่งมีประสิทธิภาพมากกว่าแท็บของเบราว์เซอร์

  • แท็บ Office ออกแบบมาสำหรับ Word, Excel, PowerPoint และแอปพลิเคชั่น Office อื่น ๆ : Publisher, Access, Visio และ Project
  • เปิดและสร้างเอกสารหลายชุดในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเปิดในหน้าต่างใหม่
  • เพิ่มผลผลิตของคุณโดย 50% และลดการคลิกเมาส์หลายร้อยครั้งทุกวัน!
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.

Be the first to comment.