Excel: Optellen van een reeks via macro

[eelco42]

Hallo,

Ik wil een reeks met cijfers optellen, alleen is via een macro niet altijd de gehele reeks zichtbaar. Hoe zorg ik ervoor dat ik een som(optelling) krijg van alleen de zichtbare gegevens?
De som moet dus met de bouwtijd mee veranderen.

 

[Haije]

welkom op Hlpmij.nl

probeer deze eens:

=SUBTOTAAL(9;F6[COLOR="#FF0000"]:[/COLOR]AD6)

 

[eelco42]

welkom op Hlpmij.nl

probeer deze eens:

=SUBTOTAAL(9;F6[COLOR="#FF0000"]:[/COLOR]AD6)

Helaas werkt dit niet, de verborgen kolommen blijven dan meegeteld worden. De functie =SUBTOTAAL(9;F6:AD6) werkt in dit geval hetzelfde als =SOM(F6:AD6), ongeacht of er kolommen verborgen zijn of niet.

 

[eelco42]

Hierbij het excel bestand, mocht dat het beantwoorden van mijn vraag makkelijker maken

Bekijk bijlage Excelbestand.xlsm

 

[Haije]

eelco,

ik lees net in de help van Excel dat subtotaal alleen werkt voor kolommen, niet voor rijen. :-(

 

[VenA]

Met een UDF

Function VenA(r As Range)
For Each cl In r
    If Not cl.Columns.Hidden Then VenA = VenA + cl
Next cl
End Function

 

[Haije]

Met verschuiving

eelco,

kijk eens of dit je verder brengt....

 

[eelco42]

eelco,

kijk eens of dit je verder brengt....

Dit werkt zoals ik het wil! Dank!

 

[Cobbe]

Ik heb uw verberg/toon-code iets aangepast.

 

[eelco42]

Nog een vraag....

Is het mogelijk om de cel 'goedkeuring' te koppelen aan het maandnummer? Ik wil in B11 aangeven in welke maand de goedkeuring plaatsvind, en dat het woord goedkeuring (met bijbehorend bedrag van €2000) dan automatisch naar de correcte maand verplaatst.

Bekijk bijlage Rekenschema.xlsx