Nach Beseitigung eines kleinen Stolpersteins hat es bei mir geklappt.
Stolperstein: Der Frame befand sich im Bereich der fixierten Zeilen (Tabellenüberschriften) und hatte blockiert. Ein Verschieben in den nicht fixierten Tabellenbereich löste die Blockade.
Auf Grund der Datenmenge wäre dies nicht praktikabel gewesen.
Ich habe zusätzlich einen Button zum Ein- und Ausblenden hinzugefügt.
Private Sub CommandButton1_Click() If ActiveSheet.ChartObjects(1).Visible Then ActiveSheet.ChartObjects(1).Visible = False ActiveSheet.CommandButton1.BackColor = RGB(128, 128, 128) 'grau Else 'wenn nicht sichtbar dann ... ActiveSheet.ChartObjects(1).Visible = True ActiveSheet.CommandButton1.BackColor = RGB(0, 255, 0) 'grün End If End Sub
Somit bleibt, für meine Zwecke, die Übersicht zwischen Tabelle und grafischer Darstellung erhalten.