Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1296to1300
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Mittelwert über variablen Bereich

Mittelwert über variablen Bereich
05.02.2013 09:31:59
Chris
Hallo, zusammen!
Ich möchte den Mittelwert über einen Bereich ermitteln, bei dem sich die Spaltenzahl ändert. Die aktuelle Anzahl der Spalten ermittle ich mit:
y = Cells.Find("*", [A2], , , xlByRows, xlPrevious).Column + 1
Das Problem: Wenn ich per VBA die Formel
Cells(3, 6).Formula = "=Average(Range(Cells(3, 7), Cells(3, y)))"
in der Zelle einfüge, erscheint:
=MITTELWERT(Cells(3; 7); Cells(3; y))
Vielen Dank schon mal für Eure Hilfe

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Mittelwert über variablen Bereich
05.02.2013 09:38:54
Klaus
Hi,
das geht so (stringzerlegung):
Cells(3, 6).Formula = "=Average("& Cells(3, 7).address & ":" & Cells(3, y).address & ")"
Grüße,
Klaus M.vdT.

kürzer AW: Mittelwert über variablen Bereich
05.02.2013 09:41:02
Klaus
Hallo nochmal,
zu schnell gepostet, das war unnötig kompliziert.
statt
Cells(3, 6).Formula = "=Average("& Cells(3, 7).address & ":" & Cells(3, y).address & ")" nimm das kürzere
Cells(3, 6).Formula = "=Average("& range(Cells(3, 7),Cells(3, y)).address & ")"
Grüße,
Klaus M.vdT.

AW: Mittelwert über variablen Bereich
05.02.2013 09:42:34
Chris
Super, so funktioniert's!
Vielen Dank!

Anzeige
Danke für die Rückmeldung! owT.
05.02.2013 09:57:23
Klaus
.

AW: Formeln in VBA am einfachsten per R1C1
05.02.2013 10:55:22
Daniel
Hi
das geht auch wesentlich einfacher durch Nutzung der R1C1-Schreibweise:
Cells(3, 6).FormulaR1C1 = "=Average(R3C7:R3C" & y & ")"
Gruß Daniel

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige