Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1480to1484
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Tipp: ActiveSheet.PageSetup.PrintArea Excel 2016

Tipp: ActiveSheet.PageSetup.PrintArea Excel 2016
17.03.2016 15:53:17
K
Hallo,
Wir transportieren derzeit Excel 2003 Dateien in Excel 2016
Es gibt (Nicht von mir.Der Sinn erschließt sich mir nicht ein komplettes Arbeitsblatt als PrintArea zu definieren) folgendes Makro in den Excel 2003 Dateien:

Sheets("VKZ_PL-Pflege").Select
Cells.Select
ActiveSheet.PageSetup.PrintArea = Selection.Address

Das Makro läuft in Excel 2003 ohne Probleme
Jetzt kommt das Interessante:
Wird diese Makro unter Excel 2016 ausgeführt, bricht es bei
ActiveSheet.PageSetup.PrintArea = Selection.Address
ab. Soweit so gut.
Wenn man dann den VB-Editor verlässt und eine Formel in irgendeine Zelle schreibt z.B =B2 und diese Zelle mit Enter verlässt -sieht zunächst alles okay aus-.
Geht man aber zurück in die Zelle steht da
='VKZ_PL-Pflege'!A1048575
Das Fiese: Das sieht man nicht auf dem ersten Blick.
Übrigens: Das betrifft die gesamte Application. Wenn die die Datei schließe und im gleichen Fenster eine neue Mapper erzeuge, bleibt dieser Fehler bestehen.
Lichtblick:Anscheind wird das Problem nicht gespeichert (Die krummen Formeln schon)

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Tipp: ActiveSheet.PageSetup.PrintArea Excel 2016
17.03.2016 16:17:46
Daniel
Hi
es ist Unsinn, die Printarea auf den kompletten Zellbereich zu legen. Das ist viel zu gross.
wenn der komplette Tabellenblattinhalt gedruckt werden soll, lässt man die PrintArea einfach leer, Excel druckt dann automatisch den genutzen Bereich des Tabellenblatts
Sheets("VKZ_PL-Pflege").PageSetup.PrintArea = ""

das ganze natürlich ohne die überflüssige Selektiererei.
Gruß Daniel

AW: Tipp: ActiveSheet.PageSetup.PrintArea Excel 2016
18.03.2016 09:17:55
K
Hallo Daniel
Ja, so passen wir das jetzt auch an.
Das Makro war halt in der Excel 2003 schon vorhanden und der "BUG" ist uns nur per Zufall aufgefallen.
Wir haben die Dateien bisher stumpf konvertiert, das machen wir jetzt natürlich nicht mehr.
Ich wollte nur auf das Problem hinweisen, reicht ja wenn einer in die Falle tappt.
Viele Grüße
Katja
Anzeige

95 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige