@Blue82
Mislio sam na ovako nešto (s obzirom na prijedlog @bokinet.
Probao sam i solidno brzo radi, ali ja nisam imao max redova podataka.
Ovo ispod je klasik VBA macro (vjerojatno može i brže). Ovaj je
snimljen u Excelu.
Code:
Sub Kalkulacija()
'Function FooFunction() As Long
Application.Calculation = xlCalculationManual
Application.ScreenUpdating = False
Application.DisplayStatusBar = False
Application.EnableEvents = False
Range("G3").Select
ActiveCell.FormulaR1C1 = _
"=IF(RC[-1]="""","""",--NOT(SUMPRODUCT(--(R3C1:R30000C1&LEFT(R3C2:R30000C2,3)=RC6&R2C))))"
Range("G3").Select
Selection.AutoFill Destination:=Range("G3:G30000"), Type:=xlFillDefault
Range("G3:G30000").Select
Selection.AutoFill Destination:=Range("G3:J30000"), Type:=xlFillDefault
Range("G3:J30000").Select
Range("G3").Select
Application.Calculation = xlCalculationAutomatic
Application.ScreenUpdating = True
Application.DisplayStatusBar = True
Application.EnableEvents = True
End Sub