Note: The other languages of the website are Google-translated. Back to English

วิธีรวมสองรายการโดยไม่ซ้ำกันใน Excel

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

รวมรายการโดยไม่ซ้ำกับลบรายการที่ซ้ำกันใน Excel

รวมรายการโดยไม่ซ้ำกับ VBA

รวมรายการโดยไม่ซ้ำกับ Kutools for Excel

แท็บ Office เปิดใช้งานการแก้ไขและเรียกดูแบบแท็บใน Office และทำให้งานของคุณง่ายขึ้นมาก ...
Kutools สำหรับ Excel แก้ปัญหาส่วนใหญ่ของคุณและเพิ่มผลผลิตของคุณได้ถึง 80%
  • ใช้ซ้ำอะไรก็ได้: เพิ่มสูตรที่ใช้มากที่สุดหรือซับซ้อนแผนภูมิและสิ่งอื่นใดในรายการโปรดของคุณและนำกลับมาใช้ใหม่ได้อย่างรวดเร็วในอนาคต
  • คุณสมบัติข้อความมากกว่า 20 รายการ: แยกหมายเลขจากสตริงข้อความ แยกหรือลบบางส่วนของข้อความ แปลงตัวเลขและสกุลเงินเป็นคำภาษาอังกฤษ
  • ผสานเครื่องมือ: สมุดงานและแผ่นงานหลายเล่มเป็นหนึ่งเดียว ผสานหลายเซลล์ / แถว / คอลัมน์โดยไม่สูญเสียข้อมูล รวมแถวและผลรวมที่ซ้ำกัน
  • แยกเครื่องมือ: แยกข้อมูลออกเป็นหลายแผ่นตามมูลค่า; สมุดงานหนึ่งเล่มเป็นไฟล์ Excel, PDF หรือ CSV หลายไฟล์ หนึ่งคอลัมน์ถึงหลายคอลัมน์
  • วางการข้าม แถวที่ซ่อน / กรอง; นับและผลรวม โดย Background Color; ส่งอีเมลส่วนบุคคลไปยังผู้รับหลายคนในกลุ่ม
  • ซุปเปอร์กรอง: สร้างโครงร่างตัวกรองขั้นสูงและใช้กับแผ่นงานใด ๆ ประเภท ตามสัปดาห์วันความถี่และอื่น ๆ กรอง by ตัวหนาสูตรคอมเม้น ...
  • คุณสมบัติที่ทรงพลังมากกว่า 300 รายการ; ทำงานร่วมกับ Office 2007-2021 และ 365; รองรับทุกภาษา ง่ายต่อการปรับใช้ในองค์กรหรือองค์กรของคุณ

ลูกศรสีฟ้าฟองขวา รวมรายการโดยไม่ซ้ำกับลบรายการที่ซ้ำกันใน Excel

ในการรวมสองรายการและลบค่าที่ซ้ำกันใน Excel คุณสามารถทำได้ดังนี้:

1. คัดลอกหนึ่งในสองรายการและวางที่ด้านล่างของรายการอื่นดูภาพหน้าจอ:

2. เลือกรายการและคลิก ข้อมูล > ลบรายการที่ซ้ำกันดูภาพหน้าจอ:


3 ใน ลบรายการที่ซ้ำกัน กล่องโต้ตอบหากคอลัมน์ของคุณไม่มีส่วนหัวให้ยกเลิกการเลือก ข้อมูลของฉันมีส่วนหัวและจากนั้นคลิก OK. ดูภาพหน้าจอ:


4. จากนั้นกล่องโต้ตอบจะปรากฏขึ้นบนหน้าจอเพื่อแจ้งให้คุณทราบว่ารายการที่ซ้ำกันถูกลบไปแล้วให้คลิก OK. ดูภาพหน้าจอ:


คุณสามารถเห็นผลลัพธ์:



ลูกศรสีฟ้าฟองขวา รวมรายการโดยไม่ซ้ำกับ VBA

ใน Excel VBA ยังสามารถช่วยคุณรวมสองรายการโดยไม่ซ้ำกัน

1 ถือ ALT และกด F11 บนแป้นพิมพ์เพื่อเปิดไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

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

VBA: รวมรายการโดยไม่ซ้ำกัน

Sub FindUniques()
'Updateby20140313
Dim rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
Set dic = CreateObject("Scripting.Dictionary")
For j = 1 To InputRng.Columns.Count
    For i = 1 To InputRng.Rows.Count
        xValue = InputRng.Cells(i, j).Value
        If xValue <> "" And Not dic.Exists(xValue) Then
            OutRng.Value = xValue
            dic(xValue) = ""
            Set OutRng = OutRng.Offset(1, 0)
        End If
    Next
Next
End Sub

 

3 คลิก วิ่ง หรือกด F5 เพื่อเรียกใช้ VBA

4. กล่องโต้ตอบที่แสดงบนหน้าจอและคุณสามารถเลือกช่วงที่คุณต้องการรวมได้ ดูภาพหน้าจอ:


5 คลิก OKจากนั้นกล่องโต้ตอบอื่นจะปรากฏขึ้นเพื่อให้คุณเลือกเซลล์เพื่อแสดงผลลัพธ์ที่รวมกัน ดูภาพหน้าจอ:


6 คลิก OK. คุณสามารถดูรายการที่รวมกันได้


เคล็ดลับ: ผลลัพธ์ไม่สามารถสงวนการจัดรูปแบบเซลล์หลังจากเรียกใช้ VBA ข้างต้น


ลูกศรสีฟ้าฟองขวา รวมรายการโดยไม่ซ้ำกับ Kutools for Excel

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

Kutools สำหรับ Excel มีเครื่องมือ Excel ที่มีประโยชน์มากกว่า 300 รายการ ทดลองใช้ฟรีโดยไม่มีข้อ จำกัด ใน 30 วัน Get it Now

1. คัดลอกหนึ่งในสองรายการและวางที่ด้านล่างของรายการอื่นเลือกรายการใหม่จากนั้นคลิก Kutools > เลือกเครื่องมือ > เลือกรายการที่ซ้ำกันและเซลล์ที่ไม่ซ้ำกัน. ดูภาพหน้าจอ:


2 ใน เลือกรายการที่ซ้ำกันและเซลล์ที่ไม่ซ้ำกัน โต้ตอบตรวจสอบ ที่ไม่ซ้ำทั้งหมด (รวมถึงรายการที่ซ้ำกันครั้งแรก)คลิก Ok.


3. จากนั้นกล่องโต้ตอบจะปรากฏขึ้นเพื่อบอกจำนวนค่าที่ไม่ซ้ำกันให้คลิก OK และ ยกเลิก เพื่อปิดสองกล่องโต้ตอบ ดูภาพหน้าจอ:


4. และคัดลอกค่าเฉพาะที่เลือกแล้ววางลงในคอลัมน์ใหม่ ดูภาพหน้าจอ:


คลิกที่นี่เพื่อเรียนรู้เพิ่มเติมเกี่ยวกับ Select duplicates & unique cells


บทความญาติ:

จัดเรียงความคิดเห็นโดย
ความคิดเห็น (0)
ยังไม่มีการให้คะแนน เป็นคนแรกที่ให้คะแนน!
มีความคิดเห็นยังไม่มีการโพสต์ที่นี่
แสดงความคิดเห็นของคุณ
โพสต์ในฐานะแขก
×
ให้คะแนนโพสต์นี้:
0   ตัวอักษร
สถานที่แนะนำ

ช่องทางอื่นๆ

ลิขสิทธิ์© 2009 - wwwextendoffice.com | สงวนลิขสิทธิ์. ขับเคลื่อนโดย ExtendOffice. | แผนผังเว็บไซต์
Microsoft และโลโก้ Office เป็นเครื่องหมายการค้าหรือเครื่องหมายการค้าจดทะเบียนของ Microsoft Corporation ในสหรัฐอเมริกาและ / หรือประเทศอื่น ๆ
ได้รับการปกป้องโดย Sectigo SSL