Anzeige
Archiv - Navigation
1560to1564
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
Inhaltsverzeichnis

Array auf positive/negative Zahlen prüfen

Array auf positive/negative Zahlen prüfen
06.06.2017 14:23:58
Peter
Hallo,
ich habe versucht ein Makro zu erstellen, dessen Teilaufgabe es wäre aus einem variablem Array herauszulesen, ob alle Werte darin positiv oder negativ sind. Leider scheitert es bei meinen VBA-Kenntnissen, weshalb mir ja vielleicht hier jemand weiterhelfen kann.
Konkret würde ich gerne folgendes umsetzen:
If Array(0 to N) < 0 Then
...
End If
Ist das überhaupt möglich? Wenn ja dann wie?
Danke!

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

Betreff
Datum
Anwender
Anzeige
AW: Array auf positive/negative Zahlen prüfen
06.06.2017 14:37:29
Nepumuk
Hallo,
das kannst du einfacher haben:
MsgBox Application.Min(Array)

Gruß
Nepumuk
AW: Array auf positive/negative Zahlen prüfen
06.06.2017 14:38:48
Sepp
Hallo Peter,
als Ansatz.
Sub test2()
Dim varArray() As Variant

varArray = Array(5, 9, 7, -2, 3, 2, 5, 0, 1)

If allPositive(varArray) Then
  MsgBox "OK"
Else
  MsgBox "Nicht OK"
End If
End Sub

Private Function allPositive(ByRef varrArray() As Variant) As Boolean
Dim lngI As Long

For lngI = LBound(varrArray) To UBound(varrArray)
  If varrArray(lngI) < 0 Then Exit Function
Next

allPositive = True
End Function

Gruß Sepp

Anzeige
AW: Array auf positive/negative Zahlen prüfen
07.06.2017 11:21:17
Peter
Hallo Sepp,
danke für deine Antwort! Mit der selbstdefinierten Funktion und dem Array als dynamisches Array funktioniert es genau so wie es soll! Danke!
LG Peter

230 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige