Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1440to1444
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

worksheetFunction Sumif funktioniert nicht

worksheetFunction Sumif funktioniert nicht
19.08.2015 07:32:08
Bonduca
Hallo,
ich habe mir folgenden Code in VBA gebastelt:

Sub PLZ_aufsummieren()
Dim ws1 As Worksheet
Dim ws2 As Worksheet
Dim varResult As Variant
Set ws1 = Worksheets("A")
Set ws2 = Worksheets("B")
For i = 17 To 40000
For j = 4 To 500
varResult = Application.WorksheetFunction.SumIf( _
Arg1:=ws1.Range("A17:A40000"), _
Arg2:=ws2.Cells(i, 3), _
Arg3:=ws1.Range(Cells(17, j), Cells(40000, j)))
ws2.Cells(i, j) = varResult
Next
Next
End Sub

Wenn die PLZ in Tabellenblatt A Spalte A und in Tabellenblatt B Spalte C übereinstimmt, soll spaltenweise aufsummiert werden
Es kommt die Fehlermeldung: Die Methode "Range" für das Objekt "Worksheet" ist fehlgeschlagen. Was mache ich falsch?

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: worksheetFunction Sumif funktioniert nicht
19.08.2015 08:10:25
Beverly
Hi,
in der Zeile Arg3:=ws1.Range(Cells(17, j), Cells(40000, j))) fehlt vor Cells jeweils das Worksheet.


AW: worksheetFunction Sumif funktioniert nicht
19.08.2015 09:18:50
Bonduca
Perfekt.
Danke für die schnelle Antwort!
Anzeige

304 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige