SUMIF/SUMPRODUCT or any formula that can analyze this table

[carlboyu]

Good day! Below is an image of the data to be consolidated on my summary table.

https://imgur.com/1fyNBWF


And here is my format for the table that I will be using.


https://imgur.com/T5vl58i


Here's an overview on how the table works. The table will get the sum of ITEM placed in STORE. I only know on computing it via SUMIF but it takes plenty of time to compute since the summary table will have 39000 rows of ITEM to look on to. Is there any other method to get same result but much faster computing speed?

 

[jtakw]

Hi,

I don't know if there's really a "much faster" way:

Book1
	A	B	C	D	E	F	G	H	M	N	O	P	Q	R	S
1		STORE 1	STORE 2	STORE 3	STORE 4	STORE 1	STORE 3			STORE 1	STORE 2	STORE 3	STORE 4	STORE 5	STORE 6
2	ITEM 1	1	2	23	1	1	3		ITEM 1	8	17	32	6	0	0
3	ITEM 1	2	12	1	2	2	3		ITEM 2	5	1	3	1	0	0
4	ITEM 1	1	3	1	3	1	1
5	ITEM 2	3	1	1	1	2	2
6	ITEM 3
7	ITEM 4
Sheet60

Cell Formulas
Range	Formula
N2	=SUMPRODUCT(($B$1:$G$1=N$1)*($A$2:$A$39000=$M2)*$B$2:$G$39000)

N2 formula copied down and across.

 

[carlboyu]

Thanks! I've been trying to make columns M to S to another sheet. But I keep getting #VALUE .

 

[carlboyu]

Nevermind I already figured it out. Thanks!

 

[jtakw]

You're welcome, welcome to the forum.

Glad you worked it out.

 

[Peter_SSs]

Is there any other method to get same result but much faster computing speed?

Yes, if you are happy to use a macro.
For me, with 40,000 rows of data like your first image, the formula solution suggested takes about 7-8 seconds to recalculate. The macro suggested below took less than half a second.

My assumptions:
- Original data starts at A1 as shown in your image.
- The (blank) table with item numbers and store names only already exists in column M and row 1
- There is nothing in the sheet between the two tables.

Note that my code leaves cells blank in the second table if there is no data but that could be altered to populate those cells with zeroes if required.

If you need help with how to implement the macro, post back, otherwise test in a copy of your workbook.

Sub AnalyzeTable()
  Dim d As Object
  Dim a As Variant, b As Variant
  Dim i As Long, j As Long, ub2 As Long
  
  Set d = CreateObject("Scripting.Dictionary")
  a = Range("A1").CurrentRegion.Value
  ub2 = UBound(a, 2)
  For i = 2 To UBound(a)
    For j = 2 To ub2
      d(a(i, 1) & "|" & a(1, j)) = d(a(i, 1) & "|" & a(1, j)) + a(i, j)
    Next j
  Next i
  b = Range("M1").CurrentRegion.Value
  ub2 = UBound(a, 2)
  For i = 2 To UBound(b)
    For j = 2 To ub2
      b(i, j) = d(b(i, 1) & "|" & b(1, j))
    Next j
  Next i
  Range("M1").Resize(UBound(b), ub2).Value = b
End Sub