ich will in VAB Cellen aus einer Exelliste Vergeichen. Habe hierzu alle Cellen die Vergichen werden als Zahlen mit 2 Nachkommastellen Formatiert. Wenn ich nurn in VAB Cellen Addiere funktioniert die If Funtion nicht mehr Ordnungsgemäß.
Dim x As Double
Dim y As Double
for Z=2 to 1000
for c2=2 to 1000
x = Cells(Z, 9) + Cells(Z + 1, 9)
y = Cells(c2, 8)
If x = y Then
...
end if
If CDbl(Cells(Z, 9) + Cells(Z + 1, 9)) = CDbl(Cells(c2, 8)) Then
...
end if
next c2
next Z
Beide Ifs funktionieren nicht wenn ich im Überwachungsfenster die Werte der Variblen ansehe sind diese Identisch, VAB geht jedoch in keine der If Schleifen und springt sofort bis zum end if. Im Anhang die Ansicht des Überwachungsfensters.
Gruß Stefan