{"id":4325,"date":"2023-07-12T00:17:49","date_gmt":"2023-07-12T00:17:49","guid":{"rendered":"https:\/\/statorials.org\/nl\/gemiddelde-vba-als\/"},"modified":"2023-07-12T00:17:49","modified_gmt":"2023-07-12T00:17:49","slug":"gemiddelde-vba-als","status":"publish","type":"post","link":"https:\/\/statorials.org\/nl\/gemiddelde-vba-als\/","title":{"rendered":"Vba: hoe averageif- en averageifs-functies te schrijven"},"content":{"rendered":"

<\/p>\n

\n

U kunt de volgende methoden gebruiken om de functies AVERAGEIF en AVERAGEIFS te schrijven met VBA in Excel:<\/span><\/p>\n

Methode 1: AVERAGEIF-functie in VBA<\/span><\/strong><\/p>\n

 Sub<\/span> Averageif_Function()\n    Range(\" E2<\/span> \") = WorksheetFunction.AverageIf(Range(\" A2:A12<\/span> \"), \" Mavs<\/span> \", Range(\" B2:B12<\/span> \"))\nEnd Sub<\/span><\/strong><\/span><\/pre>\n
 Dit specifieke voorbeeld berekent de gemiddelde waarde in het bereik B2:B12<\/strong> waarbij de overeenkomstige waarde in het bereik A2:A12<\/strong> gelijk is aan „Mavs“, en wijst het resultaat vervolgens toe aan cel E2<\/strong> .<\/span><\/p>\n
 Methode 2: AVERAGEIFS-functie in VBA<\/span><\/strong><\/p>\n
 Sub<\/span> Averageifs_Function()\n    Range(\" E2<\/span> \") = WorksheetFunction.AverageIfs(Range(\" C2:C12<\/span> \"), Range(\" A2:A12<\/span> \"), \" Mavs<\/span> \", Range(\" B2:B12<\/span> \"), \" >20<\/span> \")\nEnd Sub<\/span><\/strong><\/span><\/pre>\n
 Dit specifieke voorbeeld berekent de gemiddelde waarde in het bereik C2:C12 waarbij de waarde in het bereik A2:A12<\/strong> gelijk is aan „Mavs“ en<\/em> de waarde in het bereik B2:B12<\/strong> groter is dan 20, en wijst vervolgens het resultaat toe aan cel E2<\/strong> . .<\/span><\/p>\n
 De volgende voorbeelden laten zien hoe u elk van deze methoden in de praktijk kunt gebruiken met de volgende dataset in Excel die informatie bevat over verschillende basketbalspelers:<\/span> <\/p>\n
\"\"<\/p>\n
 Voorbeeld 1: AVERAGEIF-functie in VBA<\/strong><\/span><\/h2>\n
 Laten we zeggen dat we de gemiddelde waarde in de puntenkolom willen berekenen voor spelers in het Mavs-team.<\/span><\/p>\n
 We kunnen de volgende macro maken om deze AVERAGEIF-functie uit te voeren:<\/span><\/p>\n
 Sub<\/span> Averageif_Function()\n    Range(\" E2<\/span> \") = WorksheetFunction.AverageIf(Range(\" A2:A12<\/span> \"), \" Mavs<\/span> \", Range(\" B2:B12<\/span> \"))\nEnd Sub<\/span><\/strong><\/span><\/pre>\n
 Wanneer we deze macro uitvoeren, ontvangen we de volgende uitvoer:<\/span> <\/p>\n
\"\"<\/p>\n
 Merk op dat cel E2<\/strong> een waarde van 18,25<\/strong> bevat.<\/span><\/p>\n
 Dit vertelt ons dat de gemiddelde waarde in de puntenkolom voor Mavs-teamspelers 18,25 is.<\/span><\/p>\n
 We kunnen verifi\u00ebren dat dit correct is door handmatig de gemiddelde spelerspuntwaarde op de Mavs te berekenen:<\/span><\/p>\n
 Gemiddelde punten van Mavs-speler: (22 + 10 + 29 + 12) \/ 4 = 18,25<\/strong> .<\/span><\/p>\n
 Voorbeeld 2: AVERAGEIFS-functie in VBA<\/strong><\/span><\/h2>\n
 Stel dat we de gemiddelde waarde in de assistskolom willen berekenen voor spelers die aan de volgende criteria voldoen:<\/span><\/p>\n