Microsoft Office Tutorials and References
In Depth Information
7.3.2 Eingebettetes Diagramm verwalten
7.3.2
Eingebettetes Diagramm verwalten
Parallel zum vorherigen Abschnitt folgen drei Programme zum Kopieren,
Löschen bzw. Exportieren eines eingebetteten Diagramms. Zunächst das
Kopieren:
Kopieren
Sub DiagrammEingebettetKopieren()
With ThisWorkbook.Worksheets("Tabelle1")
.ChartObjects(1).Copy
.Paste
.ChartObjects(2).Top = 250
.ChartObjects(2).Left = 200
End With
End Sub
Das Ergebnis:
Abbildung 7.8
Kopiertes, eingebettetes Diagramm
Zur Erläuterung:
Es wird davon ausgegangen, dass im Tabellenblatt Tabelle1 nur ein
Diagrammrahmen existiert.
Dieser Rahmen hat die Nummer 1 in der ChartObjects -Auflistung.
Die Methode Copy() kopiert den Diagrammrahmen (inklusive Dia-
gramm) in die Zwischenablage.
Copy()
Die Methode Paste() fügt den Diagrammrahmen aus der Zwischen-
ablage in das Tabellenblatt Tabelle1 ein. Damit wird er zu ChartOb-
jects(2) .
Paste()
Die Position dieses neuen Diagrammrahmens wird über die Eigen-
schaften Top und Left festgelegt.
Diagrammrahmen
Search JabSto ::




Custom Search