optellen waarde uit meerdere tabbladen

[don42]

beste helpers

ik heb weer eens jullie hulp nodig
heb een voorbeeld bestandje gemaakt
wil graag de waarden van de cellen A1 van de tabbladen 2 - 4 en 5
In cel C5 van Blad1 wie helpt mij weer op weg

ps
het aantal tabbladen zal in mijn werkmap groeien en dan zal ook de waarde van A1 weer meegeteld moeten worden

bvd
Don

 

[AlexCEL]

Als je op het einde een tabblad toevoegt met de naam "einde" en nieuwe tabbladen daarvoor plaatst dan kan zoiets:

=SOM(Blad2:Einde!A1)

Geen VBA of knoppen nodig.

 

[don42]

Net niet wat ik zoek
Wil van de vele tabbladen er een paar uitsluiten voor de telling
Verder wordt een nieuw tabblad gesorteerd en komt het tabblad einde op de verkeerde plek te staan
Als iemand weet hoe het kan met vba .... graag

 

[emields]

plaats die tabbladen dan achter het tabblad einde of voor blad2

 

[AlexCEL]

Hoe heten de tabbladen normaal gesproken? Blad2, 3, 4 etc.?
Waar staat welke tabbladen je uit wilt sluiten?

 

[snb]

Zet alle werkbladen die je wil optellen in 1 werkblad, zoals het hoort.

 

[AD1957]

In het voorbeeldbestand.(A1 in blad1 bevat geen getal) en alleen blad3 uitgesloten.

Private Sub CommandButton1_Click()
totalsheets = Worksheets.Count
Range("C5") = ""

For i = 1 To totalsheets
    With Worksheets(i)
      If .Name <> "Blad3" And IsNumeric(.Range("A1")) Then
          Range("C5") = Range("C5") + .Range("A1")
      End If
    End With
Next i
End Sub

 

[don42]

# 7

Dank jullie wel voor de hulp met #7 kan ik verder
de tabbladen krijgen de naam van een collega
iedere keer als er een nieuwe naam wordt ingevoerd komt er een tabblad op alfabetische volgorde gesorteerd bij
en werd ook het tabblad einde ergens voorin geplaats.
ik ben blij met de geboden oplossing

:thumb:

 

[Haije]

iedere keer als er een nieuwe naam wordt ingevoerd komt er een tabblad op alfabetische volgorde gesorteerd bij
en werd ook het tabblad einde ergens voorin geplaats.

En als je dat tabblad niet "einde" noemt maar "zzzzzzzz"?

 

[emields]

Dat is ook een van de redenen waarom een representatief voorbeeld gevraagd wordt.

 

[snb]

Met de suggestie in #6 kom je nog veel verder.
Een computer is geen ladenkast met hangmappen. 1 Excel werkblad kan je hele ladenkast vervangen en sorteren/filteren/rekenen.
Stop het papierdenken.