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

วิธีผสานแถวอย่างรวดเร็วตามค่าหนึ่งคอลัมน์จากนั้นทำการคำนวณบางอย่างใน Excel

ตัวอย่างเช่นคุณมีช่วงของข้อมูลและคอลัมน์หนึ่งมีรายการที่ซ้ำกันตอนนี้คุณต้องการรวมแถวที่ฐานคอลัมน์ A (มีรายการที่ซ้ำกัน) จากนั้นทำการคำนวณบางส่วนกับคอลัมน์อื่นตามแถวที่ผสานดังภาพหน้าจอ:

ใน Excel ไม่มีวิธีการที่รวดเร็วในการรวมแถวตามค่าคอลัมน์เดียว แต่ที่นี่ฉันแนะนำไฟล์
เทคนิคที่สามารถช่วยให้คุณรวมแถวที่ซ้ำกันแล้วรวมหรือทำการคำนวณอื่น ๆ ในคอลัมน์อื่น


ลูกศรสีฟ้าฟองขวา ผสานแถวตามหนึ่งคอลัมน์จากนั้นรวมค่าด้วย VBA

มีรหัส VBA สามารถช่วยคุณในการรวมแถวที่ซ้ำกันจากนั้นรวมค่าคอลัมน์อื่น

การเรียกดูแบบแท็บและแก้ไขสมุดงาน Excel / เอกสาร Word หลายรายการเช่น Firefox, Chrome, Internet Explore 10!

คุณอาจคุ้นเคยกับการดูหน้าเว็บหลายหน้าใน Firefox / Chrome / IE และสลับไปมาระหว่างหน้าเว็บเหล่านั้นโดยคลิกที่แท็บที่เกี่ยวข้องได้อย่างง่ายดาย ที่นี่ Office Tab รองรับการประมวลผลที่คล้ายกันซึ่งช่วยให้คุณสามารถเรียกดูสมุดงาน Excel หรือเอกสาร Word หลายรายการในหน้าต่าง Excel หรือหน้าต่าง Word เดียวและสลับไปมาระหว่างกันได้อย่างง่ายดายโดยคลิกที่แท็บ คลิ๊กฟรี 30วันทดลองใช้ Office Tab!

ot excel

1 กด F11 + Alt คีย์เพื่อเปิดใช้งาน Microsoft Visual Basic สำหรับแอปพลิเคชัน จากนั้นคลิก สิ่งที่ใส่เข้าไป > โมดูล และคัดลอกและวางโค้ด VBA ด้านล่างลงในไฟล์ โมดูล หน้าต่าง

VBA: รวมแถวตามค่าคอลัมน์เดียว

Sub MG30Nov12()
'Updateby20150519
Dim Rng As Range
Dim InputRng As Range
Dim nRng As Range
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set InputRng = InputRng.Parent.Range(InputRng.Columns(1).Address)
With CreateObject("scripting.dictionary")
.CompareMode = vbTextCompare
For Each Rng In InputRng
    If Not .Exists(Rng.Value) Then
        .Add Rng.Value, Rng.Offset(, 1)
    Else
        .Item(Rng.Value).Value = .Item(Rng.Value).Value + Rng.Offset(, 1)
            If nRng Is Nothing Then
                Set nRng = Rng
            Else
                Set nRng = Union(nRng, Rng)
            End If
    End If
Next
If Not nRng Is Nothing Then
    nRng.EntireRow.Delete
End If
End With
End Sub

2 กด F5 หรือคลิก วิ่ง เพื่อเรียกใช้ VBA และกล่องโต้ตอบจะปรากฏขึ้นเพื่อเลือกช่วงข้อมูลที่จะทำงาน ดูภาพหน้าจอ:

doc ผสานคอลัมน์ตามคอลัมน์เดียว 3

3. หลังจากเลือกช่วงการทำงานแล้วให้คลิก OK. ตอนนี้ข้อมูลถูกรวมเข้ากับคอลัมน์แรกและรวมค่าในคอลัมน์ที่สอง

doc ผสานคอลัมน์ตามคอลัมน์เดียว 4

หมายเหตุ: รหัส VBA นี้สามารถทำงานได้อย่างถูกต้องเมื่อรวมตามคอลัมน์แรกและค่าผลรวมในคอลัมน์ที่สอง


ลูกศรสีฟ้าฟองขวา ผสานแถวตามหนึ่งคอลัมน์จากนั้นรวมค่าด้วย Advanced Combine Rows

