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

Forumthread: Bereich summieren und Werte einzeln ausgeben

Bereich summieren und Werte einzeln ausgeben
06.12.2005 10:48:23
Tori
Hallo Leute,
ich möchte eine Funktion basteln (habe ich auch schon probiert, aber ich komm einfach nicht weiter). Also ich möchte zum einen eine Funktion haben, die die Werte eines ausgewählten Bereichs summiert.

Function ADDITION(WERTE)
ADDITION = ?
End Function

Die Variable "WERTE" soll als Bereich (zB: "A1:B4") oder als einzelne Zelle (zB: "A1") ausgewählt werden können.
...und zum anderen möchte ich eine Funktion haben, die bei Auswahl eines Bereichs (soll "nur" eine Zeile sein, zB: "B1:E1") alle Werte in der Funktion einzeln ausweisen kann (zB als Array(B1,C1,D1,E1)), so daß man mit den einzelnen Werten in der Funktion weiterarbeiten kann.

Function EINZELNE_WERTE(ZEILE)
DIM WERTE
WERTE = ARRAY(ZEILE)
'hier würde ich die einzelnen Werte des Array weiterbearbeiten wollen
End Function

Dank euch.
Gruß Tori
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Bereich summieren und Werte einzeln ausgeben
06.12.2005 11:09:36
Daniel
Hallo Toni,
die erste Funktion könnte so aussehen:

Private Function Addiere(Bereich As Range)
Dim Zelle As Range
Dim Summe As Integer
Summe = 0
For Each Zelle In Bereich
MsgBox Zelle.Address
Summe = Summe + Zelle
Next
Addiere = Summe
End Function

Für die zweite Funktion:
Mit obigen Mechanismus wird der Bereich Zeilenweise abgearbeitet. Du bekommst in der Each Next Schleife also Wert für Wert sequenziell ausgelesen.
Ich hoffe es hilft dir weiter.
Gruss
Daniel
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige