Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Diagram drucken, trotz Zellenschutz

Forumthread: Diagram drucken, trotz Zellenschutz

Diagram drucken, trotz Zellenschutz
05.07.2005 21:33:47
stefano
hallo Leute,
ich brauche wieder euere Hilfe,,
Wieshalb, bekomme ich bei geshutzten Zellen wenn ich will ein Diagramm per klick drucken auf das Butonn (Makro aufgezeichnet), immerwieder diese Fehlermeldung:
Laufzeitfehler '1004'
Die Activate Methode des Chartobjects-Objektes könnte nicht ausgeführt werden?
Wenn ich das Zellenschutz rausnehmen,dann funkiniert alles.
siehe Beispiel
https://www.herber.de/bbs/user/24493.xls
Besten Dank in voraus
stefano
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Diagram drucken, trotz Zellenschutz
06.07.2005 09:49:21
serge
Hallo Stefano
probiere es mit

Sub statiausdrucken()
ActiveSheet.Unprotect
ActiveWindow.SmallScroll Down:=6
ActiveSheet.ChartObjects("Diagramm 1").Activate
ActiveChart.ChartArea.Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub

Serge
Anzeige
AW: Diagram drucken, trotz Zellenschutz
06.07.2005 14:14:42
stefano
hallo Serge,
zuerst danke für dein Antwort, ich habe versucht aber bei drucken wird passwort Fenster angezeigt, ich gebe das Passwort ein und dann kommt diese Fehlermeldung:
Laufzeitfehler '1004'
Anwendungs-oder Object definierter Fehlerst
Kannst Du mir wieter Helfen
Danke + Gruss
stefano
Anzeige
AW: Diagram drucken, trotz Zellenschutz
06.07.2005 18:03:58
serge
Hallo Stefano
vielleicht mit
Sub statiausdrucken()
ActiveSheet.Unprotect password:="xx" (xx = dein Password!)
ActiveWindow.SmallScroll Down:=6
ActiveSheet.ChartObjects("Diagramm 1").Activate
ActiveChart.ChartArea.Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
ActiveSheet.Protect password:="xx", DrawingObjects:=True, Contents:=True,
Scenarios:=True
Serge
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige