Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
24.04.2024 18:49:56
merge & select
24.04.2024 17:19:09
Formel mit Index-Funktion
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1204to1208
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1204to1208
1204to1208
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Summenprodukt am Ende der Tabelle

Summenprodukt am Ende der Tabelle
Bernhard
Wertes allwissendes Forum!
Ich probier jetzt schon seit zwei Stunden eine Summenproduktformel ans Ende meiner Tabelle zu bringen, aber ich bekomme es einfach nicht hin.
In Spalte G soll das Summenprodukt von Spalte I und Spalte J gebildet werden, dann durch die Summe aus Spalte K geteilt werden. (Siehe auch blau markierte Zelle im Beispiel)
https://www.herber.de/bbs/user/73884.xlsx
Das fiese ist, dass die Tabelle immer unterschiedlich viele Zeilen hat, der Aufbau sonst ist identisch.
Wie ist es zu schaffen dass die Formel wie dargestellt per VBA ans Ende der Tabelle kommt?
Ich bin unendlich dankbar für jeden Tipp....
Gruß aus Mannheim,
Bernhard

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

Betreff
Benutzer
Anzeige
AW: Summenprodukt am Ende der Tabelle
08.03.2011 10:53:51
Rudi
Hallo,
Cells(Rows,Count, 10).end(xlUp).Offset(2).FormulaR1C1= "=ROUND(SUMPRODUCT(R3C9:R[-2]C9,R3C10:R[-2]C10)/SUM(R3C11:R[-2]C11),2)"
Gruß
Rudi
AW: Summenprodukt am Ende der Tabelle
08.03.2011 14:21:15
Bernhard
Super vielen Dank!
Hat bis auf das Komma nach Row einwandfrei funktioniert! Ich wüßte nicht was ich ohne Euch täte...
Deshalb noch ein herzliches DANKESCHÖÖÖN viele Grüße und ein Hellau.
Bernhard!
AW: Summenprodukt am Ende der Tabelle
08.03.2011 10:59:45
Reinhard
Hallo Bernhard, 

Option Explicit
Sub Summen()
Dim Zei As Long, Formel As String
Formel = "=RUNDEN(SUMMENPRODUKT((I3:I11)*(J3:J11))/SUMME(K3:K11);2)"
With Worksheets("tabelle1")
Zei = .Cells(Rows.Count, 4).End(xlUp).Row
.Range("D" & Zei + 2 & ":L" & Zei + 2).FormulaLocal = "=Summe(D3:D" & Zei & ")"
.Range("J" & Zei + 2).FormulaLocal = Formel
End With
End Sub

Gruß
Reinhard
Anzeige

302 Forumthreads zu ähnlichen Themen

Ende der Tabelle mit Makro finden
Jan

Hallo zusammen,
komme mit einer Funktion in meinem Makro nicht weiter und bräuchte eure Hilfe.
Ich habe eine Täglich zu bearbeitende Produktliste. Diese weist Täglich eine veränderte Anzahl von Zeilen auf. Was immer gleichbleibend ist, ist die Zeile 1. Sie beinhaltet die Attribute für j...
10.04.2011 20:59:40
Thread-ID: 1209803
9 Beiträge
Anzeige
Spalte mit selben Wert bis Ende der Tabelle fuelle
Marvin

Hallo zusammen,
Ich habe folgendes Problem:
Ich habe eine Tabelle mit mehreren Spalten von denen alle ausgefuellt sind, ausser eine, Spalte O. In die soll ueberall der Wert "GBP" eingefuegt werden, allerdings nur bis zum Ende der Tabelle.
Bisher habe ich diesen Code: Sub ContentGBP(...
16.01.2015 15:58:30
Thread-ID: 1403249
9 Beiträge
Autofill bin Ende der Tabelle in anderer Datei
Marvin

Hallo zusammen,
ich habe folgenden Code, der mir die Formel in Zelle A1 bis zum Ende der Tabelle mit einem Autofill "kopiert":
Private Sub CommandButton1_Click() letzte = Cells(Rows.Count, 3).End(xlUp).Row Range("A1").AutoFill Destination:=Range("A1:A" & letzte) End Sub Ich probier...
03.02.2015 11:10:32
Thread-ID: 1406890
4 Beiträge
Anzeige
VBA bis Ende der Tabelle
Michael

Hallo,
mit folgendem per Recorder aufgezeichneten Code wähle ich einen Bereich aus um ihn zu formatieren:
Range("J3:O3").Select
Range(Selection, Selection.End(xlDown)).Select
With Selection.Interior
.Pattern = xlGray...
28.05.2015 17:03:42
Thread-ID: 1428211
3 Beiträge
erstelltes Tabellenblatt immer wieder verwenden
Jo

Hallo zusammen,
nachdem mir vorhin schon bei einem anderen Problem sehr gut geholfen wurde, habe ich hier die nächste Hürde.
Ich habe eine Excel-Datei mit 2 Tabellenblättern.
In der Tabelle1 stehen meine Grunddaten in mehreren Zeilen und Spalten. Alle 16 Zeilen wiederholt sich das...
27.10.2015 10:49:51
Thread-ID: 1454665
5 Beiträge
Zeilen abhängig aus/einblenden in anderer Tabelle
Martin

Hallo, habe das Forum durchsucht, aber nicht die Lösung für meine Frage gefunden:
In Tabelle2 ändert sich der Wert in Zelle H1 über die Formel "=Tabelle1!$D$26".(entweder Wert "1" oder "2"), Nun möchte ich, dass sich in Tabelle2 die Zeilen 5 bis 39 ausblenden, wenn in Tabelle2 in Zelle H1 d...
03.05.2016 12:56:30
Thread-ID: 1491659
13 Beiträge
Ansichtgröße der Tabelle festlegen
Hartmut Mengeler

Hallo, ich möchte ein Tabellenblatt als Formular abspeichern. Hierbei habe ich die am Bildschirm sichtbaren Zellen farblich makiert. Nun soll vermieden werden, daß der Anwender mit den Scrollleisten das Formular
hin und herschieben kann, so daß er aus dem Formular herauskommt. Ist dies machb...
14.08.2002 13:58:44
Thread-ID: 148524
3 Beiträge
Pivot-Tabelle ändert "unterliegendes" Blattformat
Tim

Hallo,
ich habe eine Pivot-Tabelle, welche ich durch verschiedene Slicer filtern kann. Das heißt, die Anzahl der gefüllten Zeilen ändert sich in der Pivot-Tabelle.
Nun ist es so, dass ich mein gesamtes Worksheet dunkelgrau gefärbt habe.
Wenn ich nun die Tabelle filtere, sodass stat...
02.08.2017 11:29:58
Thread-ID: 1571975
5 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
8
7
8
3
8
2
4
12
2
4
6
6
3
3
2
1
3
4
3
4
3
10
5
3
8