Thema Datum  Von Nutzer Rating
Antwort
Rot Druckskalierung funktioniert nicht
15.11.2021 15:51:04 Pinacles
NotSolved
15.11.2021 15:56:32 Gast77262
NotSolved
15.11.2021 16:09:42 Gast47097
NotSolved
15.11.2021 16:45:42 Gast2416
NotSolved
16.11.2021 07:43:07 Pinacles
Solved

Ansicht des Beitrags:
Von:
Pinacles
Datum:
15.11.2021 15:51:04
Views:
614
Rating: Antwort:
  Ja
Thema:
Druckskalierung funktioniert nicht

Hallo zusammen, 

ich habe ein etwas größeres Makro geschrieben und möchte nun zum Schluss auf meinen Seiten noch die Druckskalierung einstellen. Dafür hab ich eingefügt: 

            With ThisWorkbook.Sheets(sheetName).PageSetup
                .PrintTitleRows = "$1:$2"
                .FitToPagesWide = 1 '1 Seite breit
            End With

Der erste Befehl zum Drucken der Titelzeilen funktioniert wunderbar, der zweite Befehl will jedoch einfach nicht, die Spalten werden nicht auf eine Seite gepackt. 

Könnt ihr mir vielleicht weiterhelfen, woran das liegt? 

PS: Ich würde euch auch die ganze Datei anhängen, aber ich bin vermutlich blind und finde den Anhang-Button nicht. cool

Vielen Dank schon mal!

Liebe Grüße 

Pinacles


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Druckskalierung funktioniert nicht
15.11.2021 15:51:04 Pinacles
NotSolved
15.11.2021 15:56:32 Gast77262
NotSolved
15.11.2021 16:09:42 Gast47097
NotSolved
15.11.2021 16:45:42 Gast2416
NotSolved
16.11.2021 07:43:07 Pinacles
Solved