Summe von Zellen mehrere Tabellenblaetter

[Bachus]

Ich versteh jetzt nicht genau, was du meinst.

Ich vermute, du möchtest später die zu addierenden Tabellenblätter umbenennen
Tab1
Tab2
die_nicht_3
Tab4
die_nicht_5
Tab6
...
und alle, die mit Tab anfangen addieren lassen?


Setz doch einfach auf jedes Blatt in eine weit entfernte Zelle (bspw. ZZZ999) eine Kennung anhand derer du dann entscheidest, ob du das Blatt mit einbeziehen willst .
Festgelegte Druckbereiche verhindern auch, dass dann xx Seiten gedruckt werden.

[Stephan]

Ist soetwas moeglich?

z.B. nutze eine benutzerdefinierte Funktion:

Code: Alles auswählen

Function SumPrae(praefix As String)
  laenge = LEN(praefix)
  ergebnis = 0
  
  With ThisComponent.Sheets()
    For i = 0 To .Count-1
      If Left(.GetByIndex(i).Name, laenge) = praefix Then
        ergebnis = ergebnis + .GetByIndex(i).getCellrangeByName("A1").Value
      End If 
    Next i
  End With
  
  SumPrae = ergebnis
End Function

Gruß
Stephan