Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
392to396
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
392to396
392to396
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

summe bilden

summe bilden
09.03.2004 08:39:10
joel
hallo
ich habe in einer spalte diverse zahlen, die ich mit vba summieren möchte. falls diese summe grösser ist als ein bestimmter wert, möchte ich ein anderes tabellenblatt aktivieren (wksBlatt2.activate).
wie kann ich die summe bilden? ich möchte dies nicht in excel mit =summe()... lösen und dann diesen wert auslesen.
danke für eure hilfe

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

Betreff
Datum
Anwender
Anzeige
AW: summe bilden
09.03.2004 08:49:13
Juli
Hallo Joel,
ich bilde die Summe in einem Makro so:


Cells(x,y).Select
ActiveCell.FormulaR1C1 = "=SUBTOTAL(9,R17C:R17C)"
danach würde ich den Wert vergleichen:
If Cells (x,y) > xxx then wksblatt2.activate
ich hoffe es klappt.
AW: summe bilden
09.03.2004 08:55:22
Waltraud
zum Beispiel
Dim summe As Double
For Each zelle In Worksheets("Tabelle1").Range("A1:A100")
summe = summe + zelle.Value
Next zelle
If summe > 100 Then
End If
AW: summe bilden
09.03.2004 09:09:08
Mac4
Hi,
so gehts auch:

Sub test1()
If WorksheetFunction.Sum(Range("A1:A10")) > 10 Then
Sheets("Tabelle2").Activate
End If
End Sub

Marc
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige