Gefilterte Spalte summieren

Hallo zusammen,
ich verzweifel gerade an Excel, vll kann mir jmd helfen.
Ich habe eine Spalte gefiltert und möchte die nun angezeigten Ergebnisse summieren.
Das ist mein Code:
TextBox4.Text = [Sum_Visible_Cells(Q2:Q65000)]

Ich möchte aber nicht jede Suchanfrage bis 65000 laufen lassen, habe schon versucht über eine Variable ‚last‘ und dieser Deklaration:
Cells(65000, 5).End(xlUp).Offset(1, 0).Select
den Workload für diese Funktion zu verringern, es ist mir aber nicht gelungen.

Ideen?

Grüezi Kristin

Ich habe eine Spalte gefiltert und möchte die nun angezeigten
Ergebnisse summieren.

Verwende in einer Zelle dazu die Funktion TEILERGEBNIS() - die Angaben zu den Parametern findest Du in der Online-Hilfe.

Auf diese Zelle kannst Du dich dann für die Übermittlung des Wertes an deine Textbos beziehen.

Ideen?

Asu VBA heraus kannst Du auch folgende Funktion mit den identischen Parametern verwenden:

Application.WorksheetFunction.Subtotal()


Mit freundlichen Grüssen

Thomas Ramel

  • MVP für MS-Excel -