none
Diagramm auf geschütztem Blatt per Makro ändern RRS feed

  • Frage

  • Hallo ihr alle,

    kennt jemand eine Lösung für folgendes Problem:

    Diagramm mit Excel 2003 auf einem Tabellenblatt erstellt, unter "Diagrammfläche formatieren" den

    Haken bei "Gesperrt" entfernt und anschließend mit Blattschutz das Tabellenblatt geschützt.

    Mit Excel 2003 können jetzt per VBA die Eigenschaften wie Tabelle1.ChartObjects("Dia1").Top

    und "Tabelle1.ChartObjects("Dia1").Chart.Axes(xlValue).MaximumScale = L + 0.01" geändert werden. :-)

    Mit Excel 2007 und 2010 funktioniert der Zugriff auf ".ChartObjects("Dia1").Top" ohne problem, aber der Zugriff

    auf .Chart.Axes(xlValue).MaximumScale läuft auf einen Laufzeitfehler. :-(

    Wäre super, wenns da eine Lösung gibt.

    Gruß
    rerawa

    Montag, 28. Februar 2011 13:56

Alle Antworten

  • Hallo rerawa...

    da wird Dir meines Wissens leider nichts anderes übrig bleiben, als den Schutz vor dem Zugriff auf die Diagrammeigenschaften per Code aufzuheben und anschließend wieder zu setzen. Beispiel...

    ThisWorkbook.Worksheets(1).Unprotect "Test"

    Tabelle1.ChartObjects(1).Chart.Axes(xlValue).MaximumScale = l + 0.01

    ThisWorkbook.Worksheets(1).Protect "Test"


    Gruß

     


    MVP Office System - www.excel-ticker.de
    Dienstag, 1. März 2011 10:16
  • Hallo Louha,

     

    danke für den Tipp.

     

    Leider bringt er den gewünschten Erfolg auch nur mit abstrichen, da das Diagramm anhand von den Eingaben auf einem anderen Arbeitsblatt angepasst wird.

    Habe schon verschienenste Möglichkeiten (z.B. .Protect UserInterfaceOnly:=True, .Protect DrawingObjects:=False, auch in Verbindung mit Application.screenupdating) getestet, aber ist keine Lösung so elegant wie es mit Excel 2003 geht.

    Was macht Excel2007/2010 da anders als die Vorgängerversionen oder wo kann ich da vielleicht noch was einstellen?

    Ein den neuen Excelversionen ist ja einiges, was echt gut ist, aber wenns nicht kompatibel ist wie im oben beschriebenen Fall, dann gibts immer wieder Böse Überraschungen und nicht vorhersebare Probleme.

    Wenns hier seitens MS irgendwie eine Info zu geben würde, wäre super.

    Gruß

    Ralf


    Dienstag, 1. März 2011 13:45
  • Hallo!

    Habe bei mir gerade das gleiche Problem. Da der Beitrag schon etwas älter ist, wollt ich mal fragen ob es inzwischen eine elegantere Lösung gibt?

    LG

    Thomas

    Mittwoch, 6. Dezember 2017 11:16