Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Teilergebnis am Schluss von Spalte a

Forumthread: Teilergebnis am Schluss von Spalte a

Teilergebnis am Schluss von Spalte a
16.03.2013 12:26:27
Spalte
Hallo,
in einer Tabelle sind Datensätze.
Excel soll am Schluss von Spalte "A" die Formel: Teilergebnis einfügen.
Mit dem Aufzeichnen Geht das zwar, aber wenn dann mehr oder weniger Datensätze in der Tabelle sind, funktioniert mein Makro nicht mehr.
Momentan sind in der Tabelle "nur_Druck" in Zeile1 die Titel-Zeile, von Zeile 1 bis Zeile 180 die Datensätze.
In A181 sollte dann das Teilergebnis (Code 3, Anzahl-Datensätze) stehen:
also 179.
Danke für einen Tipp
Wilhelm

Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Teilergebnis am Schluss von Spalte a
16.03.2013 12:33:35
Spalte
Hallo,
so müsste es gehen, evtl. die Tabelle anpassen und in der Formel die erste Zeile.
Dim lngLetzte As Long
With Tabelle1 'Tabelle anpassen 
    lngLetzte = .Cells(.Rows.Count, 1).End(xlUp).Row
    If lngLetzte < 2 Then Exit Sub
    'R1C1 = ab Zeile 1; R2C1 = ab Zeile 2 usw... 
    .Cells(lngLetzte + 1, 1).FormulaR1C1 = "=SUBTOTAL(3,R1C1:R[-1]C)"
End With
Gruß Tino
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