combine similar rows

[FuNeS13]

I have a sheet with the following columns and data:

SubCt	Sales Doc.	Item	SaTy	Material	Description	Order Quantity	Net value	Mat.Av.Dt.	Name	Req.dlv.dt	Sold-to pt	Name 1	Deliv. date	Quantity	BUn
J	123	100	ZOR	ABC	ABC Item	50	6,900.00	10/12/2021	Buyer1	10/4/2021	321	customer1	10/14/2021	20	EA
J	123	100	ZOR	ABC	ABC Item	50	6,900.00	10/12/2021	Buyer1	10/4/2021	321	customer1	10/14/2021	26	EA

I want to be able to merge these rows (there is like 9k rows and not all of them will need to be merge) and sum the value on column O (painted green) "quanity"... (not order qty)...

so duplicates are removed except for the qty on column O which needs to be sum...

Anyone know how can this be done?

 

[Fluff]

That can be done with VBA.
Which column denotes whether a row should be merged?

 

[FuNeS13]

it's a combination of 3 minimum, B, C, and E, customer order, order line, and material... well maybe Column E can be omitted...

 

[Fluff]

Ok, how about

Sub FuNeS()
   Dim Cl As Range
   Dim Tmp As String
   
   With CreateObject("scripting.dictionary")
      For Each Cl In Range("B2", Range("B" & Rows.Count).End(xlUp))
         Tmp = Cl.Value & "|" & Cl.Offset(, 1).Value & "|" & Cl.Offset(, 2).Value
         If Not .Exists(Tmp) Then
            .Add Tmp, Cl
         Else
            .Item(Tmp).Offset(, 13).Value = .Item(Tmp).Offset(, 13).Value + Cl.Offset(, 13).Value
            Cl.Value = ""
         End If
      Next Cl
   End With
   Range("B:B").SpecialCells(xlBlanks).EntireRow.Delete
End Sub

 

[FuNeS13]

amazing, works perfectly!!! thank you very much for your great help, we (at work) really appreciate your support.

 

[Fluff]

You're welcome & thanks for the feedback.