วิธีแยกคำจากสตริงข้อความใน Excel

การแยกคำออกจากสตริงข้อความ Excel เรียกว่าการแยกวิเคราะห์

เปิด Excel จากนั้นพิมพ์ประโยคที่มีอย่างน้อยสามคำลงในเซลล์ใดๆ ในเวิร์กชีตแรก คุณจะแบ่งประโยคนี้เป็นคำแต่ละคำ

คลิกส่วนหัวเมนู "ข้อมูล" จากนั้นคลิกปุ่ม "ข้อความเป็นคอลัมน์" ฟังก์ชันนี้จะแยกข้อความที่มีคำคั่นด้วยอักขระที่คุณระบุ

คลิกช่องทำเครื่องหมาย "Space" จากนั้นคลิกปุ่ม "เสร็จสิ้น" Excel จะแบ่งประโยคที่คุณเขียนเป็นคอลัมน์แยกกัน แต่ละคอลัมน์จะมีหนึ่งคำจากประโยค

พิมพ์ฟังก์ชัน ลบเครื่องหมายอัญประกาศ "=index([ARRAY],1,[NUMBER OF WORD TO EXTRACT])" ลงในเซลล์ใต้สตริงของคำที่แยกจากกัน แทนที่คำว่า "ARRAY" ด้วยช่วงที่มีสตริงคำ ตัวอย่างเช่น หากคำอยู่ในเซลล์ "A1" ถึง "C1" ให้ป้อนข้อความ "A1:C1" แทนที่ข้อความ "ARRAY" แทนที่ข้อความ "NUMBER OF WORD TO EXTRACT" ด้วยจำนวนคำที่คุณต้องการแยกจากประโยค ตัวอย่างเช่น หากคุณต้องการแยกคำที่สามออกจากช่วง "A1:C1" ให้พิมพ์ "3" สำหรับอาร์กิวเมนต์สุดท้าย

เปิดสเปรดชีต Excel ใหม่ จากนั้นพิมพ์ลำดับคำสามคำขึ้นไปในเซลล์ F4 คุณจะใช้โปรแกรม Visual Basic สั้นๆ เพื่อแยกคำออกจากประโยคนี้

คลิกส่วนหัวของเมนู "นักพัฒนา" จากนั้นคลิกปุ่ม "Visual Basic" สภาพแวดล้อมการเขียนโปรแกรมสำหรับ Excel จะเปิดขึ้น

วางโปรแกรมต่อไปนี้ลงในหน้าต่างที่ปรากฏขึ้น หัวใจของรูทีนย่อยนี้คือฟังก์ชัน "แยก" ซึ่งแยกประโยคออกเป็นคำแต่ละคำ เหมือนกับที่คำสั่ง "Text to Columns" ทำ

Sub Macro1() Dim ar, str1, n str1 = Range("F4") n = Range("F5") - 1 ar = Split (str1, " ") MsgBox "Word number " & n + 1 & " is " & ar (n) จบซับ

คลิกปุ่ม "มาโคร" ของแท็บ "นักพัฒนา" จากนั้นดับเบิลคลิกฟังก์ชัน "Macro1" กล่องข้อความจะปรากฏขึ้นเพื่อระบุคำที่โปรแกรมของคุณดึงมาจากประโยคที่คุณพิมพ์ในขั้นตอนที่ 1

หมวดหมู่

ล่าสุด

วิธีการตั้งค่าเครื่องพิมพ์เครือข่ายบน MacBook Pro

วิธีการตั้งค่าเครื่องพิมพ์เครือข่ายบน MacBook Pro

ตั้งค่าเครื่องพิมพ์เครือข่ายเพื่อให้คุณสามารถพ...

วิธีเชื่อมต่อคอมพิวเตอร์สองเครื่องกับเครื่องพิมพ์หนึ่งเครื่องด้วยสาย USB

วิธีเชื่อมต่อคอมพิวเตอร์สองเครื่องกับเครื่องพิมพ์หนึ่งเครื่องด้วยสาย USB

หากคุณมีคอมพิวเตอร์สองเครื่องและเครื่องพิมพ์เพี...

แป้นพิมพ์ iPad ของฉันจะไม่ปรากฏ

แป้นพิมพ์ iPad ของฉันจะไม่ปรากฏ

แป้นพิมพ์ของ iPad ควรปรากฏขึ้นโดยอัตโนมัติทุกค...