Zeilenhöhe verkleinern und vergössern
11.10.2024 19:02:35
Milan
ich versuche etwas zusammen zu meistern aber bin nicht der Sache gewachsen und bitte um eure Hilfe.
Nach Umbau von meinen Mappen die auf verschiedene Windowsskalierung öffnen sollen habe ich problem auch beim drücken auf bestimmte Bläter oder eine Serie von blätter.
Wenn ich ein Blatt erstelle unter z.B 3840x2160 und Windowsskalierung 100% dann drückt natürlich genau aber wenn ich dann die Windowsskalierung vergrössere auf z. B 300% dann ändert mir nicht nur Ansichtgrösse sondern beeinflüsst auch Zeilenhöhe im Blatt selbst und dann druckt aber falsch (durch Zeilenverschiebung). Das müsste ich so machen weil ich möchte eine Datei öffnen können auf dem Computer mit 2K und 4K und belibiege Skalierung von 100%-350% je nach dem welche Einstellung PC hat.
Um gegen zu steuern ist das nicht möglich ohne vba code. Ich habe im Netz was gefunden aber läuft nicht richtig, es soll Zeilehöhe vergrössern für 1 Pixel aber vergrössert irgendwie nach Schriftgrösse oder Autofit Methode.
Problem dabei ist ich bekomme das nicht gebacken weil ich wollte das einfach zu bekommen aber gleichzetig fexibel für verschiedene Scenarien z.B.
Variable1=BlattName(erstes Blatt)
Variable2=BlattName(letztes Blatt)
Variable3=Erste Zeilenummer
Variable4=Letzte Zeilenummer
Variable5=PixelAnzahl + -
Das wollte ich steuern vorerst mit zwei Label (+) und (-). Label (+) soll Zeilenhöhe immer für 1 Pixel vergrössern und (-) umgekehrt damit ich Blattverhältnis wiederherstelle.
Ich habe je nach der Mappe verschiedene Blätteranzahl die ich benenne mit z.B. Blatt1 bis Blatt60 (Variable1 und 2), in allen sollen Zeile z.B. Zeile 2 bis 40 angesprochen sein (Variable3 und 4), und Vergrösserungs oder Verkleinerungsfaktor immer +1Pixel oder -1Pixel (Variable5). Wenn auch Spaltenbreite dabei ist nicht so schlimm wenn man auf null setzen kann.
Höffentlich habe ich das verständlich geschrieben
Vieleicht hat jemand in der Vergangenheit damit zutun gehabt und mir damit das Leben retten.
Danke
Anzeige