Thema: Monatsblätter in Abhängigkeit ihres Namens summieren

Home

Gruppe

UDF

Problem

Es sollen Monatsblätter in Abhängigkeit ihres Namens zu einem Start- und einem Enddatum summiert werden.

Lösung

Geben Sie die nachfolgende benutzerdefinierte Funktion in ein Standardmodul ein.

StandardModule: basMain

Function DreiDSum( _
   sWksA As String, _
   sWksB As String, _
   sRng As String) _
   As Double
   Dim wks As Worksheet
   Dim dValue As Double
   Dim bln As Boolean
   For Each wks In Worksheets
      If wks.Name = sWksA Then bln = True
      If bln Then
         dValue = dValue + WorksheetFunction.Sum(wks.Range(sRng))
      End If
      If wks.Name = sWksB Then bln = False
   Next wks
   DreiDSum = dValue
End Function

Beiträge aus dem Excel-Forum zu den Themen UDF und Summe

Summe durch Erfassung mehrerer Bedingungen	Summe durch Erfassung mehrerer Bedingungen
Summe Summenprodukt nur einmal	summewenn verbessern
Summenprodukt	Zwischensummen innehralb einer Tabelle
SUMMENPRODUKT soll Text zurückgeben	Summe von letzter freier Zelle in Spalte
Summe aus Texten+Zahl mit Bedingung	Summen von zusammengehörenden Zeilen
Summe bilden	Teilergebnis mit Summenprodukt kombiniert
Teilzahlen runden / bestimmte Summe	Index Vergleich Formel mit Summenformel
Matrixformel mit Summenfunktion	Summe VBA in abhängigkeit Datum
SUMMEWENN über mehrere	Summewenn mit Bezug auf ein Datum
Summen bilden	@DAVID Zwei SUMMEWENN funktionen verknüpfen
Zwei SUMMEWENN funktionen verknüpfen	Summe bilden wenn zwei Kriterien übereinstimmen
Summewenn mit meheren Kriterien/Blaettern	Filtern oder Summewenn !?
Summewenn/Summenprodukt mit mehreren Kriterien	alle Zahlen-/Summenkombinationen eines Wertes
Summen Formel	doppelte werte + summe
Formelproblem bei Summenprodukt	SUMMENPRODUKT eine Nummer weiter
Summewenn = Zählenwenn (bei 0)	Summewenn mit abhängigen Bereichen
Summewenn mit abhängigen Bereichen	Frage zu summeWenn
SUMMEWENN auf verschiedene Spalten	Summendprodukt istnummer
summewenn mit Zelle als Suchkriterium	Summenprodukt bei Zahlen folge
Nur Summe bilden wenn keine leeren Zellen	Summe Produkt?
Summe gewichtet	Summenmakro
Lohnsteuerberechnung (UDF, XLM-Datei, Webabfrage)	Alle Summen-Kombinationen aus 1-n Zellen
Summe / Wenn Matrix i.V.m Teilergebnis	Summe von Werten die nur zw. X und Y sind
Summenbildung	Problem mit wertAlles = tbSumme.Value & "+" &a
SummeWenn	Summe und Zählen Wenn