Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Summe von Zellen ausgesuchter Tabellenblätter

Summe von Zellen ausgesuchter Tabellenblätter
16.01.2016 22:02:02
Zellen
Guten Abend,
könnte mir jemand vielleicht helfen? Ich benötige eine Formel.
In A1 soll die Summe aller Zellen A1 aller Tabellenblätter stehen, die in Ihrem Blattnamen die Wortgruppe "neu" haben. Also der Blattname ist durchaus noch länger, aber er enthält auch diese freistehende Wortgruppe "neu".
Ich bastel schon ewig daran rum und kriegs einfach nicht hin.
Mit besten Grüßen
Susison

Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Summe von Zellen ausgesuchter Tabellenblätter
17.01.2016 10:11:06
Zellen
Hallo Susison,
kopiere folgenden Code in die Codseite der Tabelle1. Der Wert wird bei jeden Aufruf der Tabelle aktualisiert.
Sub Worksheet_Activate()
Dim wks As Worksheet
Dim ob As Worksheet
Set ob = Tabelle1
ob.Range("A1").Value = ""
For Each wks In ThisWorkbook.Worksheets
If InStr(1, LCase(wks.Name), "neu") > 0 Then
ob.Range("A1").Value = ob.Range("A1").Value + wks.Range("A1").Value
End If
Next
End Sub
Gruß Armin

Anzeige
AW: Summe von Zellen ausgesuchter Tabellenblätter
17.01.2016 12:16:56
Zellen
Hallo Armin,
funktioniert super, recht vielen Dank dafür.
Schönen Sonntag noch.
Gruß Susison

AW: Summe von Zellen ausgesuchter Tabellenblätter
17.01.2016 12:18:21
Zellen
Hallo Armin,
funktioniert super, recht vielen Dank dafür.
Schönen Sonntag noch.
Gruß Susison

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige