Live-Forum - Die aktuellen Beiträge
Datum
Titel
15.10.2025 16:22:17
Datum ist nicht Datum :(
15.10.2025 15:02:20
Blockpfeile mit Makro gehen nicht mehr nach freigabe
15.10.2025 13:51:13
VBA - Fortschrittsbalken unabhängig von Zellen
15.10.2025 13:31:47
WENN Formel mit zwei Bedingungen über 4 Spalten...
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
292to296
292to296
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Diagramm Ort ermitteln

Forumthread: Diagramm Ort ermitteln

Diagramm Ort ermitteln
13.08.2003 17:24:42
michael
Hallo Zusammen.
Ich möchte die Position eines markierten Diagramms im Tabellenblatt ermitteln.
Warum enthalten die Variablen keine Werte ??
DLinks = ActiveChart.ChartArea.Left
DOben = ActiveChart.ChartArea.Top
DBreit = ActiveChart.ChartArea.Width
DHoch = ActiveChart.ChartArea.Height
Vorab Danke!
michael
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Diagramm Ort ermitteln
13.08.2003 17:31:21
Knut
Option Explicit

Sub Dia()
Dim ch As Object, L As Single, T As Single, W As Single, H As Single
Set ch = ActiveSheet.ChartObjects("Diagramm 1")
L = ch.Left
T = ch.Top
W = ch.Width
H = ch.Height
MsgBox L & " " & T & " " & W & " " & H
End Sub

Knut

Anzeige
AW: Diagramm Ort ermitteln
13.08.2003 18:01:44
michael
Hallo Knut.
Vielen Dank ,es funktioniert !
aber...
warum funktioniert das Ganze nicht für den Zeichnungsbereich ???
Set ch = ActiveSheet.ChartObjects("Diagramm 1").PlotArea
Hintergrund meines Problems:
Ich habe zwei Diagramme in Excel, die untereinander stehen. Im oberen Diagramm befinden sich sich die absoluten Umsätze von 5 Filialen. Im unteren Diagramm sind die prozentualen Veränderungen zum Vorjahr.
Im Excel sind die beiden Diagramme so ausgerichtet, dass die y-achsen übereinander sind.
Wenn ich die beiden Diagramme gruppiere und in Powerpoint einfüge, sind die beiden Achsen verschoben. Ich glaube, das hängt an der unterschiedlichen Beschriftung der Y-Achsen. Nun versuche ich den Zeichnungsbereich auf gleiche Größe zu fixieren.
gruss
michael

Anzeige
AW: Diagramm Ort ermitteln
13.08.2003 22:21:41
Knut
Das geht mit PlotArea auch, du musst die Objekte nur richtig
ansprechen. 

Sub Plot_Area()
Dim Dia As Object
Set Dia = ActiveSheet.ChartObjects(1).Chart
With Dia.PlotArea
.Left = 3
.Top = 3
.Width = 300
.Height = 300
End With
End Sub

Knut

Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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