hoe moet ik automatisch optellen en vast houden bij andere waarden?

[haasje102]

Bekijk bijlage Dartprogramma.xlsxIk ben bezig met een dart programma in Excel.
Ik heb in cel B2 een keuze lijst staan met spellen die gespeeld kunnen worden.
In cel H3 heb ik de formule: =B2-H4-H5-H6-H7-H8-H9-H10-H11-H12-H13-H14-H15-H16-H17-H18-H19-H20-H21-H22-H23-H24-H25-H26-H27-H28-H29-H30-H31-H32
Als deze 0 is moet cel E10 automatisch 1 erbij tellen omdat deze aangeeft hoeveel legs je hebt gespeeld.
En deze score moet blijven staan als je weer opnieuw speelt.

 

[Westsidemg]

Hopelijk is dit je oplossing:
Bekijk bijlage Dartprogramma.xlsx



Succes er mee:thumb:

 

[Superzeeuw]

Haasje,

Ten eerste jouw formule kan korter:

=B2-SOM(H4:H32)

Ten tweede wat ziet jouw programma er erg rommelig uit.

Ten derde dat kan gestuurd worden met VBA.


@ westsidemg,

Ik denk dat de bedoeling is dat na de eerste keer op 0 komen er komt te staan 1 na de tweede keer op 0 komen moet hier komen 2.

 

[oeldere]

=B2-H4-H5-H6-H7-H8-H9-H10-H11-H12-H13-H14-H15-H16-H17-H18-H19-H20-H21-H22-H23-H24-H25-H26-H27-H28-H29-H30-H31-H32

deze formule kun je ook korter schrijven.

=b2-som(h4 : d32)

de som-formule telt alle cellen bij elkaar op H4 t/m H32.

 

[Superzeeuw]

Haasje,

Probeer dit test progje eens.

Open het bestand, activeer de macro's.

Zorg ervoor dat H3 op 0 komt en zie wat er gebeurd.
Zorg ervoor dat H3 nogmaals op 0 komt e voila.

 

[haasje102]

andwoord supermeeuw

Heel erg bedankt.
zou je ook kunnen uitleggen hoe je dit hebt gedaan?
Zodat ik het bij de andere zelf kan proberen.

 

[Superzeeuw]

Haasje,

Doe het volgende:

Druk gelijktijdig op ALT+F11
Dubbelklik dan aan de linkerzijde op Blad 1.

Daar staat een stukje VBA code die het voor je regelt.

 

[haasje102]

bedankt superzeeuw

ok bedankt ik zal kijken of ik er nu zelf uit kom.
anders laat ik wel weer wat horen.
ik laat ook nog wel het eind resultaat zien als je daar interessen in hebt?

 

[popipipo]

Nog een mogelijke aanvulling:

Kolom Y1 en daarna doortrekken naar beneden:

=V1&" "&W1&" "&X1

Cel D5:

=IF(OR(H3<2;H3>170);"onmogelijk";VLOOKUP(H3;U1:Y169;5;0))

 

[haasje102]

code klopt niet

de code klopt niet popipipo
ik heb er ook naar gekeken maar ik kan de fout niet ontdekken.
mischien dat jij het wel ziet.
anders zet maar in het bestand en voeg die maar bij dan copieër ik deze wel naar mijn nieuwe bestand toe.
alvast bedankt.

 

[popipipo]

hier het bestand.

 

[haasje102]

thanks

thanks voor het bestand popipipo