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

Zählen von negativen Werten innerhalb Range

Zählen von negativen Werten innerhalb Range
24.04.2003 10:17:36
Andy
Hallo an alle,

mal wieder ein Problem
Mit untem folgenden Code habe ich eine Range definiert. Diese Werte sind entweder positiv oder negativ. Ich müsste nun die Anzahl der negativen (alternativ auch positive) Werte rausfinden. Hat jemand von euch eine idee?

Grüße

Andy
Set PSH = ActiveSheet.Range(Cells(2, 2), Cells(2, b))
Range(PSH.Address).Copy Destination:=Worksheets("tabelle5").Cells(aufrufe - 2, 3)

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Zählen von negativen Werten innerhalb Range
24.04.2003 10:44:50
moe

Halllo Andy

den Range anpassen

=ZÄHLENWENN(A2:A6;"<0")

Gruss
moe

@moe: Zählen von negativen Werten innerhalb Range
24.04.2003 10:55:10
Andy

Hallo Moe,
danke für deine Hilfe. Wie bekomme ich das nun in den Excel-VBA Code. Habe es wie folgt probiert. Geht aber leider nicht. Ich denke ich mache beim Argument zwei etws falsch. Ziel ist es die komplette Range zu behalten und an anderer Stelle die Anzahl der negativen Werte auszugeben. Bis auf die Berechnung dieser Anzahl bekomme ich alles selbst hin.

Sub NegativZählen()
Dim range As range
Set range = ActiveSheet.range(cells(1,1),cells(1,j))
range("A1").Value = Application.WorksheetFunction.CountIf(range, ">0")

End Sub

Anzeige
Re: @moe: Zählen von negativen Werten innerhalb Range
24.04.2003 11:04:36
moe

ach so sag das doch gleich

Range("a1").FormulaR1C1 = "=COUNTIF(R[2]C[1]:R[1]C[" & j & "],""<0"")"


Gruss

moe

Re: @moe: Zählen von negativen Werten innerhalb Range
24.04.2003 11:07:29
Andy

Cool. Danke für den Tip.

Andy

149 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige