Rechenfehler bei Excel (Makro anders als Anzeige)

...

Das ist ein dokumentiertes Verhalten.

Häng den Code unten in das Blatt, dann werden diese "Versehen" ausgebügelt.

Andreas.

Private Sub Worksheet_Change(ByVal Target As Range)

  Dim i As Long, s As String, d As String, n As Boolean

  With Target

    If .Count > 1 Then Exit Sub

    If VarType(.Value) <> vbString Then Exit Sub

    s = .Value

    For i = 1 To Len(s)

      d = Mid$(s, i, 1)

      If Not d Like "#" Then

        If d <> "." Then Exit Sub

        If n Then Exit Sub

        n = True

      End If

    Next

    Application.EnableEvents = False

    .Value = Val(s)

    Application.EnableEvents = True

  End With

End Sub

https://answers.microsoft.com/de-de...e-falsch/ba3b6e81-46d3-4f41-9d6c-02ba562cf5ee
<br />Grüße
<br />

Öffne ich die Datei allerdings mit Google Chrome ist alles da und in super Optik.

Und was hat das dann mit Excel oder dem Makro zu tun?

Das erzeugte PDF ist offensichtlich i.O. also liegt es an Deinem Acrobat wenn er es nicht anzeigen kann, logisch?

Andreas.

Hallo Wolfgang,



vielen Dank für deine Anfrage.



Wenn du nicht weißt was dies ausgelöst hat oder was verstellt wurde, dann mache einfach eine Systemwiederherstellung.

http://windows.microsoft.com/de-DE/windows7/products/features/system-restore

Gruß,



Thomas

Hallo Claus,

Danke für das schnelle Feedback!

Ich habe es mir gedacht, dass es am Chip liegt....

Nur zur Info: ich habe in meinem Beispiel das Zahlenformat auf "Zahl" mit 2 Nachkommastellen geändert und die Info über die Abweichung über die Formel dargestellt.

Bei Einstellung "Standard" bekomme ich

[table][tr][td]1,13687E-13[/td][/tr][/table]

Daher auch meine Anfrage.

MFG

Erich