Useampi Phaku samalla rivillä

Rivin alapuoliselle riville vaikka solun 5 alle laitat ehtolauseen =jos(solu1=arvo;solu5;0)
Sitten kopioit tämän jokaisen sarjan alle. Lopuksi summa tuolta riviltä.

Toinen vaihtoehto olisi ohjelmoida vaikkapa for silmukalla.
Tai järjestellä allekkain.

Voi olla jokin ratkaisu. Vastasin vain lämpimikseni.

En tiedä onko tämä nyt se mitä haet.
Anna ensimmäiselle 5 sarakkeelle otsikko ja kopioi se sitten muihin saman rivin "5 paketteihin". Esim. vaikka otsikot A-E. Olkoot otsikot vaikka 1. rivillä ja lukusolut 2. rivillä, niin
=SUMMA.JOS(1:1;"A";2:2)
Eli kaava laskee riviltä 2 kaikki ne solut yhteen joiden "otsikko" on A.
Kaavassa 1:1 tarkoittaa että hakee koko 1 riviltä. Voit myös rajata alueen, vaikka A1:Z1

Function testiSum(hakuAlue As Range, hakuKriteeriSolu As Range) As Integer
Dim riviNumero, rivinPituus As Integer
riviNumero = hakuAlue.Row
rivinPituus = hakuAlue.Cells.Count

Dim i, sum As Integer
sum = 0

For i = 0 To rivinPituus / 5 - 1
If Cells(riviNumero, i * 5 1).Value = hakuKriteeriSolu.Value Then
sum = sum Cells(riviNumero, i * 5 5).Value
End If
Next i

testiSum = sum

End Function

-----------
Laskee ensimmaisessa argumentissa annetulta riviltä (koko rivi tai osa riviä) viiden sarjoissa olevien kenttien viidensien alkioiden summan niistä kentistä joissa ensimmainen alkio on sama kuin toisena argumenttina annetussa solussa oleva sisältö.
-------------
Jos olisi eri riveillä olisi helpompi esim.

{=SUMMA(JOS(ekasarake=tunnus;viidessarake))}

tai

=SUMMA.JOS(ekasarake;tunnus;viidessarake)

ekasarake = esim. A:A (koko rivi) tai A1:A100 tai alueen nimi (helpompi lukea)
viidessarake samalla tavalla
tunnus on hakukriteeri ekassa sarakkeessa