Excel druckt Objekte mit falschem Seitenverhältnis

Da steckt kein sinnvolles System dahinter, das einem ermöglicht diese Abweichungen auszugleichen.

Der Sinn ist die Funktionalität in Excel das die Ausgabe generell skaliert wird, dadurch kann man auch einen Ausdruck auf einen Seite quetschen wenn rechts eine Zelle ein paar Pixel über den Rand geht.

Andere Programme nehmen die Papiergröße als Ausgangsgröße, bei Excel macht das keinen Sinn. Ist nicht soo schwierig zu verstehen...

Andreas.

Da steckt kein sinnvolles System dahinter, das einem ermöglicht diese Abweichungen auszugleichen.

Doch, geht, ist sogar ganz popelig.

Andreas.

Option Explicit

Dim A As Double, B As Double

Private Sub Workbook_BeforePrint(Cancel As Boolean)

Dim Sh As Shape

Dim SaveView

Set Sh = ActiveSheet.Shapes(1)

SaveView = ActiveWindow.View

ActiveWindow.View = xlNormalView

A = Sh.Width / Sh.Height

ActiveWindow.View = xlPageLayoutView

B = Sh.Width / Sh.Height

ActiveWindow.View = SaveView

Sh.Width = Sh.Width * (A / B)

Application.OnTime Now, Me.CodeName & ".Workbook_AfterPrint"

End Sub

Sub Workbook_AfterPrint()

Dim Sh As Shape

Set Sh = ActiveSheet.Shapes(1)

Sh.Width = Sh.Width * (B / A)

End Sub

Dass Office kein Layoutprogramm ist, ist mir bewusst.

Wenn ich aber in einer Arbeitsmappe in der Normalansicht für ein Projekt mittels Objekten etwas darstellen will und die Verhältnisse sind dann im Druck komplett aus dem Gleichgewicht gerissen, dann zweifle ich an der Qualität der Software.

Das Seitenverhältnis der Anzeige als Ausrede zu nutzen, warum der Druck in die Breite gezogen wird ist nicht akzeptabel. In anderen Programmen passiert das nicht. Hier sei Word genannt. Auch eine Office Anwendung. Jegliches Grafikbetrachtungs- und/oder Bearbeitungsprogramm.
Ich kenne solche Probleme bisher nur von Excel.

Außerdem zieht die Erklärung mit der Ansicht, dem Monitor, dem "angeschlossenen Gerät" mMn nicht.

Würde in der Seitenlayout -Ansicht das Verhältnis nicht verzerrt werden, würde ja alles stimmen! Aber wie meine Screenshots oben zeigen zieht Excel dort im Vergleich zur Normalansicht die Breite des Objektes um +10% hoch.

Ich habe ein paar Experimente gemacht. Kurioserweise variiert diese Abweichung in der Breite, je nachdem wie groß der aktuelle Zoomfaktor ist, den man einstellt:

Zoomfaktor in % / Breite in %

40 / 108

50 / 110

60 / 111

70 / 109

80 / 110

90 / 109

100 / 110

Zusätzlich variiert die Abweichung auch noch wenn die Objekte in dem Dokument eine andere Größe haben. Dann stimmt die obige Aufzählung nicht mehr.

Da steckt kein sinnvolles System dahinter, das einem ermöglicht diese Abweichungen auszugleichen.

Das hat übrigens auch Einfluss auf Text den man in einem Textfeld platziert, da das Textfeld auch ein Objekt ist und umskaliert wird. Somit verzerrt sich die Größe des Textfeldobjektes und der Text ist anders formatiert.

Einzige Möglichkeit wäre alle Objekte vor dem Drucken in der Breite zu stauchen, was allerdings beim Text dann keinen Einfluss hat, den man in normalen Zellen schreibt.

Man könnte natürlich das komplette Dokument in der Layoutansicht erstellen, aber das ist, mMn, absolut unpraktisch.

Eine sinnvolle Lösung scheint es also nicht zu geben fürchte ich.

In den vielen "Schlaue-Leute" Foren sprechen die "Cracks" von Abweichung zwischen Treiberversion, Papierformat, Bildschirmauflösung/Bilschirmseitenverhältnis, DPI und solchem Tünneff, oder man soll mal den PC neu starten...

Der Neustart ist Blödsinn, aber der Rest nicht.

Office generell ist kein Layout-Programm, diese Vorstellung ist weit verbreitet aber falsch. Wenn Du das willst, dann musst Du andere Programme verwenden.

Die Skalierung wird je nach angeschlossenem Gerät angepasst und wenn das 1. ein Seitenverhältnis von 1:2 und das 2te von 1:2,3 hat, dann werden die Objekte auf dem 2ten halt für Dich optisch krumm.

Würde man das nicht machen, dann hättest Du noch mehr, aber andere, Probleme. Vertrau da mal auf die "Cracks", die wissen wovon sie reden. ;-)

Andreas.

Hallo,

um welche Art von Excel-Objekt handelt es sich, z. B. EMBED Excel.Sheet.12? (Ob es sich in Excel tatsächlich um eine
Tabelle handelt, dürfte unerheblich sein...) Wie viele Spalten/Zeilen des Excel-Objekts sollen in Word angezeigt werden, wie viele werden nach Öffnen/Schließen des Objekts nur noch dargestellt?

Wenn du das ungeöffnete Objekt mit rechter Maustaste anklickst und im Kontextmenü den Befehl "Bild | Größe" wählst, hat sich vermutlich die Relation Höhe/Breite verändert. Das ist leider ein Problem seit jeher - am besten "Seitenverhältnis sperren"
deaktivieren, beide Maße auf 100 % festlegen und erneut das Seitenverhältnis sperren.

Es dürfte reichen, im geöffneten Excel-Objekt unter "Seitenlayout
| Blattoptionen | Gitternetzlinien" die Option "Anzeigen" zu deaktivieren. Dann werden die Gitternetzlinien auch nicht gedruckt.

Alternativ wähle im Kontextmenü des Excel-Objekts den Befehl "Worksheet-Objekt |
Öffnen". Dann steht auch in Excel der Befehl "Seitenlayout
| Seite einrichten | Blatt | Gitternetzlinien" zur Verfügung.

Viele Grüße

Lisa