วิธีใช้ Concatenate ใน Excel VBA (4 วิธี)

  • แบ่งปันสิ่งนี้
Hugh West

ใน Excel การต่อข้อมูลคือกระบวนการรวมสองสตริงเข้าด้วยกันเพื่อสร้างเป็นสตริงเดียว พูดง่ายๆ ก็คือ ถ้าเรามีตารางที่มีชื่อในคอลัมน์หนึ่งและนามสกุลในอีกคอลัมน์หนึ่ง เราสามารถใช้ขั้นตอนการต่อข้อมูลเพื่อเชื่อมและรวมตารางเหล่านั้นในเซลล์เดียวได้ในเสี้ยววินาที ใน Excel เรามีฟังก์ชันที่ชื่อว่า CONCATENATE () ที่ช่วยให้เราทำการเชื่อมต่อนี้ อย่างไรก็ตาม ใน VBA ฟังก์ชันประเภทนี้ไม่ได้รับอนุญาต เราไม่สามารถใช้ CONCATENATE () ในรหัส VBA ได้เนื่องจากจะไม่ทำงาน เนื่องจาก VBA ไม่มีฟังก์ชันในตัว และเราไม่สามารถใช้ฟังก์ชันสเปรดชีตได้ ดังนั้น บทเรียนนี้จะสาธิตวิธีการใช้ VBA เชื่อมต่อเพื่อรวมเซลล์ คอลัมน์ และแถวต่างๆ ใน ​​Excel

ดาวน์โหลดแบบฝึกหัดแบบฝึกหัด

ดาวน์โหลดแบบฝึกหัดแบบฝึกหัดนี้ เพื่อออกกำลังกายในขณะที่คุณกำลังอ่านบทความนี้

VBA Concatenate Function.xlsm

Introduction to the VBA Concatenate Function

ตามที่เรามี กล่าวว่า Excel ไม่มีฟังก์ชันในตัวสำหรับ VBA Concatenate แต่เราสามารถทำให้มันทำงานเป็นฟังก์ชันได้โดยการรวมสตริงต่างๆ กับตัวดำเนินการ ที่นี่เราใช้เครื่องหมายและ (&) เป็นตัวดำเนินการ

⟴ ไวยากรณ์

String1 = “ ข้อความแรก”

String2 = “ ข้อความที่สอง”

⟴ ค่าส่งกลับ

Return_value = String1 & String2

4 การใช้ VBA Concatenate ที่แตกต่างกันฟังก์ชันใน Excel

ในที่นี้ เราจะใช้ 4 วิธีที่แตกต่างกันในการดำเนินกระบวนการเชื่อม เราจะใช้ตัวดำเนินการต่างๆ ร่วมกับโค้ด VBA เพื่อให้บรรลุเป้าหมายนี้

1. ใช้ตัวดำเนินการเครื่องหมายและ (&) เพื่อรวมเซลล์ใน VBA Concatenate

ตามที่แสดงใน ภาพหน้าจอด้านล่าง เรามีการรวบรวมข้อมูลสองคอลัมน์ที่มีชื่อในคอลัมน์หนึ่งและนามสกุลในคอลัมน์อื่น เมื่อรวมสองคอลัมน์เข้าด้วยกัน ตอนนี้เราจะได้ชื่อทั้งหมดแล้ว เนื่องจาก VBA ไม่มีวิธีการในตัวสำหรับการต่อข้อมูล เราจะใช้ตัวดำเนินการเครื่องหมายและ (&) ตามรายละเอียดในคำแนะนำด้านล่าง

ขั้นตอนที่ 1:

  • ก่อนอื่น ให้กด Alt + F11 เพื่อเปิด แผ่นงานที่เปิดใช้งานมาโคร
  • จากนั้นคลิก
  • เลือก โมดูล .

ขั้นตอนที่ 2:

  • ในการรวมสองเซลล์เป็นเซลล์เดียว ให้คัดลอกและวาง VBA
3837

ต่อไปนี้ ที่นี่

  • String1 = Cells(5, 2).Value คือตำแหน่งเซลล์แรก B5 แถว 5 และ คอลัมน์ 2 .
  • String2 = Cells(5, 3).Value คือตำแหน่งเซลล์ที่สอง C5 , แถว 5, และคอลัมน์ 3 .
  • เซลล์(5, 5).Value = String1 & String2 คือตำแหน่งเซลล์ผลลัพธ์ E5 , แถว 5 และคอลัมน์ 5 .
  • String1 & String2 เป็นสองสายที่เชื่อมด้วยเครื่องหมายและ (&)

Step3:

  • บันทึกและกด F5 เพื่อเรียกใช้โปรแกรม

ดังนั้น คุณจะได้รับผลลัพธ์ใน E5 เซลล์ของเวิร์กชีตปัจจุบันของคุณ

ขั้นตอนที่ 4:

  • ปฏิบัติตามและทำซ้ำขั้นตอนสำหรับ พักเซลล์และได้ผลลัพธ์ตามภาพด้านล่าง

หมายเหตุ การเรียกใช้ VBA รหัส ทุกครั้งตรวจสอบให้แน่ใจว่าไฟล์ Excel ของคุณบันทึกในรูปแบบ Excel แผ่นงานที่เปิดใช้งานมาโคร (xlsm.)

