Vergleich-Bug in Excel VBA 2010

Re(2): Vergleich-Bug in Excel VBA 2010

Infosauger — Wed, 13 Feb 2013 17:55:44 GMT

nö, wieso?, schau dir den code an

Re: Vergleich-Bug in Excel VBA 2010

Paulas_Papa — Wed, 13 Feb 2013 14:25:31 GMT

Verwechselst du Spalte und Zeile im VBA?

mfg
lukas

Re(2): Vergleich-Bug in Excel VBA 2010

Infosauger — Wed, 13 Feb 2013 11:03:59 GMT

habe ich schon gemacht, siehe http://forum.geizhals.at/t817328,7004906.html#7004906

Re: Vergleich-Bug in Excel VBA 2010

Diabolo2000 — Wed, 13 Feb 2013 09:14:06 GMT

Geh mal mit dem Debugger durch.

Re(2): Vergleich-Bug in Excel VBA 2010

der_koarl — Tue, 12 Feb 2013 22:29:52 GMT

also bei mir wird mit =WENN(A1>B1;"a";"b") immer "b" ausgegeben und
mitauch immer "b"

Der Datentyp ist double - das Abschreiben der ersten paar Stellen der Dezimaldarstellung
wird nicht das selbe Ergebnis bringen.

Entweder einen dezimal-typ verwenden, oder Epsilon bei der Berechnung berücksichtigen.

Re(2): Vergleich-Bug in Excel VBA 2010

Somnatic — Tue, 12 Feb 2013 16:07:06 GMT

Hätt ich auch gesagt, wobei das mit dem "runden auf wenige Kommastellen" würde ich verneinen.

Re(6): Vergleich-Bug in Excel VBA 2010

Infosauger — Tue, 12 Feb 2013 15:16:04 GMT

aber wie es aussieht, ist es eine periodische zahl, die durch irgendeine
berechnung zustande kommt.

nein, die Werte stammen aus keinen Formeln, sondern stehen so in den Zellen drinnen.
Das mit dem Runden habe ich nicht gemacht, sondern als Umgehungslösung einen "Rundungscent " beim Vergleich hinzugefügt.

Re(5): Vergleich-Bug in Excel VBA 2010

Thunder — Tue, 12 Feb 2013 14:32:42 GMT

schaut ansich nicht falsch aus hast schon mal probiert, auf x stellen nach komma (für den vergleich) zu runden/abzuschneiden? ein wenig ärgerlich natürlich, aber wie es aussieht, ist es eine periodische zahl, die durch irgendeine berechnung zustande kommt.

Re: Vergleich-Bug in Excel VBA 2010

hellbringer — Tue, 12 Feb 2013 13:33:20 GMT

Ich hab mit VBA keine Erfahrung, aber das hört sich für mich nach einem typischen Fließkommazahlenproblem an.

Ich vermute, die Werte werden als Float abgelegt. Wenn das der Fall ist, solltest du besser den Scaled Integer Type verwenden:

http://msdn.microsoft.com/en-us/library/office/aa164573(v=office.10 ).aspx
http://msdn.microsoft.com/en-us/library/office/aa164511(v=office.10 ).aspx

Re: Vergleich-Bug in Excel VBA 2010

hellbringer — Tue, 12 Feb 2013 13:33:20 GMT

Ich hab mit VBA keine Erfahrung, aber das hört sich für mich nach einem typischen Fließkommazahlenproblem an.

Ich vermute, die Werte werden als Float abgelegt. Wenn das der Fall ist, solltest du besser den Scaled Integer Type verwenden:

http://msdn.microsoft.com/en-us/library/office/aa164573(v=office.10).aspx
http://msdn.microsoft.com/en-us/library/office/aa164511(v=office.10).aspx

Oder du rundest die Werte auf wenige Kommastellen, dann sollte das Problem auch nicht mehr auftreten.

Re: Vergleich-Bug in Excel VBA 2010

hellbringer — Tue, 12 Feb 2013 13:33:20 GMT

Ich hab mit VBA keine Erfahrung, aber das hört sich für mich nach einem typischen Fließkommazahlenproblem an.

Ich vermute, die Werte werden als Float abgelegt. Wenn das der Fall ist, solltest du besser den Scaled Integer Type verwenden:

http://msdn.microsoft.com/en-us/library/office/aa164573(v=office.10).aspx
http://msdn.microsoft.com/en-us/library/office/aa164511(v=office.10).aspx

Re(4): Vergleich-Bug in Excel VBA 2010

Infosauger — Tue, 12 Feb 2013 13:32:05 GMT

Habe die gleiche Version.

Wüsste nicht was ich im Zahlenformat geändert hätte, dass es bei gewissen Werten nicht funktioniert(Habe eine Liste mit 150 Zeilen, und bei ~10 funktionieirt es nicht!

Re(3): Vergleich-Bug in Excel VBA 2010

Thunder — Tue, 12 Feb 2013 13:21:45 GMT

Excel 2010 (14.0.6126.5003) SP1 MSO (14.0.6129.5000) 32bit
hast vielleicht das zahlenformat geändert oder sonst irgendwelche eigenschaften?

Re(3): Vergleich-Bug in Excel VBA 2010

Thunder — Tue, 12 Feb 2013 13:21:45 GMT

Excel 2010 (14.0.6126.5003) SP1 MSO (14.0.6129.5000) 32bit

Re(2): Vergleich-Bug in Excel VBA 2010

Infosauger — Tue, 12 Feb 2013 13:04:29 GMT

Welche Version hast du?

Re: Vergleich-Bug in Excel VBA 2010

Thunder — Tue, 12 Feb 2013 12:28:03 GMT

also bei mir wird mit =WENN(A1>B1;"a";"b") immer "b" ausgegeben und mit

For i = 1 To 3
    If Cells(i, 1).Value > Cells(i, 2) Then
        Cells(i, 4).Value = "a"
    Else
        Cells(i, 4).Value = "b"
    End If
Next i

auch immer "b"

Vergleich-Bug in Excel VBA 2010

Infosauger — Tue, 12 Feb 2013 10:16:25 GMT

Hallo,

entweder habe ich einen Bug in VBA für Excle 2010 gefunden, oder ich habe einen Denkfehler:

In einer Exceldatei stehen folgende Werte in den Zellen:
             A                               B
1     1576,575                     1576,575
2     1473,20833333333     1473,20833333333
3     1987,88333333333     1987,88333333333

Wenn ich nun in Spalte C mit Wenn einen Vergleich der durchführe (=Spalte B > Spalte A): bekomme ich logischerweise überall falsch, denn die Werte sind ja jeweils gleich.

Allerdings vergleiche ich in meiner Datei die Werte über ein VBA-Makro.
Wenn ich dort in eriner Schleife über mehrere Zeilen mit der Abfrage
If Tabellenblatt.Cells(zeile, 2).value > Tabellenblatt.Cells(zeile,1) then ....
überprüfe, ist in der sritten Zeile die Bedingung Wahr.
Wenn ich mir die Überwachungsausdrücke für Tabellenblatt.Cells(zeile, 2).value  Tabellenblatt.Cells(zeile, 1).value ansehe, stehen dort logischerweise auch die identischen Werte.
Aber der Überwachungsausdruck "Tabellenblatt.Cells(zeile, 2).value > Tabellenblatt.Cells(zeile,1) " liefert in der 3. Zeile Wahr.

Oder habe ich einen Denkfehler?