Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 10:28:49
16.10.2025 17:40:39
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Suche-summe Makro

Forumthread: Suche-summe Makro

Suche-summe Makro
04.07.2003 11:02:31
Stevie
Hi Leutz,
hab mal wieder ein kleines Problem.
Und zwar hab ich eine Tabelle in der in Spalte B Nummer stehen.
Diese Nummer kann in der Spalte mehrmals vorkommen.
Nun hätte ich in dieser Spalte jede Nummer gerne nur einmal jedoch sollen die Werte die in Zeile H stehen dabei summiert werden so das unter dem Strich der Wert jeder einzelnen Nummer heraus kommt.
Hoffe das war jetzt einigermassen verständlich erklärt :)
Vielen Dank im Voraus *frohbindaseseuchgibt*
Stevie
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Suche-summe Makro
04.07.2003 11:38:35
ChrisL
Hi Stevie
Option Explicit

Sub summieren()
Dim iZeile As Long, iiZeile As Long
Application.ScreenUpdating = False
For iZeile = Range("B65536").End(xlUp).Row To 1 Step -1
If WorksheetFunction.CountIf(Range("B1:B" & Range("B65536").End(xlUp).Row), Cells(iZeile, 2)) > 1 Then
For iiZeile = 1 To iZeile
If Cells(iiZeile, 2) = Cells(iZeile, 2) Then Exit For
Next iiZeile
Cells(iiZeile, 8) = Cells(iiZeile, 8) + Cells(iZeile, 8)
Rows(iZeile).EntireRow.Delete
End If
Next iZeile
Application.ScreenUpdating = True
End Sub

Gruss
Chris

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