อ่านเพิ่มเติม: วิธีใช้ VBA StrComp ใน Excel ( 5 ตัวอย่างทั่วไป)

2. ใช้ตัวดำเนินการเครื่องหมายบวก (+) เพื่อรวมเซลล์ใน VBA Concatenate

ตามที่อธิบายไว้ในส่วนก่อนหน้า เราใช้เครื่องหมาย ampersand (& ;) ตัวดำเนินการเพื่อรวมสตริงเซลล์ คุณสามารถรับผลลัพธ์เดียวกันได้โดยใช้เครื่องหมายบวก (+) แทนเครื่องหมายและ (&) ตัวดำเนินการ โดยทำตามขั้นตอนต่อไปนี้

ขั้นตอนที่ 1:

  • เปิด มาโคร ใน Excel ให้กด Alt + F11 .
  • คลิก แทรก แล้วเลือก
  • หลังจากเปิดหน้าโปรแกรม ให้วาง ต่อไปนี้ VBA
9926

ที่นี่

  • เซลล์(5, 5).Value = String1 + String2 คือบรรทัดนี้ เราใช้เครื่องหมายบวก (+) แทนเครื่องหมายและ (&)

ขั้นตอนที่ 2 :

  • หลังจากวาง ให้บันทึกและกด F5 เพื่อเรียกใช้โปรแกรม ดังนั้น คุณจะเห็นการเปลี่ยนแปลงในเซลล์ E5 .

  • เพื่อให้ได้ผลลัพธ์ขั้นสุดท้าย ให้เติมเซลล์ที่ต้องการโดยทำตามขั้นตอนก่อนหน้านี้อีกครั้ง

อ่านเพิ่มเติม: วิธีใช้ฟังก์ชัน VBA StrConv (5 ตัวอย่าง)

คล้ายกัน การอ่าน:

  • วิธีเรียก Sub ใน VBA ใน Excel (4 ตัวอย่าง)
  • ส่งคืนค่าในฟังก์ชัน VBA (ทั้งสองอย่าง ค่าอาร์เรย์และค่าที่ไม่ใช่อาร์เรย์)
  • วิธีใช้ฟังก์ชัน VBA DIR ใน Excel (7 ตัวอย่าง)
  • ใช้ฟังก์ชัน VBA UCASE ใน Excel ( 4 ตัวอย่าง)
  • วิธีใช้ฟังก์ชัน InStr ใน VBA (3 ตัวอย่าง)

3. เพิ่มหลายคอลัมน์โดยใช้ VBA Concatenate

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

ขั้นตอนที่ 1:

  • ประการแรก ในการเปิด มาโคร กด Alt + F11
  • เลือก โมดูล จาก แทรก แท็บ
  • จากนั้นวาง VBA
5056

ที่นี่

  • ด้วย Worksheets(“Sheet3”) คือชื่อเวิร์กชีตปัจจุบันของคุณ
  • LastRow = .Cells(.Rows.Count, “B”).End(xlUp).Row คือ ชื่อคอลัมน์แรก
  • ด้วย .Range(“E5:E” & LastRow) คือช่วงเซลล์ที่ส่งคืนผลลัพธ์
  • .Formula = “= B5&C5” เป็นสูตรในการเข้าร่วมเซลล์แรกของช่วง

ขั้นตอนที่ 2:

  • จากนั้น บันทึกและกด F5 เพื่อรันโปรแกรม

ดังนั้น คุณจะได้รับผลลัพธ์ทั้งหมดในคอลัมน์

อ่านเพิ่มเติม: วิธีใช้ VBA Rnd ใน Excel (4 วิธี)

4. รวมหลายแถวโดยใช้ VBA Concatenate

นอกจากการเพิ่มหลายคอลัมน์แล้ว เรายังสามารถใช้ VBA โค้ดเพื่อเชื่อมหลายแถวเข้าด้วยกัน ดังที่แสดงในภาพหน้าจอด้านล่าง เราต้องการเชื่อมต่อสามแถวเข้าด้วยกัน หากต้องการเชื่อมแถว ให้ทำตามขั้นตอนง่ายๆ ด้านล่าง

ขั้นตอนที่ 1:

  • สำหรับการเปิดใช้งาน มาโคร ใน Excel กด Alt + F11 .
  • จากนั้น เลือก โมดูล จาก แทรก
  • เพื่อเชื่อมต่อ แถวต่างๆ ให้วาง VBA
1884

ที่นี่

  • Set SourceRange = Range(“B5:D5”) คือช่วงเซลล์ต้นทาง
  • Range(“B8”)Value = Trim(i) คือจำนวนเซลล์ที่ส่งกลับ

ขั้นตอนที่ 2:

  • สุดท้าย บันทึกโปรแกรมและกด F5 เพื่อเรียกใช้

ดังนั้น ผลลัพธ์สุดท้ายที่เชื่อมสามแถวเข้าด้วยกันจะแสดงในเซลล์ B8 .

อ่านเพิ่มเติม: วิธีการ เลิกซ่อนแถวบนสุดใน Excel (7 วิธี)

บทสรุป

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

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

ทีมงาน Exceldemy จะตอบคำถามของคุณอย่างต่อเนื่อง

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