wahrscheinlich ein Grundlagen Problem, aber ich bin zu schusselig, um die richtigen Suchbegriffe einzugeben.
Ich mache eine Abfrage über eine Schleife:
For a = 3 To Z
With ActiveSheet.Cells(a, 2)
.Select
If .Value > "2" Then
X = X + 7
End If
End With
Next a
Z sind die benutzen Zellen des Tabellenbalttes und wird vor der Schleife in X kopiert.
Zu Testzwecken habe ich in Spalte B ausgedachte Werte geschrieben.
Nehmen wir mal an diese:
1 If-bedingung wird nicht ausgeführt - korrekt
2 If-bedingung wird nicht ausgeführt - korrekt
3 If-bedingung wird ausgeführt - korrekt
10 If-bedingung wird nicht ausgeführt - falsch
21 If-bedingung wird ausgeführt - korrekt
99 If-bedingung wird ausgeführt - korrekt
100 If-bedingung wird nicht ausgeführt - falsch
201 If-bedingung wird ausgeführt - korrekt
Es wird also nur nach der ersten ziffer gesucht und diese überprüft.
Und da die Bedingung eigentlich
If .Value > "0.0014" Then
sein soll, stehe ich vor einem großen Fragezeichen.