หากคุณไม่คุ้นเคยกับรหัส VBA คุณสามารถใช้ไฟล์ แถวรวมขั้นสูง คุณลักษณะของเครื่องมือเสริมส่วนที่สาม - Kutools สำหรับ Excel เพื่อรวมแถวที่ซ้ำกันอย่างง่ายดายและรวดเร็วจากนั้นรวมค่าในคอลัมน์อื่น

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

1. เลือกข้อมูลที่คุณต้องการใช้และคลิก Kutools > ผสานและแยก > แถวรวมขั้นสูง. ดูภาพหน้าจอ:

doc ขั้นสูงรวมแถว 1

2. จากนั้นในกล่องโต้ตอบ popping ให้เลือกคอลัมน์ที่คุณจะรวมคอลัมน์อื่น ๆ ตามจากนั้นคลิก ประถม คีย์แล้วคลิกคอลัมน์อื่นแล้วคลิก คำนวณ จากนั้นเลือก รวม.

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

doc ผสานคอลัมน์ตามคอลัมน์เดียว 6

3 จากนั้นคลิก Ok. ตอนนี้ข้อมูลได้รับการรวมตามคอลัมน์หลักแล้วและอีกคอลัมน์หนึ่งจะสรุปได้ ดูภาพหน้าจอ:

doc ผสานคอลัมน์ตามคอลัมน์เดียว 7


ลูกศรสีฟ้าฟองขวา ผสานแถวตามคอลัมน์เดียวจากนั้นดำเนินการที่แตกต่างกันกับคอลัมน์อื่น ๆ ด้วย Advanced Combine Rows

แถวรวมขั้นสูง มีประสิทธิภาพเพราะไม่เพียง แต่สามารถรวมแถวที่ซ้ำกันในคอลัมน์เดียวจากนั้นรวมคอลัมน์อื่น แต่ยังสามารถรวมแถวที่ซ้ำกันในคอลัมน์เดียวจากนั้นทำการดำเนินการที่แตกต่างกันในคอลัมน์อื่น ๆ

สมมติว่าฉันมีช่วงข้อมูลตามภาพด้านล่างที่แสดงและฉันต้องการรวมค่าในคอลัมน์ B และรวมค่าในคอลัมน์ C ตามคอลัมน์ A
doc ผสานคอลัมน์ตามคอลัมน์เดียว 8

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

1. เลือกช่วงข้อมูลแล้วคลิก Kutools > ผสานและแยก > แถวรวมขั้นสูง. ดูภาพหน้าจอ:

doc ขั้นสูงรวมแถว 1

2 ใน รวมแถวตามคอลัมน์ โต้ตอบทำดังนี้:

(1) คลิกที่คอลัมน์ที่คุณต้องการรวมจากนั้นคลิก คีย์หลัก;

doc ผสานคอลัมน์ตามคอลัมน์เดียว 10

(2) คลิกที่คอลัมน์ที่คุณต้องการรวมข้อมูลแล้วคลิก รวมกันจากนั้นเลือกตัวคั่นที่คุณต้องการจากรายการ

doc ผสานคอลัมน์ตามคอลัมน์เดียว 11

(3) คลิกที่คอลัมน์ที่คุณต้องการรวมค่าแล้วคลิก คำนวณและเลือก รวม.

doc ผสานคอลัมน์ตามคอลัมน์เดียว 12

3 คลิก Ok. ตอนนี้คุณสามารถเห็นผลลัพธ์ดังต่อไปนี้:

doc ผสานคอลัมน์ตามคอลัมน์เดียว 13

กับ แถวรวมขั้นสูง คุณยังสามารถรวมแถวตามคอลัมน์หนึ่งคอลัมน์แล้วนับเฉลี่ยเก็บข้อมูลที่ 1 หรือสุดท้ายในคอลัมน์อื่น ๆ 


เครื่องมือเพิ่มประสิทธิภาพการทำงานในสำนักงานที่ดีที่สุด

Kutools สำหรับ Excel แก้ปัญหาส่วนใหญ่ของคุณและเพิ่มผลผลิตของคุณได้ถึง 80%

  • นำมาใช้ใหม่: ใส่อย่างรวดเร็ว สูตรที่ซับซ้อนแผนภูมิ และสิ่งที่คุณเคยใช้มาก่อน เข้ารหัสเซลล์ ด้วยรหัสผ่าน; สร้างรายชื่อผู้รับจดหมาย และส่งอีเมล ...
  • ซุปเปอร์ฟอร์มูล่าบาร์ (แก้ไขข้อความและสูตรหลายบรรทัดได้อย่างง่ายดาย); การอ่านเค้าโครง (อ่านและแก้ไขเซลล์จำนวนมากได้อย่างง่ายดาย); วางลงในช่วงที่กรองแล้ว...
  • ผสานเซลล์ / แถว / คอลัมน์ โดยไม่สูญเสียข้อมูล แยกเนื้อหาของเซลล์ รวมแถว / คอลัมน์ที่ซ้ำกัน... ป้องกันเซลล์ซ้ำ; เปรียบเทียบช่วง...
  • เลือกซ้ำหรือไม่ซ้ำ แถว; เลือกแถวว่าง (เซลล์ทั้งหมดว่างเปล่า); Super Find และ Fuzzy Find ในสมุดงานจำนวนมาก สุ่มเลือก ...
  • สำเนาถูกต้อง หลายเซลล์โดยไม่เปลี่ยนการอ้างอิงสูตร สร้างการอ้างอิงอัตโนมัติ ถึงหลายแผ่น ใส่สัญลักษณ์แสดงหัวข้อย่อย, กล่องกาเครื่องหมายและอื่น ๆ ...
  • แยกข้อความ, เพิ่มข้อความ, ลบตามตำแหน่ง, ลบ Space; สร้างและพิมพ์ผลรวมย่อยของเพจ แปลงระหว่างเนื้อหาของเซลล์และความคิดเห็น...
  • ซุปเปอร์ฟิลเตอร์ (บันทึกและใช้โครงร่างตัวกรองกับแผ่นงานอื่น ๆ ); การเรียงลำดับขั้นสูง ตามเดือน / สัปดาห์ / วันความถี่และอื่น ๆ ตัวกรองพิเศษ โดยตัวหนาตัวเอียง ...
  • รวมสมุดงานและแผ่นงาน; ผสานตารางตามคอลัมน์สำคัญ แยกข้อมูลออกเป็นหลายแผ่น; Batch แปลง xls, xlsx และ PDF...
  • คุณสมบัติที่ทรงพลังมากกว่า 300 รายการ. รองรับ Office/Excel 2007-2021 และ 365 รองรับทุกภาษา ง่ายต่อการปรับใช้ในองค์กรหรือองค์กรของคุณ คุณสมบัติเต็มรูปแบบ ทดลองใช้ฟรี 30 วัน รับประกันคืนเงินภายใน 60 วัน
kte แท็บ 201905

แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก

  • เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
  • เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
  • เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!
ด้านล่าง officetab
จัดเรียงความคิดเห็นโดย
ความคิดเห็น (3)
ยังไม่มีการให้คะแนน เป็นคนแรกที่ให้คะแนน!
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี โมดูลของคุณเคยทำงานกับตารางขนาดใหญ่เช่นกัน (เช่น คุณต้องการสรุปตามปีแต่คุณมียอดขาย 1, ยอดขาย 2, ยอดขาย 3....ฯลฯ) แต่ตอนนี้ ได้เฉพาะคอลัมน์แรกที่ถูกต้อง (การขาย 1) และส่วนอื่นๆ ทั้งหมดไม่ได้สรุปอย่างถูกต้อง คุณได้เปลี่ยนแปลงอะไรไหม
ขอบคุณ!
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี IK บางทีคุณสามารถใช้ฟังก์ชันผลรวม SUMPRODUCT((A2:A10=”Pen”)*(B2:E10)) เพื่อคำนวณทีละรายการได้ A2:A10 คือช่วงที่มีค่าการค้นหา ปากกาคือเกณฑ์ B2:E10 คือช่วงที่คุณต้องการหาผลรวมตามเกณฑ์
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ฉันมีคำถามเดียวกัน / คล้ายคลึงกัน ฉันกำลังพยายามรวมคอลัมน์ทั้งหมดทางด้านขวาของเซลล์อ้างอิง แต่จะรวมเฉพาะคอลัมน์เดียวเท่านั้น ฉันจะหาผลรวมทั้งหมดไปทางขวาได้อย่างไร
มีความคิดเห็นยังไม่มีการโพสต์ที่นี่
แสดงความคิดเห็นของคุณ
โพสต์ในฐานะแขก
×
ให้คะแนนโพสต์นี้:
0   ตัวอักษร
สถานที่แนะนำ

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

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