• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

aantal celgegevens tellen en optellen

Status
Niet open voor verdere reacties.

mariannevanh

Terugkerende gebruiker
Lid geworden
14 dec 2004
Berichten
2.085
In bijgevoegd voorbeeld wil ik graag een overzichtje maken in kolom N hoe vaak de verschillende waarden in de kolommen A tot en met K voorkomen en wat de cumulatieve waarden daarvan is.
Het voorbeeld heb ik klein gehouden, maar het echte werkblad is vele malen groter, zodat ik dat niet handmatig kan doen. Het overzicht van gebruikte items (wat ik nu handmatig heb getypt in kolom N) moet automatisch gegenereerd worden.

Hoe kan ik dit voor elkaar krijgen?

Vriendelijke groet,
Guido
 
Door het bestand te plaatsen?

En anders SUMIF() COUNTIF() SUMPRRODUCT() eens bekijken.
 
Laatst bewerkt:
Hmm, de bijlage is niet goed doorgekomen.
 

Bijlagen

  • hm20190314.xlsx
    8,8 KB · Weergaven: 23
Het voorbeeld is nietszeggend en ook een slecht gebruik van Excel.
 
Code:
Sub hsv()
Dim sv, sd As Object, i As Long, j As Long
sv = Cells(1).CurrentRegion.Resize(, 11)
Set sd = CreateObject("scripting.dictionary")
    For i = 1 To UBound(sv)
      For j = 1 To UBound(sv, 2) - 1 Step 3
        sd(sv(i, j)) = sd(sv(i, j)) + sv(i, j + 1)
       Next j
     Next i
  With Range("N1").Resize(sd.Count, 2)
    .Value = Application.Transpose(Array(sd.keys, sd.items))
    .Sort Range("N1")
  End With
End Sub
 
Ik had de functie van draaitabellen nooit goed begrepen (verwarde dat altijd met "transponeren" :D). Maar dat is in elk geval een goede oplossing!
Bedankt allemaal voor het meedenken!

Vriendelijke groet,
Guido
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan