Office: Zasammenzählen gleiche Zelle - viele Blätter

Hi an alle Profis hier,

ich bin hier so eine Mappe am aufbauen und habe folgendes Problem:

6 Arbeitsblätter,verschiedene Namen, auf dem 7. Blatt möchte ich wissen wissen wieviele "I`s" zb. in der Zelle B3 von allen Blättern existieren. ( in der Zelle B3 von Blatt 7 )
Die Summe von z.B. dieser Zelle von allen Blättern zu addieren hab ich ja noch hinbekommen, wenn ich aber wissen will wieviele I`s in den Zellen drin sind versagt mein Excel wissen....
Wer kann mir helfen?

Vielen Dank

 

Hallo,

wenn es unterschiedliche Namen sind, also nicht Tabelle1, Tabelle2 etc dann könntest du diese benutzerdefinierte Funktion von Thomas Ramel und kopiere den VBA-Code in ein Modul deiner Tabelle:

Code:

Public Function ZählenWennTabellen(Tab1 As String, _
Tab2 As String, _
Bereich As Range, _
Suchkriterium As String) As Double
'© t.ramel@mvps.org / 09.01.2005
'Funktion zur Anwendung von ZÄHLENWENN() über mehrere Tabellenblätter
'Mit angegeben werden die Tabellenblattnamen von...bis,
'sowie die üblichen Parameter für ZÄHLENWENN()
'Zur automatischen Aktualisierung im Tabellenblatt den folgenden Term
'anhängen: +(0*JETZT()) und F9 drücken
'Also z.B. wie folgt: =ZählenWennTabellen("Tabelle1";"Tabelle3";A1:A10;"Suchbegriff")+(0*JETZT())
Dim intI As Integer
Dim intJ As Integer
Dim intTab As Integer
Dim Wert As Double
If Suchkriterium = "" Then
ZählenWennTabellen = 0
Exit Function
End If
intI = Worksheets(Tab1).Index
intJ = Worksheets(Tab2).Index
For intTab = intI To intJ
Set Bereich = ActiveWorkbook.Worksheets(intTab) _
.Range(Bereich.Address)
Wert = Wert + Application.WorksheetFunction.CountIf _
(Bereich, Suchkriterium)
Next intTab
ZählenWennTabellen = Wert
End Function
Der Aufruf erfolgt mit
=ZählenWennTabellen("Tabelle1";"Tabelle3";A1:A10;"x")+(0*JETZT())

Der Aufruf erfolgt mit

​

=ZählenWennTabellen("Tabelle1";"Tabelle3";A1:A10;"x")+(0*JETZT())
​

 

Hallo, das habe ich so gelöst und zwar für jeden Wert der für jeden "Spieler" in einer Tabelle steht. Wenn also der Spieler6 weg fällt dann ersetze ich nur noch den Namen in der entsprechenden Tabelle und in der Gesamtliste, fertig.

=SUMME(NGN!D2:D48) nur bei der Anzahl der Serien ist ein anderer Befehl =ANZAHL(NGN!B2:C49) welches ja klar ist. Also recht einfach gestrickt ist.
NGN! ist also die Tabelle wo alle Ergebnisse einfließen und aus dieser wird der Wert bezogen.

LG Oldmen

 

Das hilft :-) gewusst wie ....

Vielen Dank